vbs重启TP-Link路由器示例

分享一个自己用的小工具，重启TP-Link路由器的，好像还是大学时候写的，献丑了。
其他路由器可能有些不同，但是思路都是差不多的。

user = "admin" '路由器帐号
pass = "admin" '路由器密码

With CreateObject("Msxml2.ServerXMLHTTP")
    .open "GET", "http://192.168.1.1/userRpm/SysRebootRpm.htm?Reboot=重启路由器", False, user, pass
    .send
End With

MsgBox "命令已发出，60秒内重启完毕。", 64, "重启路由器"