Ver Mensaje Individual
  #13 (permalink)  
Antiguo 30/05/2008, 12:34
Avatar de David
David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 19 años
Puntos: 839
Exclamación Respuesta: Porque no me function este codigo?

Cita:
Iniciado por magTpeak Ver Mensaje
If Buffer = "contrasena" Then
Winsock1.SendData "Bienvenido" & vbCrLf
End If
Coloca un punto de interrupción en la línea del If para ver qué valor te está devolviendo en Buffer.
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.