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, "重启路由器"