HTA文件去除html控件认证和接收命令行参数

所属分类: 脚本专栏 / vbs 阅读数: 1961
收藏 0 赞 0 分享

一是利用hta 去掉htm的控件验证

hta1的代码如下:

<html> 
<head> 
<title>Sample HTML Application one</title> 
</head> 
<body onload="Viewer.document.location.href='activexcontrol.htm'"> 
<iframe id="Viewer" application="yes"><!--这里是去掉验证的关键--> 
</iframe> 
</body> 
</html> 

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的对话框

更多精彩内容其他人还在看

VBS教程:方法-Close 方法

Close 方法关闭打开的 TextStream 文件。object.Closeobject 应为 TextStream 对象的名称。说明下面例子举例说明如何使用 Close 方法关闭打开的 TextStream 文件:Sub CreateAFile Dim fso, MyFi... 查看详情
收藏 0 赞 0 分享

VBS教程:方法-BuildPath 方法

BuildPath 方法向现有路径后添加名称。object.BuildPath(path, name) 参数object必选项。应为 FileSystemObject 对象的名称。path必选项。要附加 name 的现有路径。可以是绝对或相对路径且无需指定现有文件夹。name必选... 查看详情
收藏 0 赞 0 分享

VBS教程:方法-AddFolders 方法(Folders)

AddFolders 方法(Folders)向 Folders 集合添加新 Folder。object. Add(folderName)参数object必选项。应为 Folders 集合的名称。folderName必选项。要添加的新 Folder 名称。说明下面例子举例说明如何利... 查看详情
收藏 0 赞 0 分享

VBS教程:属性-ShortPath 属性

ShortPath 属性返回按照 8.3 命名约定转换的短路径名。object.ShortPath object 应为 File 或 Folder 对象的名称。说明以下代码举例说明如何使用 ShortName 属性:Function ShowShortPath(filespec)... 查看详情
收藏 0 赞 0 分享

VBS教程:属性-ShortName 属性

ShortName 属性返回按照早期 8.3 文件命名约定转换的短文件名。object.ShortName object 应为 File 或 Folder 对象的名称。说明以下代码举例说明如何使用 ShortName 属性:Function ShowShortName(files... 查看详情
收藏 0 赞 0 分享

VBS教程:属性-ShareName 属性

ShareName 属性返回指定的驱动器的网络共享名。object.ShareName object 应为 Drive 对象的名称。说明如果 object 不是一个网络驱动器,则 ShareName 属性返回零长度字符串 ("")。以下代码举例说明如何使用 ShareName 属... 查看详情
收藏 0 赞 0 分享

VBS教程:属性-SerialNumber 属性

SerialNumber 属性返回十进制序列号,用于唯一标识一个磁盘卷。object.SerialNumber object 应为 Drive 对象的名称。说明可以使用 SerialNumber 属性以确保在可移动媒体驱动器中插入正确的磁盘。以下代码举例说明如何使用 Serial... 查看详情
收藏 0 赞 0 分享

VBS教程:属性-RootFolder 属性

RootFolder 属性返回一个 Folder 对象,表示指定驱动器的根文件夹。只读。object.RootFolder object 应为 Drive 对象的名称。说明使用返回的 Folder 对象,可以访问指定驱动器包含的所有文件和文件夹。下面例子举例说明如何使用 Root... 查看详情
收藏 0 赞 0 分享

VBS教程:属性-Path 属性

Path 属性返回指定文件、文件夹或驱动器的路径。object.Path object 应为 File、Folder 或 Drive 对象的名称。说明对于驱动器,路径不包含根目录。例如,C 驱动器的路径是 C:,而不是 C:\。以下代码举例说明如何使用 Path 属性:Funct... 查看详情
收藏 0 赞 0 分享

VBS教程:属性-ParentFolder 属性

ParentFolder 属性返回指定文件或文件夹的父文件夹。只读。object.ParentFolder object 应为 File 或 Folder 对象的名称。说明以下代码举例说明如何使用 ParentFolder 属性:Function ShowFileAccessIn... 查看详情
收藏 0 赞 0 分享
查看更多