复制代码 代码如下:
html>
!--
'********************************************************************
'*
'* File: Scriptomatic.hta
'* Author: The Scripting Guys, Microsoft Corporation
'* Created: August 2002
'* Modified: July 2003 (1.0 -> 1.1 -> 2.0)
'* March 2004
'* Version: 2.0
'*
'* Description: Scriptomatic is a WMI Scripting learning tool
'* that creates example WMI scripts -- in VBScript,
'* JScript, or Perl -- that retrieve instances of
'* WMI managed resources that are described by
'* dynamic classes in the WMI schema (also known as
'* the Common Information Model or CIM).
'*
'* Dependencies: There are two (that we're aware of anyway):
'* 1. You must run Scriptomatic on a WMI-enabled
'* computer. Any Windows operating system that has
'* the number 2000 or higher in its name, or XP,
'* is a safe bet.
'* 2. And to successfully run the scripts generated
'* with Scriptomatic, well, you must be
'* administrator. After all, these are system
'* administration scripts. This piece of advice is
'* especially important if you take advantage of
'* the multiple computer feature that's new to
'* this version of the tool.
'*
'* Copyright (C) 2003 Microsoft Corporation
'*
'********************************************************************
-->
title>Scriptomatic Version 2.0 by The Microsoft Scripting Guys/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
'********************************************************************
script language="vbscript"> /script>
'****************************************************************************
'* END_SCRIPT
'****************************************************************************
/head>
'****************************************************************************
'* Our HTML layout - the only thing of note here is that when each of the
'* buttons is pressed (clicked), their onClick attributes causes the
'* appropriate subroutine to be called
'****************************************************************************
body>
table WIDTH="700" BORDER=1>
!--------------->
!-- first row -->
!--------------->
tr>
td VALIGN=TOP WIDTH=700 COLSPAN=2>
table BORDER=0>
tr>
td WIDTH=300 VALIGN=TOP>div style="font-size:8pt;">WMI Namespace/div>span id="wmi_namespaces">/span>/td>
td WIDTH=400 VALIGN=TOP>div style="font-size:8pt;">WMI Class /div>span id="wmi_classes">/span>/td>
/tr>
/table>
/td>
/tr>
!---------------->
!-- second row -->
!---------------->
tr>
td VALIGN=TOP WIDTH=700 COLSPAN=2>
table BORDER=0>
tr>
td>input id=runbutton class="button" type="button" value="Run" name="run_button" onClick="RunScript()">/td>
td>input id=cimv2button class="button" type="button" value="CIMv2" name="cimv2_button" onClick="SetNamespaceToCIMV2()">/td>
td>input id=wmisourcebutton class="wmibutton" type="button" value="WMI Source" name="wmisource_button" onClick="SetWMIRepository()" title="Change computer used for WMI namespace and class information">/td>
td>input id=openbutton class="button" type="button" value="Open" name="open_button" onClick="OpenScript()">/td>
td>input id=savebutton class="button" type="button" value="Save" name="save_button" onClick="SaveScript()">/td>
td>input id=quitbutton class="button" type="button" value="Quit" name="quit_button" onClick="QuitScript()">/td>
/tr>
/table>
/td>
/tr>
!--------------->
!-- third row -->
!--------------->
tr>
td WIDTH=600>
div ID=code_header>/div>
div id="code" name="code">/div>
/td>
td WIDTH=100 VALIGN=TOP>
table>
tr>th COLSPAN=2 style="font-size:8pt;">hr> Language hr>/th>/tr>
tr>td>span style="font-size:8pt;">VBScript/span>/td>td>input type="radio" name="language" onClick="ComposeVBScriptCode" CHECKED>/td>tr>
tr>td>span style="font-size:8pt;">Perl /span>/td>td>input type="radio" name="language" onClick="ComposePerlCode">/td>/tr>
tr>td>span style="font-size:8pt;">JScript /span>/td>td>input type="radio" name="language" onClick="ComposeJScriptCode">/td>/tr>
tr>td>span style="font-size:8pt;">Python /span>/td>td>input type="radio" name="language" onClick="ComposePythonCode">/td>/tr>
tr>th COLSPAN=2 style="font-size:8pt;">hr> Output Format hr>/th>/tr>
tr>td>span style="font-size:8pt;">Command Prompt/span>/td>td>input type="radio" name="output" onClick="SetOutputFormat('CmdLine')" CHECKED>/td>tr>
tr>td>span style="font-size:8pt;">Plain Text /span>/td>td>input type="radio" name="output" onClick="SetOutputFormat('PlainText')">/td>/tr>
tr>td>span style="font-size:8pt;">HTML /span>/td>td>input type="radio" name="output" onClick="SetOutputFormat('HTML')">/td>/tr>
tr>td>span style="font-size:8pt;">Excel /span>/td>td>input type="radio" name="output" onClick="SetOutputFormat('Excel')">/td>/tr>
tr>td>span style="font-size:8pt;">XML /span>/td>td>input type="radio" name="output" onClick="SetOutputFormat('XML')">/td>/tr>
/table>
/td>
/tr>
!---------------->
!-- fourth row -->
!---------------->
tr>
td>
div>
div style="font-size:8pt;" TITLE="You can enter multiple computer names or IP addresses here. Separate them with commas...">Target Computers (comma-delimited):/div>
textarea ID=target_computers COLS=120 ROWS=5>/textarea>
/div>
/td>
td align="center">
input class="bigger_button" TYPE=BUTTON VALUE="Update Script" TITLE="Modifies the Script to run against all Target Computers" onClick="ComposeCode()">
input class="bigger_button" TYPE=BUTTON VALUE="Load From File" onClick="LoadComputerNamesFromFile()">
/td>
/tr>
/table>
/body>
/html>
使用说明：里面包含ScriptomaticV2.hta与hta_helpomatic.hta两个文件。
Scriptomatic打包下载
咨 询 客 服