答案和修复
我有代码:
Dim stringa, stringb
stringa = WScript.Arguments.Item(0)
stringb = Split(stringa, ".")
WScript.Echo "." & Replace(stringb(UBound(stringb)),"`"," ")
在vbs文件中,加上代码:
set pth=%~dp0
set /p patha="File path? "
for /F %%G in ('cscript.exe "%pth%GETEXT.vbs" "%patha%"') do set ext=%%G
但每当我运行它时,批处理文件在到达for语句时会关闭。我将patha
设置为C:\Users\Username\somefile.txt
时效果很好,但是当我使用C:\Users\Username\Desktop\folder\fol der\f older\somefile.txt
时崩溃,是否有人有崩溃的原因或原因?
修改
通过添加//nologo
:'cscript.exe //nologo "%pth%GETEXT.vbs" "%patha%"'
答案 0 :(得分:1)
在我自己测试之后,需要cscript选项`// nologo,否则你会得到前2行横幅,如下图所示:
'cscript.exe //nologo "%pth%GETEXT.vbs" "%patha%"'