LoginSignup
1
3

More than 5 years have passed since last update.

カレントディレクトリを変更する

Posted at

コピペ用です。

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
1
3
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
1
3