目次

ここは何?

VisualBasicScript?と言うか、Windows Scripting Hostと言うか、まぁ、 その辺の必要とする度にGoogle検索するような小ネタのメモ。

cmd.exeを複数個上げる

ダブルクリックして実行したら、cmd.exeをあげる個数を入れる popup dialogが出てくるので、数を入れたら、その分 DOS窓が あがる。入力値のvalidationは当然しない。w
Set sh = CreateObject("wScript.Shell")
x = inputbox("How many cmd.exe are invoked?")
for i = 1 to x
	sh.Run "cmd.exe /K dir", 1, False
next
  • wScript.Shell.Runの引数
    • 1番目は実行するコマンド名
    • 2番目はwindow style。デフォは1。その他は下の表の通り。
    • 3番目はこのRun methodを実行したとき、子プロの終了をwaitするか。デフォはしない(False)
定数名と値意味
Const WshHide? = 0非表示
Const WshNormalFocus? = 1通常サイズ
Const WshMinimizedFocus? = 2最小化
Const WshMaximizedFocus? = 3最大化
Const WshNormalNoFocus? = 4通常サイズかつ非フォーカス
Const WshMinimizedNoFocus? = 6最小化かつ非フォーカス
その他1扱い

Last-modified: 2006-03-17 14:53:42