复制代码 代码如下:
<html>
<inVBScript,
'*JScript,orPerl--thatretrieveinstancesof
'*WMImanagedresourcesthataredescribedby
'*dynamicclassesintheWMIschema(alsoknownas
'*theCommonInformationModelorCIM).
'*
'*Dependencies:Therearetwo(thatwe'reawareofanyway):
'*1.YoumustrunScriptomaticonaWMI-enabled
'*computer.AnyWindowsoperatingsystemthathas
'*thenumber2000orhigherinitsname,orXP,
'*isasafebet.
'*2.Andtosuccessfullyrunthescriptsgenerated
'*withScriptomatic,well,youmustbe
'*administrator.Afterall,thesearesystem
'*administrationscripts.Thispieceofadviceis
'*especiallyimportantifyoutakeadvantageof
'*themultiplecomputerfeaturethat'snewto
'*thisversionofthetool.
'*
'*Copyright(C)2003MicrosoftCorporation
'*
'********************************************************************
-->
<title>ScriptomaticVersion2.0byTheMicrosoftScriptingGuys</title>
<HTA:APPLICATION
ID="objScriptomatic"
APPLICATIONNAME="Scriptomatic"
SCROLL="no"
SINGLEINSTANCE="yes"
WINDOWSTATE="normal"
>
<head>
<style>
BODY
{
background-color:buttonface;
font-family:Helvetica;
font-size:8pt;
margin-top:2px;
margin-left:8px;
margin-right:3px;
margin-bottom:3px;
}
.button
{
font-family:Helvetica;
font-size:8pt;
width:40px;
}
.wmibutton
{
font-family:Helvetica;
font-size:8pt;
width:70px;
}
.bigger_button
{
font-family:Helvetica;
font-size:8pt;
width:80px;
}
textarea
{
font-family:Arial;
font-size:8pt;
margin-left:3px;
margin-right:3px;
}
select
{
font-family:Arial;
font-size:8pt;
width:450px;
margin-left:0px;
}
</style>
'********************************************************************
'*BEGIN_SCRIPT
'********************************************************************
<scriptlanguage="vbscript"></script>
'****************************************************************************
'*END_SCRIPT
'****************************************************************************
</head>
'****************************************************************************
'*OurHTMLlayout-theonlythingofnotehereisthatwheneachofthe
'*buttonsispressed(clicked),theironClickattributescausesthe
'*appropriatesubroutinetobecalled
'****************************************************************************
<body>
<tableWIDTH="700"BORDER=1>
<----------->
<>
<----------->
<tr>
<tdVALIGN=TOPWIDTH=700COLSPAN=2>
<tableBORDER=0>
<tr>
<tdWIDTH=300VALIGN=TOP><divstyle="font-size:8pt;">WMINamespace</div><spanid="wmi_namespaces"></span></td>
<tdWIDTH=400VALIGN=TOP><divstyle="font-size:8pt;">WMIClass</div><spanid="wmi_classes"></span></td>
</tr>
</table>
</td>
</tr>
<------------>
<>
<------------>
<tr>
<tdVALIGN=TOPWIDTH=700COLSPAN=2>
<tableBORDER=0>
<tr>
<td><inputid=runbuttonclass="button"type="button"value="Run"name="run_button"onClick="RunScript()"></td>
<td><inputid=cimv2buttonclass="button"type="button"value="CIMv2"name="cimv2_button"onClick="SetNamespaceToCIMV2()"></td>
<td><inputid=wmisourcebuttonclass="wmibutton"type="button"value="WMISource"name="wmisource_button"onClick="SetWMIRepository()"title="ChangecomputerusedforWMInamespaceandclassinformation"></td>
<td><inputid=openbuttonclass="button"type="button"value="Open"name="open_button"onClick="OpenScript()"></td>
<td><inputid=savebuttonclass="button"type="button"value="Save"name="save_button"onClick="SaveScript()"></td>
<td><inputid=quitbuttonclass="button"type="button"value="Quit"name="quit_button"onClick="QuitScript()"></td>
</tr>
</table>
</td>
</tr>
<----------->
<>
<----------->
<tr>
<tdWIDTH=600>
<divID=code_header></div>
<divid="code"name="code"></div>
</td>
<tdWIDTH=100VALIGN=TOP>
<table>
<tr><thCOLSPAN=2style="font-size:8pt;"><hr>Language<hr></th></tr>
<tr><td><spanstyle="font-size:8pt;">VBScript</span></td><td><inputtype="radio"name="language"onClick="ComposeVBScriptCode"CHECKED></td><tr>
<tr><td><spanstyle="font-size:8pt;">Perl</span></td><td><inputtype="radio"name="language"onClick="ComposePerlCode"></td></tr>
<tr><td><spanstyle="font-size:8pt;">JScript</span></td><td><inputtype="radio"name="language"onClick="ComposeJScriptCode"></td></tr>
<tr><td><spanstyle="font-size:8pt;">Python</span></td><td><inputtype="radio"name="language"onClick="ComposePythonCode"></td></tr>
<tr><thCOLSPAN=2style="font-size:8pt;"><hr>OutputFormat<hr></th></tr>
<tr><td><spanstyle="font-size:8pt;">CommandPrompt</span></td><td><inputtype="radio"name="output"onClick="SetOutputFormat('CmdLine')"CHECKED></td><tr>
<tr><td><spanstyle="font-size:8pt;">PlainText</span></td><td><inputtype="radio"name="output"onClick="SetOutputFormat('PlainText')"></td></tr>
<tr><td><spanstyle="font-size:8pt;">HTML</span></td><td><inputtype="radio"name="output"onClick="SetOutputFormat('HTML')"></td></tr>
<tr><td><spanstyle="font-size:8pt;">Excel</span></td><td><inputtype="radio"name="output"onClick="SetOutputFormat('Excel')"></td></tr>
<tr><td><spanstyle="font-size:8pt;">XML</span></td><td><inputtype="radio"name="output"onClick="SetOutputFormat('XML')"></td></tr>
</table>
</td>
</tr>
<------------>
<>
<------------>
<tr>
<td>
<div>
<divstyle="font-size:8pt;"TITLE="YoucanentermultiplecomputernamesorIPaddresseshere.Separatethemwithcommas...">TargetComputers(comma-delimited):</div>
<textareaID=target_computersCOLS=120ROWS=5></textarea>
</div>
</td>
<tdalign="center">
<inputclass="bigger_button"TYPE=BUTTONVALUE="UpdateScript"TITLE="ModifiestheScripttorunagainstallTargetComputers"onClick="ComposeCode()">
<inputclass="bigger_button"TYPE=BUTTONVALUE="LoadFromFile"onClick="LoadComputerNamesFromFile()">
</td>
</tr>
</table>
</body>
</html>
使用说明：里面包含ScriptomaticV2.hta与hta_helpomatic.hta两个文件。
Scriptomatic打包下载
【ScriptomaticV2.hta学习脚本好工具】相关文章：
★ javascript操作xml(增删改查)例子代码hta版
★ XMLHttps