HSPTV!掲示板

複数のアプリを終了するのにVBスクリプトを使っているのですが
HSP上から他のアプリの終了を行いたいです。
そこでHSPでVBスクリプトを実行させるために

	newcom objVBsc, "ScriptControl"
	objVBsc("Language")="VBScript"

	vbs = {"
	Sub vbcmd()
		Set Locator = WScript.CreateObject("WbemScripting.SWbemLocator")
		Set Service = Locator.ConnectServer
		Set oProcs = Service.ExecQuery _
		("Select * From Win32_Process Where Description=""プログラム名""")
		For Each oProc In oProcs
		oProc.Terminate
		Next
		End Sub
	"}
	objVBsc->"AddCode" vbs
	objVBsc->"Run" "vbcmd"
	delcom objVBsc

プログラム名は○○○.exe

上記を実行しても反応がありません。
VBスクリプトの内容をそのまま書いただけではダメなのでしょうか。

特にVBスクリプトに拘っているのではありません、
上記で終了させられたら簡単だっただけです。
※強制終了による弊害は無視です。

>>上記を実行しても反応がありません。

　どうやって実行させたか非常に疑問だが、”何か”反応は有ったと思う。

　それとも、”パソコン自体の反応”が無くなったのか？

>>書く人の気持ちも考えて文章を読めば
>>反応がなかったってそれだけの意味だと思いますけど
本人の回答がないのに勝手に決めるのはどうかと。。。。
想うだけならいいと想いますがね

>本人の回答がないのに勝手に決めるのはどうかと。。。。
勝手に決めるもなにも、質問文から察するに普通の解釈なのではないでしょうか。
少なくとも私はこの質問者さんの意図を汲み取ることは容易に感じました。

書き方が悪く申し訳ありません。
どうやって実行させたのか・・・
コンパイル＋実行　としました。
VBスクリプトファイルからであれば、ダブルクリックで強制終了させられるので
それをHSPから行いたいと思いました。
VBスクリプトをexecで実行すれば問題なく可能ですが、
他のアプリを起動させるスクリプトに「終了」も追加しようと考えてのことでした。

execで起動させたプログラムの停止なので、使っているVBスクリプトを利用できたら簡単だったためです。

VBスクリプトをHSPのスクリプトにそのまま書いてもダメでしょうね。
HSPのスクリプトはHSPの文法に従って書かないと。ほらそこの文字列とか。

ありがとうございました。
VBスクリプトの構成を変更して目的通りに指定プログラムを終了させられました。