您所在位置：主题：vbs转exe的问题，太奇怪了
Valima
[专家分：0] 发布于 2008-08-12 18:02:00
本人用vbs写了一个自动telnet的脚本程序，直接运行是没有问题的，可以正常登录并退出，可是转成exe（用几个不同的vbs转exe工具效果都一样）文件后就有问题了，每次运行就不停的运行，好像是在自己在调用自己，一直在运行。
哪位高人解释一下，代码如下，或者有其他办法也可以只要在发布时看不到源代码就可以。
Dim WshShell ,IP,lsFile
msg="请输入数控系统的IP地址：如，192.168.1.253"
IP=Inputbox(msg,"IP")
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "telnet " + IP
WshShell.SendKeys"{ENTER}"
WScript.Sleep 5000
WshShell.AppActivate"c:"
WshShell.SendKeys"root"
WshShell.SendKeys"{ENTER}"
WScript.sleep 200
WshShell.SendKeys"linux{ENTER}"
WScript.sleep 200
WshShell.SendKeys"exit{ENTER}"
哪位高人解释一下，代码如下，或者有其他办法也可以只要在发布时看不到源代码就可以。
Dim WshShell ,IP,lsFile
msg="请输入数控系统的IP地址：如，192.168.1.253"
IP=Inputbox(msg,"IP")
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "telnet " + IP
WshShell.SendKeys"{ENTER}"
WScript.Sleep 5000
WshShell.AppActivate"c:"
WshShell.SendKeys"root"
WshShell.SendKeys"{ENTER}"
WScript.sleep 200
WshShell.SendKeys"linux{ENTER}"
WScript.sleep 200
WshShell.SendKeys"exit{ENTER}"