vbs获取自身文件名，不带格式，不带路径

Set objShell = CreateObject("WscriptShell")

strPath = WscriptScriptFullName

Set objShell = Nothing

Set objFSO = CreateObject("ScriptingFileSystemObject")

Set objFile = objFSOGetFile(strPath)

MsgBox objFSOGetFileName(objFile)

Set objFile = Nothing

Set objFSO = Nothing

这样肯定可以，使用shortpath函数获取短文件名后再处理：

Set Fso=CreateObject("ScriptingFileSystemObject")

Set WsShell=CreateObject("WScriptShell")

workingdir=WScriptScriptFullName

workingdir=StrReverse(fsogetfile(workingdir)shortpath)'我只改了这一句

count=InStr(workingdir,"\")

workingdir=StrReverse(Right(workingdir,Len(workingdir)-count))

msgbox workingdir'加上这一句可以看到获取的东西，你自己删除这一句。

'以上的是获取vbs脚本所在目录，有可能包含空格~

windir0=Fsogetspecialfolder(0)

cmdline=workingdir&"\streamsexe -d "&windir0&"\"

WsShellRun cmdline,vbHide,True

windir1=Fsogetspecialfolder(1)

cmdline=workingdir&"\streamsexe -d "&windir1&"\"

WsShellRun cmdline,vbHide,True

run处理路径空格需要加双引号，解决方法有两种

第四行首尾的双引号改为三个双引号。（两个双引号会转义为一个双引号）

弃用run改用exec，第五行改为FExec

T即可

你这样肯定不行，新建个文件夹，把你的东西全放进去， 如：

要注意，以下这几个文件，必须要在同一个文件夹内

这样，就可以使用相对路径了

另外，文件夹名，文件名，名，尽量用英文字母，不要用中文

以上就是关于vbs获取自身文件名，不带格式，不带路径全部的内容，包括:vbs获取自身文件名，不带格式，不带路径、vbs带空格路径问题、如何让vbs打开一个指定路径的文件等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！