Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


3701 / 76735 ←次へ | 前へ→

【78663】Re:SetCurrentDirectoryでネットワーク上のディレクトリをカレントリにしたい
発言  アソビン  - 16/12/12(月) 9:17 -

引用なし
パスワード
   ▼亀マスター さん:
お返事ありがとうございます。こちらからのお返事が遅くなりまして申し訳ありません。

>本来設定したいディレクトリでSetCurrentDirectoryした後、指定したところと違うパスがカレントディレクトリになっているということでしょうか、それとも、SetCurrentDirectory自体がエラーになるということでしょうか。

説明が足りず申し訳ありません。
私のソースで言うと、
「Fpath = "\\xx.○○○.co.jp\fss2-g$\"  '←ここまでなら開ける」
このパスを設定している時は確かにこのディレクトリがカレントになります。
しかし、ソース上でコメントアウトしている、
「'Fpath = "\\xx.○○○.co.jp\fss2-g$\01037\vlyk\Process\" '←本当はここをカレントにしたい」
を設定すると、その前にカレントになっているディレクトリが表示されます。
例えばうまく動いてくれないので色々と試していたとして、一つ前に試しにデスクトップをカレントに設定してみた場合等は、上記の設定をしても前回同様にデスクトップがカレントとして開いてしまいます。


>指定したディレクトリにアクセス権限がないとか…いうことはなさそうですね、手動でそこまで辿れるようですし。

はい。手動では辿り着きますのでアクセス権限の問題はありません。


>SetCurrentDirectoryが機能しない理由はよくわかりませんが、代替手段としてWindows Scripting HostのCurrentDirectoryプロパティを試してみてはどうでしょうか。
>
>CreateObject("WScript.Shell").CurrentDirectory = "ディレクトリパス"
>
>で同じことができるはずです。

試してみました。すると「実行時エラー'70': 書き込みできません。」のエラーが出ます。
ソース上で「ここまでなら開ける」となっているパスを設定するとこちらは正しくカレントに設定されますのでやはりクラスタリングされているサーバには辿り着けないということでしょうか。
ちなみに、書き込みできませんのエラーが出たウィンドウでヘルプを見ると「アクセスが拒否されました(エラー70)」という項目が開くので、これは明らかにアクセス拒否されているということですよね…

何か方法はないのでしょうか…うーん…

0 hits

【78661】SetCurrentDirectoryでネットワーク上のディレクトリをカレントリにしたい アソビン 16/12/9(金) 14:24 質問[未読]
【78662】Re:SetCurrentDirectoryでネットワーク上の... 亀マスター 16/12/9(金) 21:28 発言[未読]
【78663】Re:SetCurrentDirectoryでネットワーク上の... アソビン 16/12/12(月) 9:17 発言[未読]
【78664】Re:SetCurrentDirectoryでネットワーク上の... 亀マスター 16/12/12(月) 19:48 発言[未読]
【78678】Re:SetCurrentDirectoryでネットワーク上の... アソビン 16/12/16(金) 12:19 お礼[未読]

3701 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free