[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2004/11/08(Mon) 16:55
投稿者名:コウ
URL :
タイトル:
デスクトップのPATH取得について
はじめまして。コウと申します。
基本的なことかもしれなくて申し訳ありません。
デスクトップのPATHを取得するのにAPI
SHGetSpecialFolderPath
を使用しています。

Private Declare Function SHGetSpecialFolderPath _
    Lib "shell32" Alias "SHGetSpecialFolderPathA" (ByVal hwndowner As Long, ByVal lpszpath As String, ByVal nfolder As Long, ByVal fcreate As Long) As Long

  strpath = Space(512)
 
  i = SHGetSpecialFolderPath(0, strpath, &H10, 0)
  fol = Trim(strpath) & "\" & OUT_FILE

すると結果には
C:\Documents and Settings\xb008\デスクトップ \outfile.csv
というように”デスクトップ”の後ろに変な空白が入ってしまうのですが、どのように
すればこの空白がなくなりますでしょうか?

どうかご教授よろしくお願いします。

投稿時間:2004/11/08(Mon) 17:38
投稿者名:あさ
Eメール:
URL :
タイトル:
Re: デスクトップのPATH取得について
strpathにInStrでChr(0)を探して、
その直前までを取得する必要があったような記憶があります。

> はじめまして。コウと申します。
> 基本的なことかもしれなくて申し訳ありません。
> デスクトップのPATHを取得するのにAPI
> SHGetSpecialFolderPath
> を使用しています。
>
> Private Declare Function SHGetSpecialFolderPath _
>     Lib "shell32" Alias "SHGetSpecialFolderPathA" (ByVal hwndowner As Long, ByVal lpszpath As String, ByVal nfolder As Long, ByVal fcreate As Long) As Long
>
>   strpath = Space(512)
>  
>   i = SHGetSpecialFolderPath(0, strpath, &H10, 0)
>   fol = Trim(strpath) & "\" & OUT_FILE
>
> すると結果には
> C:\Documents and Settings\xb008\デスクトップ \outfile.csv
> というように”デスクトップ”の後ろに変な空白が入ってしまうのですが、どのように
> すればこの空白がなくなりますでしょうか?
>
> どうかご教授よろしくお願いします。

投稿時間:2004/11/08(Mon) 17:48
投稿者名:コウ
URL :
タイトル:
Re^2: デスクトップのPATH取得について
やはりそれがベストですかね。
ありがとうございました。やってみます。