activexcontrol.htm代码如下:
<script language="VBSCRIPT"> Dim FileSystem ' Creates the FileSystemObject Set FileSystem = CreateObject("Scripting.FileSystemObject") </script>
这样就可以去掉htm的本地验证了。
二、hta接收命令行参数
书中的代码我估计有错,不可能成功,我研究了一下,hta2应当这样写:
<HTA:APPLICATION ID="MySampleHTA" Caption="yes"> <html> <head> <title>Sample HTML Application two</title> </head> <body> <script language="VBScript"> cmdLineArray = Split(MySampleHTA.commandLine)‘这是把命令中的参数变成数组 MsgBox cmdLineArray(UBound(cmdLineArray)) '接收最后一个参数 a=document.getElementById("MySampleHTA").commandLine '这样写法是一个字符串,不是数组 MsgBox TypeName(a)&"--"&a '验证 </script> </body> </html>
在命令行下:hta2 lcx 就会弹出lcx的对话框