[vb6] caratteri speciali

[marcello90]

Private Sub Form_Load()
WskClient.Connect "192.168.0.4", "23"
End Sub
Private Sub wskClient_DataArrival(ByVal bytesTotal As Long)
    WskClient.GetData a
    txtreply = a & vbCrLf
End Sub

quando vado a leggere mi esce questo testo

?????††††???????????????????????????????††††??†††† ††††††††††††††††††††††???††††??†††????????????‡??? ????††????††††??††††††††††††††††††††††††††???††††? ?†††††?????????†††????8†††????††††??†††††††††††††† ††††††††††††???††††??????????????????????????????? ???††††††???????????‰†???????????????????????????? ????›


Forse perché il vb6 non gestisce certi caratteri?
Come posso risolvere?

[morocarlo]

le velocità sono impostate correttamente?
prova a dichiarare a prima di tutto come stringa.
su txtreply.text dovresti aggiungere anche se stesso per non cancellare le cose precedenti

[marcello90]

Cosa devo impostare per quanto riguarda le impostazioni
calcola che la connessione si avvia appena si carica il form e la lettura dati avviene premendo un bottone

[marcello90]

Private Sub Command1_Click()
MsgBox Winsock1.State
Dim a As String
Winsock1.SendData a
MsgBox a
End Sub

Private Sub Form_Load()
Winsock1.Connect "192.168.0.4", 23
End Sub

mi visualizza 7 ma nella seconda msgbox non mi visualizza nulla
e pure smanettando ero riuscito a visualizzare un testo

[morocarlo]

forse perchè a è vuota.
prova a scrivere a="prova" e vedrai che va

Private Sub Command1_Click() 
MsgBox Winsock1.State 
Dim a As String 
a="prova"
Winsock1.SendData a 
MsgBox a 
End Sub