错误:必需的对象:HTA中的"wscript" [英] Error: Object required: 'wscript' in HTA
问题描述
我已经搜索了一段时间，但似乎找不到答案.我正在做一个基于GUI的程序选择器，并且对VBS和HTA还是很陌生.我已经制作了自动打字机，但似乎无法弄清为什么它不能在HTA中使用.它可以正常工作.
I've been searching for awhile, but I cannot seem to find the answer. I am making a gui based program selector and I am quite new to VBS and HTA. I've made a auto-typer and I cannot seem to figure out why it does not work in HTA. It works fine on its own.
<head>
<title>Gui Bases Program Selector.</title>
<HTA:APPLICATION
APPLICATIONNAME="HTA Test"
SCROLL="yes"
SINGLEINSTANCE="yes"
WINDOWSTATE="maximize"
>
</head>
<script language="VBScript">
Sub TestSub
Set shell = CreateObject("wscript.shell")
strtext = InputBox("What Do you want your message do be?")
strtimes = InputBox ("How many times would you like you type it?")
If Not IsNumeric(strtimes) Then
lol = MsgBox("Error = Please Enter A Number.")
WScript.Quit
End If
MsgBox "After you click ok the message will start in 5 seconds "
WScript.Sleep(5000)
Tor i=1 To strtimes
shell.SendKeys(strtext & "")
shell.SendKeys "{Enter}"
WScript.Sleep(75)
Next
End Sub
</script>
<body>
<input type="button" value="AutoTyper" name="run_button" onClick="TestSub"><p>
</body>
推荐答案
HTA引擎不提供WScript对象，因此WScript.Quit或WScript.Sleep之类的东西在HTA中不起作用.要以编程方式从HTA退出，请使用Self.Close或window.Close.有关替换Sleep方法的信息，请参见此问题的答案.
The HTA engine doesn't provide a WScript object, so things like WScript.Quit or WScript.Sleep don't work in HTAs. To programmatically exit from an HTA use Self.Close or window.Close. For replacing the Sleep method see the answers to this question.
这篇关于错误:必需的对象:HTA中的"wscript"的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！
