VBScriptsについてご教授下さい。

VBScriptsについてご教授下さい。

やりたいことは、
scripts1で名前を入力して、確認メッセージを表示させ、
scripts2を起動し、scripts1で入力した名前を出力させたいのですが、
scripts1の確認メッセージ出力後エラーが出ます。

恐らくとても低レベルな事だと思われるので、
ネット上でも解決方法が見つけられませんでした。
どこを改良すれば、要望通りいくかご教授下さい。

#scripts1
Name = InputBox("名前入力。","名前入力")
MsgBox Name
objWShell.Run "C:\scripts\script2.vbs"
WScript.Quit()

#scripts2
MsgBox "script1で入力した名前：Name

No.1 ベストアンサー 回答者： redfox63 回答日時： 2010/09/10 01:58

受け渡しには呼び出し側と受け側の双方の修正が必要です

呼び出し側は

' Script2.vbs と " の間にスペースを入力
' 実行ファイル名と引数の区別のため

objWShell.RUn "C:\Scripts\Sctipt2.vbs " & Name
とします

受け側では
WSript.Agrumentsを使って受け取ります

if WSript.Agruments.Count > 0 then
Name = WSript.Agruments(0)
End if
MsgBOx "Script1ｃで入力した名前:" & Name
といった具合です

この回答へのお礼

redfix63さん

素早く的確な回答ありがとうございました。
大変、助かりました。

お礼日時：2010/09/11 11:42