| 投稿日 | ： 2005/06/17(Fri) 13:11 |
| 投稿者 | ： だい |
| Ｅメール | ： dee_bassist@hotmail.com |
| ＵＲＬ | ： |
| タイトル | ： 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
以上、ご参考まで。