<![CDATA[
<HTA:APPLICATION
ID="oHTA"
APPLICATIONNAME="myApp"
BORDER="thick|dialog window|thin|none"
BORDERSTYLE="normal|complex|raised|static|sunken"
CAPTION="yes"
CONTEXTMENU="no"
ICON="graphics/face01.ico"
MAXIMIZEBUTTON="yes"
MINIMIZEBUTTON="yes"
SCROLL="no"
SELECTION="no"
SHOWINTASKBAR="no"
SINGLEINSTANCE="no"
SYSMENU="yes"
VERSION="1.0"
WINDOWSTATE="normal|maximize|minimize"
>
the selection=no will not allow selecting text and will override the contextmenu
with a no (copyright protection stuff).
<SCRIPT>
function fnShowProp() {
sTempStr = "applicationName = " + oHTA.applicationName + "\n" +
"border = " + oHTA.border + "\n" +
"borderStyle = " + oHTA.borderStyle + "\n" +
"caption = " + oHTA.caption + "\n" +
"commandLine = " + oHTA.commandLine + "\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;
}
</SCRIPT>
---------------------------------------------------
Sample Script
<html>
<head>
<title>HTA Application</title>
<HTA:APPLICATION ID="oHTA" />
<style>
BODY {
background-color: buttonface;
font-family: Helvetica;
font-size: 8pt;
margin-top: 10px;
margin-left: 10px;
margin-right: 10px;
margin-bottom: 10px;
}
.button {
font-family: Helvetica;
font-size: 8pt;
width: 35px;
}
textarea {
font-family: arial;
font-size: 8pt;
margin-left: 3px;
}
select {
font-family: arial;
font-size: 8pt;
width: 450px;
margin-left: 0px;
}
</style>
<script language="vbscript">
...
</script>
</head>
<body>
<table>
<td>
<span id="wmi_classes"> </span>
<input id=runbutton class="button" type="button" value="Run" name="run_button" onClick="RunScript()">
<input id=savebutton class="button" type="button" value="Save" name="save_button" onClick="SaveScript()">
<input id=openbutton class="button" type="button" value="Open" name="open_button" onClick="OpenScript()">
<input id=quitbutton class="button" type="button" value="Quit" name="quit_button" onClick="QuitScript()">
<div ID=code_header></div>
<div id="code"></div>
</td>
</tr>
</table>
</body>
</html>
]]>