FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Enviar "PING" de nuestro programa a nuestro servidor
Hola,
hemos tenido problemas últimamente, ya que nuestro código no funciona para el 100% de los casos, hay usuarios que no se puede establecer el PING correctamente ¿creen que es problema del código? Código:
//ConexionIdIcmp es un objeto de la clase TIdIcmpclient; begin ConexionIdIcmp.Tag:=0; ConexionIdIcmp.Host:=ENCP(C_Host); try ConexionIdIcmp.Ping; DoConnect:=ConexionIdIcmp.Tag=1; except DoConnect:=False; end; end; Código:
var vBuffer:String; begin ConexionIdIcmp.Tag:=0; ConexionIdIcmp.Host:=String(ENCP(C_Host)); try // ARM: el código que había antes ya no funciona debido al componente Indy que no devuelve el ping correctamente // Nuevos ajustes: PacketSize=24 y agregar espacios en blanco al final del host ConexionIdIcmp.PacketSize:=24; vBuffer := ConexionIdIcmp.Host + StringOfChar(' ',255); ConexionIdIcmp.Ping(vBuffer); DoConnect:=ConexionIdIcmp.Tag=1; except DoConnect:=False; end; end; El siguiente no lo pude testear aún: http://clubdelphi.com/foros/showpost...88&postcount=9 Desconozco porque el 100% de los usuarios no puede realizar correctamente PING, pero si la mayoría, ¿será por SO? ¿configuraciones del usuario? ¿código? o ¿configuraciones nuestras? Agradecería cualquier información |
#2
|
||||
|
||||
Por ejemplo, firewall.
|
#3
|
||||
|
||||
Como comenta Casimiro, intervienen otros factores que afectan a un PING.
Por ejemplo, yo probaría si en ese mismo equipo funciona el PING desde una pantalla MSDOS. Según la respuesta se puede mirar hacia una dirección o hacia otra.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#4
|
|||
|
|||
Estuve viendo las configuraciones de Firewall y efectivamente ese puede ser el problema, cuando tenga la oportunidad de probarlo les contaré
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Usar TServerSocket y TClientSocket para enviar "streams" más o menos "grandes" | dec | Internet | 9 | 04-08-2015 16:11:50 |
Php & access, de nuestro "amigo bill" | Perio | PHP | 4 | 08-09-2006 12:34:13 |
Averiguar en qué versión de Windows se ejecuta nuestro programa | dec | Trucos | 1 | 12-06-2006 12:28:16 |
Matar el proceso de nuestro programa | zurech | Trucos | 0 | 08-06-2006 10:29:13 |
Ejecutar prg desde nuestro programa | Pablo Carlos | API de Windows | 1 | 16-06-2004 02:27:35 |
|