Program Filesの情報を取り出す
Program Filesの情報を取り出す
フォルダの一覧を取得する(takanaoさん)
Set shell = CreateObject("WScript.Shell") Set process = shell.Environment("PROCESS") programFiles = process("ProgramFiles") msgbox programFiles
フォルダの中身(トップレベルまで)取得する(takanaoさん)
Set fso = CreateObject("Scripting.FileSystemObject") Set programFilesFolder = fso.GetFolder(programFiles) For Each folder in programFilesFolder.SubFolders WScript.Echo folder.Name Next
最終更新時間:2007年08月03日 16時14分43秒