Серый форум — CMD/WSH/HTA/JS/VBS: Универсальный способ определения внешнего IP и др.

Re: CMD/WSH/HTA/JS/VBS: Универсальный способ определения внешнего IP и др.

null@example.com (Rumata) — Sat, 16 Jun 2012 16:55:18 +0000

Ну лучше уж так:

ip.bat

@set @x=0/*!&&@set @x=
@ %windir%\System32\cscript.exe //nologo //e:javascript "%~dpnx0" %*
@goto :eof */

var xmlhttp = new ActiveXObject('Microsoft.XMLHTTP');
xmlhttp.open('GET', 'http://ifconfig.me/ip', false);
xmlhttp.send();
 
var ip = xmlhttp.responseText;

WScript.Echo(ip);

WScript.Quit();

Re: CMD/WSH/HTA/JS/VBS: Универсальный способ определения внешнего IP и др.

null@example.com (smaharbA) — Sat, 16 Jun 2012 15:55:23 +0000

echo off
set outerIP=
for /f %%x in ('mshta "about:"') do (
    set outerIP=%%x
)
echo %outerIP%

CMD/WSH/HTA/JS/VBS: Универсальный способ определения внешнего IP и др.

null@example.com (Rumata) — Thu, 23 Feb 2012 14:52:21 +0000

Такие ресурсы существуют, но этот лучший по количеству предоставляемых данных, структурированности и благозвучности доменного имени

http://ifconfig.me/


curl ifconfig.me

wget -qO - ifconfig.me/ip

.
JS


var xmlhttp = new ActiveXObject('Microsoft.XMLHTTP');
xmlhttp.open('GET', 'http://ifconfig.me/ip', false);
xmlhttp.send();

var ip = xmlhttp.responseText;

.
JS + JSON

var xmlhttp = new ActiveXObject('Microsoft.XMLHTTP');
xmlhttp.open('GET', 'http://ifconfig.me/all.json', false);
xmlhttp.send();

var data = JSON.parse(xmlhttp.responseText);
var ip = data.ip_addr;

.
JS + XML


var xmlhttp = new ActiveXObject('Microsoft.XMLHTTP');
xmlhttp.open('GET', 'http://ifconfig.me/all.xml', false);
xmlhttp.send();

var ip = xmlhttp.responseXml.getElementsByTagName('ip_addr')[0].text;

.
Аналогично можно выполнить и в VBS, например


Dim xmlhttp, ip

Set xmlhttp = CreateObject("Microsoft.XMLHTTP")
xmlhttp.open "GET", "http://ifconfig.me/ip", False
xmlhttp.send

ip = xmlhttp.responseText