Una forma de conocer la dirección IP del equipo es invocando una función API, pero comentaré otra forma de hacerlo y esta es através de MSDOS, el único inconveniente es que se mostrara la ventana del DOS, pero eso también tiene solución y será explicada en la sección de APIS
Local F, X, Y, U, K
F = Sys(2023)
+ ""
+
SubStr(Sys(2015),1,8)
+ ".txt"
X = SubStr(sys(0),1,
At("
",
Sys(0))-1)
Run PING &X > &F
Y = FileToStr(F)
Delete File &F
U = At("[",
Y) + 1
K = At("]",
Y)
? SubStr(Y,U,K-U)
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com