Transmision de Archivos (WINSOCK TCP) con Visual Basic (VB.NET)
Se trata de una pequeña aplicacion del tipo Cliente-Servidor con la que el Cliente envia archivos de cualquier tipo al Servidor, utilizando el componente Winsock.
solo un comentario al probarlo, me dice que debo tener autorizacion para usar un componente (el winsock, creo. da un problema en el axhost.... ) No se por qué es esto pero el caso es que solo consigo ejecutar el server. uso el vs 2013 express... si puede arreglarse, GRACIAS, si no, GRACIAS y feliz año
le agrege esto para ver si se conecta bien o no , el tema es que el archivo no me lo transmite , te envie un correo .. Private Sub Winsock1_CloseEvent(ByVal sender As Object, ByVal e As System.EventArgs) Handles Winsock1.CloseEvent estado.Text = "cerrado por el servidor" End Sub Private Sub Winsock1_ConnectEvent(ByVal sender As Object, ByVal e As System.EventArgs) Handles Winsock1.ConnectEvent estado.Text = "conectado" End Sub Private Sub Winsock1_ConnectionRequest(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_ConnectionRequestEvent) Handles Winsock1.ConnectionRequest Winsock1.Close() Winsock1.Accept(e.requestID) End Sub
Hola Muy buen video Me podrian ayudar a como enviarle a una maquina cliente la orden de que bloquee los inputs (teclado y mouse) desde una maquinar servidor en la misma red gracias
solo un comentario
ResponderEliminaral probarlo, me dice que debo tener autorizacion para usar un componente (el winsock, creo. da un problema en el axhost.... ) No se por qué es esto pero el caso es que solo consigo ejecutar el server. uso el vs 2013 express... si puede arreglarse, GRACIAS, si no, GRACIAS y feliz año
Hola: ¿Has probado a ejecutarlo como Administrador?. ¿Puedes enviar una captura del error a mi mail?:
Eliminarvb.tutoriales.abc@gmail.com
Saludos.
acabo de mandarte un mail con un rar de pantallazos. Gracias de nuevo
Eliminarle agrege esto para ver si se conecta bien o no , el tema es que el archivo no me lo transmite , te envie un correo ..
ResponderEliminarPrivate Sub Winsock1_CloseEvent(ByVal sender As Object, ByVal e As System.EventArgs) Handles Winsock1.CloseEvent
estado.Text = "cerrado por el servidor"
End Sub
Private Sub Winsock1_ConnectEvent(ByVal sender As Object, ByVal e As System.EventArgs) Handles Winsock1.ConnectEvent
estado.Text = "conectado"
End Sub
Private Sub Winsock1_ConnectionRequest(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_ConnectionRequestEvent) Handles Winsock1.ConnectionRequest
Winsock1.Close()
Winsock1.Accept(e.requestID)
End Sub
Hola
ResponderEliminarMuy buen video
Me podrian ayudar a como enviarle a una maquina cliente la orden de que bloquee los inputs (teclado y mouse) desde una maquinar servidor
en la misma red
gracias
Hola:
Eliminar¿Para que quieres eso?.
Saludos.