VBscriptを実行するとコマンドコンソールウインドーが表示されてしまう

質問

VBscript初心者です。
VBscripでinputbox入力したものをmsgboxで表示するプログラムを
自作して、仕事で使用していました。

option explicit
dim strmessage,y
strmessage=("メッセージを入力してください。","メッセージ入力")
if isempty(strmessage) then wscipt.quit
y=msgbox("""" & strmessage & vbcrlf & "このメッセージを警告にしますか？",vbquestion + vbyesno,"メッセージ確認")
if y=vbyes then
msgbox strmessage,vbexclamation,"メッセージ"
else msgbox strmessage,vbinformation,"メッセージ"
end if

今日から、これを実行したときにコマンドコンソールのウインドーが
表示されるようになってしまいました。
このウインドウーを表示させなくするにはどうしたらよいでしょうか？

また、Wscript.echoを使用したときにウインドーが表示されません。

初心者の私にもわかりやす回答をよろしくおねがいいたします。

回答No.2

OMEGAT

既定のスクリプトホストがcscriptに設定されているとそうなります。
コマンドプロンプトで、以下のコマンドを実行し、既定のスクリプトホストをwscriptに設定してみてください。

cscript //h:wscript

お礼

OMEGATさま
早速ありがとうございました。
解決できました。
しかし、なぜ既定のスクリプトホストがcscriptに設定されてしまったのか
なぞです。

回答No.1

A88No8

こんにちは
　Windows XP ユーザです。
　たぶん、ショートカットを作ったのではないかと原因を想定してアドヴァイスをします。

　ショートカットのプロパティで「実行時の大きさ」を選択指定する項目があります。
　そこで「通常のウィンドウ」から「最小化」に変更してみて下さい。