Primero deberías saber en qué puerto lo vas a conectar, todo depende de eso.
Saludos.
Saludos.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú
'
'Coded by Slasher
'
Option Explicit
Option Base 1 'Soy humano :)
Private snCoord(2) As Single
Private Sub lblCaption_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
On Error Resume Next
snCoord(1) = X
snCoord(2) = Y
End Sub
Private Sub lblCaption_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
On Error Resume Next
If Button = 1 Then
Call Me.Move((Left - snCoord(1)) + X, (Top - snCoord(2)) + Y)
End If
End Sub
Cita de: reydelmundo11 en 30 Agosto 2005, 21:51 PM
En el evento data arrival (creo que era)winsock1.getdata = text1
Saludos
Dim sData$
Call WinSock.GetData(sData, vbString)