error :winsock1 variable no definida

[saliaz]

error winsock1: variable no definida

Option Explicit
Private Sub Form_Load()
Winsock1.LocalPort = 80
Winsock1.Close
Winsock1.Listen
If Winsock1.State = 2 Then Label1.Caption = "Escuchando"
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
On Error Resume Next
Winsock1.Accept requestID
If Winsock1.State = 7 Then Label1.Caption = "aceptado"
End Sub
Private Sub desconectar_Click()
Winsock1.Close
If Winsock1.State = 0 Then Label1.Caption = "desconectado"
End Sub
Private Sub iniciar_Click()
Winsock1.SendData "iniciar"
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Winsock1.GetData SaveIn, vbString
End Sub

[seba123neo]

declaraste la variable SaveIn ?? no entiendo para que ponen Option Explicit si despues no declaran nada...¿ o esta en un modulo ?

[saliaz]

se me paso declarar la variable Save in,jeje...de todas formas ya funciona faltaba añadir el control winsock al form

[fary]

y ese programa para que era??