27. juli 2004 - 17:39Der er
11 kommentarer og 1 løsning
Expected array i min function
Jeg har lavet en function som kører på¨min server. Når en bruger sender en besked i Chatten, bliver beskeden sendt til alle brugere via denne funktion. Jeg kan ikke finde ud af at løse fejlen... Når fejlkoden kommer frem, markerer den 'arrSplit() ='
Fejlkode: Expected array
Public Function Chat(Index As String, Text As String, Kind As String) Dim strData As String Dim arrSplit As String For x = 0 To IntMax strData = arrUsers(x) If strData <> "" Then arrSplit() = Split(strData, "|") Select Case Kind Case "Chat" If arrSplit(0) <> "Unknown" Then Winsock(x).SendData EncryptText("Chat|" & User & ": " & Text & "|Chat") AddToLog "Sent the message to a user" End If End Select End If Next End Function
proev enten at lave arrPlit om til en variant eller skrive dim arrSplit() as string - du dimmer den som string men indikerer ikke at den skal vaere et array
Public Function Chat(Index As String, Text As String, Kind As String) Dim strData As String Dim arrSplit() As String For x = 0 To IntMax strData = arrUsers(x) If strData <> "" And strDate <> " " Then arrSplit() = Split(strData, "|") Select Case Kind Case "Chat" If arrSplit(0) <> "Unknown" Then Winsock(x).SendData EncryptText("Chat|" & User & ": " & Text & "|Chat") AddToLog "Sent the message to a user" End If End Select End If Next End Function
Det kommer selvf an paa hvilket milgjoe du koerer i, men jeg vil da kraftigt anbefale at du altid bruger explicit variables, og uden at saette en dimension paa din variable angiver du altsaa ikke at den er et array. Har du proevet at saette den til variant eller at definere din varibel korrekt - du skriver at det har virket uden i andre scripts men fortaeller ikke om du har afproevet metoden..
ok lidt sent paa den der :-) Du har netop gjort det som det skulle, nemlig at smide paranteser efter dit variabel-navn i din Dim statememnt hvilket betyder at du nu giver den instruks at det er et array.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
