代码如下::
<html>
<kopf>
<title> tweakomatic1.0 </title>
<Hta: Anwendung
Id = "objtWeakomatic"
ApplicationName = "tweakomatic"
Scroll = "nein"
SingleInInstance = "Ja"
WindowState = "maximieren"
>
</head>
<Styles>
KÖRPER
{
Hintergrundfarbe: Tasteface;
Schriftfamilie: Helvetica;
Schriftgröße: 8pt;
Rand: 10px;
Rand-Links: 10px;
Rand-Rechts: 10px;
Randboden: 10px;
}
.Taste
{
Schriftfamilie: Helvetica;
Schriftgröße: 8pt;
}
Textbereich
{
Schriftfamilie: Arial;
Schriftgröße: 8pt;
Rand-Links: 3px;
}
wählen
{
Schriftfamilie: Arial;
Schriftgröße: 8pt;
Breite: 450px;
Rand-Links: 0px;
}
td
{
Schriftfamilie: Arial;
Schriftgröße: 10pt;
}
</style>
<Scriptuanguage = "vbscript">
Constadopenstatic = 3
Constadlockoptimistic = 3
Constaduseclient = 3
DefaultComputer = ".".
MasterFile = ""
RetrievalFile = ""
STARTHELP =.
Help2 = "selectAcategoryfromThelistofcategories.whenyoudoso, AsetoftaSssWillbedisedinthetaskarea.Clickataskandtwoscriptswilla -befragt: OneForConfiguringInformation, dieotherforRetrieinginformation."
Help3 = "ClickataskandtWoscriptswilla -beobachtet: OneForConfiguringInformation, TheotherForRetrieingInformation."