コピペ用です。
dim fso, path
set fso = createObject("Scripting.FileSystemObject")
path = fso.GetFile(WScript.ScriptFullName).ParentFolder.Path
dim shell
set shell = createObject("WScript.Shell")
shell.currentDirectory = path
Go to list of users who liked
More than 5 years have passed since last update.
コピペ用です。
dim fso, path
set fso = createObject("Scripting.FileSystemObject")
path = fso.GetFile(WScript.ScriptFullName).ParentFolder.Path
dim shell
set shell = createObject("WScript.Shell")
shell.currentDirectory = path
Register as a new user and use Qiita more conveniently
Go to list of users who liked