Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно
pva pva вне форума

Аватара для pva

Ветеран


Сообщения: 1180
Благодарности: 279

Профиль | Отправить PM | Цитировать


Windows 7 Домашняя базовая, sp1 заработала в таком варианте:
ping.js:
Код: Выделить весь код
var 
  fso = new ActiveXObject("Scripting.FileSystemObject"),
  get_ip = new ActiveXObject("WinHttp.WinHttpRequest.5.1"),
  got_ip, str_ip, last_time_this_ip,
  last_time_ip={};

try { 
  eval(fso.OpenTextFile("last_ip.txt", 1).ReadAll()); 
} catch(e) { 
  WScript.Echo(e.message);
  fso.CreateTextFile("last_ip.txt", true); 
}

get_ip.Open("GET", "http://ifconfig.me/ip", false);
get_ip.Send();
got_ip = /[\d.]+/.exec(String(get_ip.responseText));
//got_ip=["192.168.0.1"];

if (got_ip) {
  str_ip = got_ip[0];
  last_time_this_ip = last_time_ip[str_ip];
  if (last_time_this_ip) {
    WScript.Echo("Last time "+str_ip+" was at "+last_time_this_ip);
  }
  fso.OpenTextFile("last_ip.txt", 8).WriteLine("last_time_ip[\""+str_ip+"\"]=\""+new Date()+"\";");
}
Предупреждаю: не самый экономный для памяти вариант. Лучше сделать гибрид с предложенным Iska.

Последний раз редактировалось pva, 04-08-2013 в 23:10.

Это сообщение посчитали полезным следующие участники:

Отправлено: 22:54, 04-08-2013 | #35