投稿日 | : 2005/06/17(Fri) 13:11 |
投稿者 | : だい |
Eメール | : dee_bassist@hotmail.com |
URL | : |
タイトル | : Re^4: フォルダ作成について |
過去ログの補足ですが(^^;、
MakeSureDirectoryPathExistsを使用される際には、
フォルダ名に全角文字を含む場合、正常に作成されないケースがあります。
お使いの環境で動作検証を充分に行ってください。
また、
SHCreateDirectoryExに関しては、利用可能なOSにもご留意ください。
SHCreateDirectoryExは、
Windows NT/2000: Windows 2000 以降
Windows 95/98/Me: WinMe
MakeSureDirectoryPathExistsは、
Windows NT/2000: Windows NT 3.1 以降
Windows 95/98/Me: Windows 95 以降
Private Declare Function SHCreateDirectoryEx Lib "shell32" _
Alias "SHCreateDirectoryExA" ( _
ByVal hwnd As Long, _
ByVal pszPath As String, _
ByVal psa As Any) As Long
Private Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" ( _
ByVal DirHelp As String) As Long
Function createfoldertest()
SHCreateDirectoryEx 0&, "D:\てんぷ\2バイト文字は大丈夫かな\TEST", 0&
MakeSureDirectoryPathExists "D:\てんぷその2\2バイト文字は大丈夫かな\TEST"
End Function
以上、ご参考まで。