モジュール: デスクトップ等の特別フォルダのパスの取得 Hit Counter

対象バージョン : 2000, 2002, 2003
最終更新日 : 2016/09/18 (オリジナル作成日:2004/11/01)


概 要 

デスクトップ等の Windows の特別なフォルダのフルパスを取得する方法です。

 

解 説

Windows Script Host の WshShell オブジェクトには SpecialFolders プロパティがあり、Windows に関する特別なフォルダのコレクションを返してくれますので、参照したいフォルダを指定するとパス名を返してくれます。

次の例はデスクトップのパス名を返すものです。

Public Function Sample() As String
Dim objWSHShell As Object
Set objWSHShell = CreateObject("WScript.Shell")
Sample = objWSHShell.SpecialFolders("Desktop")
Set objWSHShell = Nothing
End Function
フォルダとして、次のものが指定できます。

目次へ戻る