Створіть сценарій VB для запуску у вільний час.
Введіть це у файл txt:
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
Закрийте файл txt і перейменуйте його на ip.vbs (збережіть його на C: для цього прикладу)
У Windows відкрийте вікно 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, не переходячи до вікна дос, і він просто з’явиться у невеликому спливаючому вікні.