方法一：
currentpath = createobject("Scripting.FileSystemObject").GetFolder(".").Path
方法二：
currentpath = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path
vbs中获取脚本当前路径的2个方法
原文：http://www.jb51.net/article/53720.htm
