我有很多每天使用的 cmd 文件,例如将用户添加到本地组、安装打印机、以管理员身份运行任务等。
我喜欢将最常用的脚本添加到标签式 hta 文件中,但找不到有关如何轻松完成此操作的良好指南。有人有好的网站可以与我分享吗?
或者我最终必须从 vb 脚本开始?我已经做过一些了,但对我来说,编写 cmd 文件要快得多。
答案1
如果您想在 HTA 中使用选项卡式界面,我强烈建议您使用 Microsoftmpc DHTML 行为图书馆。
它简化了流程。它可能看起来很复杂,但说实话它真的很容易使用。微软提供了一个很好的例子,你可以轻松地从中适应HTA。只需从下载库文件即可这里(请注意该文件是一个自提取程序),并按照我根据他们的示例创建的这个示例进行操作(请注意查看“控件”选项卡):
<HTML xmlns:mpc>
<HEAD>
<TITLE>Behavior Library: Mpc</TITLE>
<STYLE>
@media all
{
mpc\:container {
behavior:url(mpc.htc);
}
mpc\:page {
behavior:url(mpc.htc);
}
}
H1 {
font: bold 18pt verdana;
color: navy
}
P {
font: 10pt verdana;
}
A:link { color:#003399; text-decoration:none; }
A:visited { color:#6699CC; text-decoration:none; }
A:hover { text-decoration:underline; }
</STYLE>
<SCRIPT LANGUAGE="JavaScript">
function TabOrientation()
{
if(oMPC.style.tdTabOrientation == "top")oMPC.style.tdTabOrientation = "bottom" ;
else oMPC.style.tdTabOrientation = "top"
}
function Height()
{
alert(parseInt(heightBox.value));
oMPC.style.height = parseInt(heightBox.value);
}
function Width()
{
oMPC.style.width = parseInt(widthBox.value);
}
function BackColor()
{
oMPC.style.backgroundColor = BackColorBox.value;
}
function Color()
{
oMPC.style.color = ColorBox.value;
}
</SCRIPT>
<SCRIPT LANGUAGE="VBScript">
set objShell = CreateObject("Wscript.Shell")
Sub runCmd()
message = "Hello"
objShell.Run "cmd /k echo " & message, 1, True
End Sub
</SCRIPT>
</HEAD>
<BODY BGCOLOR="white" ONLOAD="oMPC.style.visibility='visible'">
<!--TOOLBAR_START--><!--TOOLBAR_EXEMPT--><!--TOOLBAR_END-->
<H1>MPC</H1>
<FONT FACE="verdana,arial,helvetica" SIZE=1>
<A href="#" onclick=self.close()><IMG ALIGN="middle" SRC="demo.gif" WIDTH="16" HEIGHT="16" BORDER="0" ALT="Click to Close Sample"></A>
<A href="#" onclick=self.close()>Close This Sample</A>
</FONT><HR>
<P>Use the Mpc Behavior to group information on a page.</P>
<BR><BR>
<DIV STYLE="height:250">
<mpc:container ID="oMPC" STYLE="width:400; height:250; visibility:hidden">
<mpc:page ID="tab1" TABTITLE="This is a title" TABTEXT="Table">
<br><br>
<table BORDER="1" ALIGN="CENTER" STYLE="font:10pt Verdana; width:300; height:79; color:black">
<tr>
<td VALIGN="MIDDLE" ALIGN="CENTER">
<b>This is a table</b>
</td>
</tr>
<tr>
<td>Item One</td>
</tr>
<tr>
<td>Item Two</td>
</tr>
<tr>
<td>Item Three</td>
</tr>
</table>
<br><br>
</mpc:page>
<mpc:page TABTITLE="This is a title, also" TABTEXT="Some Text">
<div STYLE="padding:12px; font:10pt Comic MS Sans; font-style:italic">This is some sample text...</div>
</mpc:page>
<mpc:page ID="tab3" TABTITLE="Title" TABTEXT="Controls">
<div STYLE="padding:12px; font:bold 10pt Verdana; color:black">
<span STYLE="width:100%; text-align:center">A Control Panel</span>
<table ALIGN="CENTER" STYLE="font:normal 10pt Verdana">
<tr>
<td>Radio Button</td>
<td><input TYPE="RADIO" id="RADIO1" name="RADIO1"></td>
</tr>
<tr>
<td>Checkbox</td>
<td><input TYPE="CHECKBOX" CHECKED id="CHECKBOX1" name="CHECKBOX1"></td>
</tr>
<tr>
<td>Input Box</td>
<td><input TYPE="TEXT" id="TEXT1" name="TEXT1"></td>
</tr>
<tr>
<td>Msg Button</td>
<td><input TYPE="button" id="Button1" name="Button1" onclick='vbscript:MsgBox("Hello")' ></td>
</tr>
<tr>
<td>Cmd Button</td>
<td><input TYPE="button" id=Button3 name="Button1" onclick='vbscript:runCmd()' ></td>
</tr>
</table>
</div>
</mpc:page>
<mpc:page TABTITLE="Title" TABTEXT="Image">
<img STYLE="position:absolute; top:50; left:50; width:100; height:60" SRC="flag.gif" WIDTH="171" HEIGHT="80">
</mpc:page>
</mpc:container>
</DIV>
</BODY>
</HTML>
答案2
HTA 文件真的是最佳选择吗?如果是这样,那么如果您想从 HTA 文件运行任何内容,则需要学习一些 VB(您可能也可以使用 javascript 完成同样的事情)。
HTA 只是一个像应用程序一样运行的 HTML 文件,因此如果您想要“选项卡式”视图,那么它可能会比它本身更麻烦。
尝试我找到的一个例子这里。