Создайте сценарий VB для запуска на досуге.
Введите это в текстовый файл:
Option Explicit
Dim http : Set http = CreateObject( "MSXML2.ServerXmlHttp" )
http.Open "GET", "http://icanhazip.com", False
http.Send
Wscript.Echo http.responseText 'or do whatever you want with it
Set http = Nothing
Закройте текстовый файл и переименуйте его в ip.vbs (для этого примера сохраните его в C:)
В окнах откройте окно DOS (запустить CMD) (ха!Я только что понял, если вы поменяете местами, что он станет запускать DMC!)
Убедитесь, что вы находитесь в c:/ (если нет, введите c: & нажмите enter, затем cd .. & введите несколько раз, пока не увидите C:>)
В командной строке DOS введите:
cscript ip.vbs
и вы сразу увидите свой внешний IP.
Если вы поместите файл vbs в ключ usb или что-то еще (и не забудьте запустить cscript ip.vbs в командной строке dos, но убедитесь, что вы находитесь в том же каталоге, что и файл ip.vbs), вы можете взять его с собой. куда бы вы ни пошли и запустили файл .vbs на любом компьютере, чтобы увидеть их внешний IP.
Еще одно примечание: строка с адресом для icanhazip.com может быть изменена на любое из следующего:
http://myip.dnsomatic.com
http://whatismyip.org
http://icanhazip.com
http://www.whatismyip.com/automation/n09230945.asp
http://externip.com
Отредактируйте, вы также можете запустить файл ip.vbs в Windows, не переходя в окно DOS, и он просто появится в небольшом всплывающем окне.