Ветеран
Сообщения: 1274 Благодарности: 1030
Профиль | Отправить PM | Цитировать
Set oHTML = CreateObject("MSXML2.XMLhttp") oHTML.Open "GET", "http://www.whatismyip.com/automation/n09230945.asp", False oHTML.Send WScript.Echo "" & oHTML.ResponseText
Отправлено: 20:22, 22-12-2009 | #2