人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

VBSの質問です
1.vbs
***************************
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Run "a.vbs"
***************************
を実行した場合はa.vbsがきちんと動くのですが
2.vbs
***************************
dim wsh
Dim objFileSystemObject
Dim strFolderPath
set wsh = CreateObject( "WScript.Shell" )
Set objFileSystemObject = WScript.CreateObject("Scripting.FileSystemObject")
strFolderPath = objFileSystemObject.GetFolder(".").Path
wsh.CurrentDirectory = strFolderPath & "\hoge"
wsh.Run "b.vbs"
Set WSHShell = WScript.CreateObject("WScript.Shell")
WSHShell.Run "a.vbs"
***************************
のようにb.vbsの処理を入れると
hogeフォルダの中にb.vbsがきちんと入っているにもかかわらず
a.vbsが見つかりませんというエラーが出てきます
どこを修正すれば
2.vbsでa.vbsが動くようになるのでしょうか?

●質問者: takanii
●カテゴリ:コンピュータ
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● うぃんど
●300ポイント ベストアンサー

wshとWSHShellはそれぞれ独立しているため、
wsh.CurrentDirectoryという指示はwshに対してのみ有効となり、
WSHShell.CurrentDirectoryは変更されません。

WSHShellのカレントディレクトリも変更したいのであれば、
WSHShell.CurrentDirectory = strFolderPath & "\hoge" も入れましょう。

関連質問

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ