[リストへもどる]
一括表示

投稿時間:2004/06/29(Tue) 15:48
投稿者名:Yuuko
Eメール:
URL :
タイトル:
パスがサーバー名の場所にカレントを移動させたい。
フォルダを作成するために ChDriveとChDirを使って 指定のフォルダまでカレントを移し
MkDirでフォルダを作成しようとしています。

ところがExeがサーバー上に有り app.path で得られるパス名はドライブ部分が
\\Server\・・・のようにサーバー名になっていて ChDrive ではカレントを移動できません。

目的はフォルダを作成したいのですが なにか良い方法がありましたら教えてください。

WinXp。VB 6.0 SP3

投稿時間:2004/06/29(Tue) 16:23
投稿者名:nanashi
Eメール:
URL :
タイトル:
Re: パスがサーバー名の場所にカレントを移動させたい。
カレントを移動しなくてもMkDirでフルパス指定すれば、他のマシンにもフォルダは作れます。

投稿時間:2004/06/29(Tue) 16:45
投稿者名:dai
Eメール:dee_bassist@hotmail.com
URL :http://homepage2.nifty.com/Dee/
タイトル:
Re: パスがサーバー名の場所にカレントを移動させたい。
APIでよろしければ...

SetCurrentDirectoryでドライブとフォルダの移動が可能です。

もし、1階層づつフォルダ移動&フォルダ作成を繰り返し行っているのであれば、
代わりに、MakeSureDirectoryPathExistsで一発でフォルダを作成できます。

Declare Function SetCurrentDirectory _
    Lib "kernel32" Alias "SetCurrentDirectoryA" ( _
    ByVal CurrentDir As String) As Long

Declare Function MakeSureDirectoryPathExists _
    Lib "imagehlp.dll" (ByVal DirHelp As String) As Long

投稿時間:2004/06/29(Tue) 17:28
投稿者名:Yuuko
Eメール:
URL :
タイトル:
解決しました。
nanashiさん。ありがとうございました。
 何回か試してみて MkDirがフルパスで出来ないものと思い込んでいました。
 途中までのパスが出来ていない状態で 試したのかも知れません
 やってみると出来ました。
 
daiさん。ありがとうございました。
 MakeSureDirectoryPathExists は便利ですね。
 これを使わせていただきます。