25/07/08 8:42
.:ViRuS:.
Ragazzi Mi sto mangiando la testa....
ho un errore STRANISSIMO in un codice
eccolo qui:
Dim data As String
TCP.GetData data
S = data
V = Split(S, ",")
If V(0) = "/ReceiveFile" Then
Open App.Path & "\" & V(1) For Binary As #9
TCP.SendData = "OK"
End If
S = data
V = Split(S, "omfglol")
If V(0) = "/BinaryData" Then
Put #9, , V(1)
End If
If data = "EndTransfer" Then
DoEvents
Close #9
End If
L'errore che riscontro è: argomento non facoltativo
e mi segnala in blu il senddata del winsock
PERCHEEE!! COS'è SUCCESSO!!
Ultima modifica effettuata da .:ViRuS:. 25/07/08 8:44
aaa
25/07/08 8:45
.:ViRuS:.
Scrivo questo secondo post perchè non ho messo la notifica via email al primo
aaa
25/07/08 10:29
Overflow
SendData è una funzione quindi devi passare il parametro della funzione TCP.SendData "ok"
Ultima modifica effettuata da Overflow 25/07/08 10:30
aaa