VBScriptについて

質問

VBScriptを利用して効率良くプログラムを作成するための
「注意点」を教えてください。できれば箇条書きでお願いします。あと、もしあれば具体例を踏まえて、その理由も教えてもらえれば嬉しいです！！
あと、VBScriptを実際に使っている例と、こんなところに使えるというのがあればこれも知っている方教えてくださ～～い！！

回答No.3

ittochan

それとも
↓とかは？

strComputer = "."

Set objCnct = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate, (Security)}!\\" & strComputer & "\root\cimv2")

Set objSink = WScript.CreateObject( "WbemScripting.SWbemSink","SINK_")
Set objWsh = WScript.CreateObject( "WScript.Shell")

flag = False

objCnct.ExecNotificationQueryAsync objSink, _
"Select * from __instanceCreationEvent within 1 Where TargetInstance isa 'Win32_Process'"

while(1)
WScript.Sleep 1000
wend

Sub SINK_OnObjectReady(objEvent, objAsyncContext)
On Error Resume Next
If LCase( objEvent.TargetInstance.Name ) = "notepad.exe" and Not flag Then
flag = True
Set IE = WScript.CreateObject("InternetExplorer.Application", "IE_")
IE.Navigate "about:blank"
IE.Visible = 0
IE.ToolBar = 0
IE.StatusBar = 0
IE.Width = 500
IE.Height = 200
IE.Left = IE.document.parentWindow.screen.width / 2 - IE.Width / 2
IE.Top = IE.document.parentWindow.screen.height / 2 - IE.Height / 2
Set objDoc = IE.Document
objDoc.open
objDoc.writeln "～(￣∇￣～)ふら(～￣∇￣)～ふら フラダンスゥ" & "<br>" & "<br>"
objDoc.writeln "<INPUT TYPE='button' VALUE='閉じる' id='btn' name=0 onclick='VBScript:btn.name=1'>"
While (IE.Busy)
Wend
IE.Visible = 1
'↓が必要ない場合はコメントにしてね
objWsh.SendKeys "%{tab}"
Do While (IE.Document.Body.All.btn.name = 0 )
If Err.Number<>0 Then Exit Do
Wscript.Sleep 100
Loop
flag = False
IE.Quit
ElseIf LCase( objEvent.TargetInstance.Name ) = "taskmgr.exe" Then
WScript.Sleep 1000
intBtn = objWsh.Popup("監視を終了しました")
WScript.Quit
End If
Err.Clear
End Sub

タスクマネージャの起動を監視します。

補足

沢山回答ありがとうございます。
このＨＴＭＬは、ＶＢｓｃｒｉｐｔを使っている例ということでしょうか・・・？？
せっかく細かく回答いただいて悪いのですが、初心者なもので全く解らないのですが。・・・（＞＜；；
あの、ＶＢscriptというのは何なのか教えていただけますでしょうか・・・（＞＜）お願いします。
これを表示することで、普通のHTMLを作るのとどう変わってくるのか、違うのかが解りません。

回答No.2

ittochan

＞Windows2000です。
↓とかは？

参考URL：

http://www.okweb.ne.jp/kotaeru.php3?q=541077

回答No.1

ittochan

モジュールとして
sub とか function とかを使用すると
他のVBSにも再利用できるのでは？

＞VBScriptを実際に使っている例
Windows98系でしょうか？
Windows2000系でしょうか？

補足

Windows2000です。