モジュール: デスクトップ等の特別フォルダのパスの取得 |
対象バージョン : 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
フォルダとして、次のものが指定できます。