Título: Ayuda! Publicado por: 3nr1qu3 en 7 Septiembre 2005, 00:06 am Como sería el codigo de una aplicación que cuando se iniciara, automaticamente se pusiera a escuchar por el puerto 80. Y que cuando alguien entre a http://mi-ip me saliera la ip del que ha entrado a esa url en un List1... He conseguido hacer que se ponga automaticamente a escuchar por el puerto 80, pero lo que nose es hacer para que salga la ip del que haya entrado a http://mi-ip en el List1...
Me podeis ayudar? ;) Título: Re: Ayuda! Publicado por: Overlord en 7 Septiembre 2005, 00:37 am para que te aparezca la ip de la maquina remota prueba con:
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long) list1.AddItem(winsock1.remoteIP) End Sub Título: Re: Ayuda! Publicado por: Overlord en 7 Septiembre 2005, 00:39 am Upss... antes de list1.additen pon:
winsock1.close winsock1.accept requesID :P Título: Re: Ayuda! Publicado por: 3nr1qu3 en 7 Septiembre 2005, 00:49 am Si si, eso ya lo tenia puesto, y va perfecto. Ahora solo te pediria que me dijeras como puedo hacer para que cuando le clikee en un Command, aparezca http://mi-ip en un Text1... xD
Te agradezco mucho tu ayuda. :D Título: Re: Ayuda! Publicado por: Overlord en 7 Septiembre 2005, 00:54 am Aer... no entendo mucho pero si quieres mostrar la IP en el navegador tienes que hacer:
winsock1.sendata txtip winsock1.close o para que aparezca en un text text1.text = list1.text Título: Re: Ayuda! Publicado por: 3nr1qu3 en 7 Septiembre 2005, 00:58 am No no, a lo que me refiero es a que cuando presione al Command1, en el Text1 salga mi ip local, pero de esta forma "http://mi-ip"
Aunque si no se puede con el http:// delante no pasa nada ;) Solo quiero saber como mostrar mi ip local en el Text1 pulsando en el Command1. Título: Re: Ayuda! Publicado por: xavierote en 7 Septiembre 2005, 01:03 am Código: Private Sub Command1_Click() Y si quieres que te salga delante http:// simplemente pon: Código: Private Sub Command1_Click() NOTA: Si tu conexión es a través de LAN, por ejemplo un router, te saldrá la ip local, no la establecida por el proveedor. Título: Re: Ayuda! Publicado por: 3nr1qu3 en 7 Septiembre 2005, 01:06 am Ok, muchisimas gracias ;) Ya he podido hacer todo lo que intentaba, lol :D
|