是的,我是一个使用 VBScript 客户端的异教徒。实际上,我对 HTA 很着迷,并且正在尝试将 VBscript 合二为一。无论如何.. 这样做的总体目标是能够将输入写入 txt 文件。 ..我遇到了一条错误消息“需要对象”,它指向我用来存储输入信息的 FormContent 变量……我不确定这里发生了什么,我认为要么 A)我我失败得很惨 B)我没有正确理解价值是如何被拉出来的 C)我失败了......(另外作为旁注,我稍后会在验证中添加,所以不要对我吠叫:[关于任何想法这是怎么回事?
<html>
<HTA:APPLICATION
APPLICATIONNAME="HerpDerp"></HTA:APPLICATION>
<head>
<meta content="en-us" http-equiv="Content-Language">
<!--Using VBscript to write data to file (create object, open, append, write, close). -->
<script type="text/vbscript">
Sub Submit_OnClick
dim filesys, filetxt, FormContent
Set FormContent = document.getElementById(Text1)
Set filesys = CreateObject("Scripting.FileSystemObject")
Set filetxt = filesys.OpenTextFile("C:\\MyFile.txt", 8, True)
filetxt.WriteLine(FormContent.value)
filetxt.Close
End Sub
</script>
</head>
<form name="Form1">
<p><input name='Text1' style="width: 671px; height: 112px" type='text' id='Text1'></p>
<p><input name='Submit' style="width: 215px" type='button' value='Submit'></p>
</form>
</html>