16/09/09 23:00:23.10 98GAymOz0.net
>>220
適当なファイル名で～.vbsとかに
Set fso = CreateObject("Scripting.FileSystemObject")
dirname = Afxw.Extract("$W")
If fso.FolderExists(dirname) = False Then
fso.Createfolder(dirname)
End If
Afxw.Exec "&cd " + dirname + "\"
Afxw.MesOk
の内容で書き込んで
&script そのファイル名.vbs
を登録