Hola;
El Codigo me funciono muy bien despues de hacer el siguiente cambio
DICE:
strIP = Request.ServerVariables("REMOTE_ADDR")
DEBE DECIR:
strIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
NOTA : A tener en consideracion este codigo crea un archivo Txt en el disco C: del servidor, lo que puede producir error por derechos de escritura para ello se debe direccionar a un directorio de tu Web con derechos de escritura, se recomienda hacer lo siguiente :
rutafile = Server.MapPath(".")+"\tmpfiles\"
sh.run "%comspec% /c nbtstat -A " & strIP & " > "&rutafile & strIP & ".txt",0,true
Como se ve creo un variable "rutafile" el que me apunta al directorio de mi web donde he creado un directorio temporal con derechos de escritura.
GRACIAS LEXUS...!
Cualquier cosa estamos para comunicarnos
[email protected]