Простой, но не элегантный для этого использования. Я установил несколько камер видеонаблюдения и мой кабельный провайдер - Wide Open West или WOWWAY требовали 10 долларов в месяц для установки статического IP-адреса - EXTORTION для резервирования DHCP ... поэтому я создал файл VBS со следующим кодом, чтобы сбросить результат Dropbox и Google Drive ... должны удалить файл для новой синхронизации, хотя по какой-то причине.
Это работает на ПК у меня дома. Мой компьютер настроен на возобновление работы при отключении электроэнергии, и запланировано, что задача будет запускаться каждый день один раз (обратите внимание, что если он запускается часто, сайт будет блокировать ваши запросы).
Теперь я могу получить свой IP-адрес в дороге и смотреть, как люди крадут мои вещи :-)
get_html "http://ipecho.net/plain", "C:\Users\joe\Google Drive\IP.html"
get_html "http://ipecho.net/plain", "C:\Users\joe\Dropbox\IP.html"
sub get_html (up_http, down_http)
dim xmlhttp : set xmlhttp = createobject("msxml2.xmlhttp.3.0")
xmlhttp.open "get", up_http, false
xmlhttp.send
dim fso : set fso = createobject ("scripting.filesystemobject")
dim newfile : set newfile = fso.createtextfile(down_http, true)
newfile.write (xmlhttp.responseText)
newfile.close
set newfile = nothing
set xmlhttp = nothing
end sub