Lac*_*anG 8 scripting windows telnet
是否可以使用 Windows Telnet 客户端在脚本中运行一系列命令?
如果没有,是否有任何替代方案?
很久以前,我编写了一个 COM 服务器来允许我从 VBScript 执行 telnet。如果您想要一份副本(包括源代码),我很乐意将其放在 Internet 上的某个地方。我用它来远程重启路由器。
为了让您了解它的作用,这里有一个示例脚本(已删除错误检查)
const SVR = "www.microsoft.com"
dim telnet, s, i
set telnet = CreateObject("Rhs.Telnet")
telnet.Startup()
telnet.Connect SVR, 80
telnet.Writeline "GET / HTTP/1.0"
telnet.Writeline "Host: www.microsoft.com"
telnet.Writeline "User-Agent: RhsTelnet"
telnet.Writeline "Accept: */*"
telnet.Writeline ""
do while telnet.Readline(s, 1000)
wscript.echo s
loop
telnet.Disconnect()
telnet.Cleanup()
Run Code Online (Sandbox Code Playgroud)
JR
链接到 COM 服务器:你好 Lachlan 试试http://www.ratsauce.co.uk/RouterCheck.zip
这是 COM 服务器和重新启动 Draytek 路由器的脚本。脚本 RouterCheck.wsf 检查它是否可以 ping 几个测试主机,因此您可能希望忽略大部分代码。只需使用 RebootRouter 功能并忽略其余部分。这是在我的 ADSL 线路的末端,所以下载可能有点慢。
如果有人想要源代码(带有 ATL 的 Visual C++ 5.0),那么我可以将其放在 SourceForge 上。
归档时间: |
|
查看次数: |
28423 次 |
最近记录: |