<HTML>
<HEAD>
<TITLE>HTA Demo</TITLE>
<HTA:APPLICATION ID="oHTA"
APPLICATIONNAME="Calculator,- notepad, regedit HTML LAUNCHER Application"
BORDER="thin"
BORDERSTYLE="normal"
CAPTION="yes"
ICON=""
MAXIMIZEBUTTON="yes"
MINIMIZEBUTTON="yes"
SHOWINTASKBAR="yes"
SINGLEINSTANCE="no"
SYSMENU="yes"
VERSION="1.0"
WINDOWSTATE="maximize"/>
<SCRIPT>
/* This function also retrieves the value of the commandLine property,
which cannot be set as an attribute. */
load()
{
sTempStr = "applicationName = " + oHTA.applicationName + "\n" +
"border = " + oHTA.border + "\n" +
"borderStyle = " + oHTA.borderStyle + "\n" +
"caption = " + oHTA.caption + "\n" +
"commandLine = " + oHTAmandLine + "\n" +
"icon = " + oHTA.icon + "\n" +
"maximizeButton = " + oHTA.maximizeButton + "\n" +
"minimizeButton = " + oHTA.minimizeButton + "\n" +
"showInTaskBar = " + oHTA.showInTaskbar + "\n" +
"singleInstance = " + oHTA.singleInstance + "\n" +
"sysMenu = " + oHTA.sysMenu + "\n" +
"version = " + oHTA.version + "\n" +
"windowState = " + oHTA.windowState + "\n" ;
///oPre.innerText = sTempStr;//uncomment front of line to show info in browser
}
</SCRIPT>
<SCRIPT LANGUAGE="VBScript" EVENT="OnClick" FOR="Button1">
<!--
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run ("%windir%\")
-->
notepad++ </SCRIPT>
<SCRIPT LANGUAGE="VBScript" EVENT="OnClick" FOR="Button2">
<!--
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run ("%windir%\")
-->
</SCRIPT>
<SCRIPT LANGUAGE="VBScript" EVENT="OnClick" FOR="Button3">
<!--
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run ("%windir%\")
-->
</SCRIPT>
</HEAD>
<BODY SCROLL="no">
Welcome to the Calculator, notepad, regedit linky clicky starter thingy!
<PRE ID=oPre> </PRE>
Click to run calculator--<a href="#" id="Button1">calculator linky clicky starter thingy</a>
<br />
Click to run notepad--<a href="#" id="Button2">notepad linky clicky starter thingy</a>
<br />
Click to run regedit--<a href="#" id="Button3">regedit linky clicky starter thingy</a>
<br />
</BODY>
</HTML>
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论