Question

VBS脚本运行时总是提示找不到被操作文件

做了一个VBS脚本，附加在右键菜单里用来将doc文档批量转换为pdf格式，但是每次转换时虽然正确生成了可正确读取的pdf文档，但是总是提示未找到需要转换的文件（实际上是转换成功的）。问题出在哪里？
下面是用于转换doc的脚本代码，以及原始用于转换ppt文件脚本代码（由此代码修改成doc转换代码，但是这个VBS脚本在运行过程中并不会提示错误）

DOC转换代码
------------------------------------------------------------------
Dim ls_FileSet objArgs = WScript.Arguments if objArgs.Count<1 thenreturnend ifls_File = objArgs(0) ls_new = left(ls_File, len(ls_File) -4 )+".pdf"Set wordApp = CreateObject("Word.Application") wordApp.Visible = True Set MyPress = wordApp.Documents.Open( ls_file) MyPress.Saveas ls_new,17wordApp.Quit
--------------------------------------------------------------
PPT转换代码
-------------------------------------------------------------
Dim ls_FileSet objArgs = WScript.Arguments '命令行参数if objArgs.Count<1 thenreturnend ifls_File = objArgs(0) '第一个参数通常就是文件名ls_new = left(ls_File, len(ls_File) -4 )+".pdf"Set pptApp = CreateObject("PowerPoint.Application") '申明调用函数pptApp.Visible = True '在使用PowerPoint时,一定要有此句，否则会出错Set MyPress = pptApp.Presentations.Open( ls_file) 'Presentation 对象MyPress.Saveas ls_new,32pptApp.Quit ------------------------------------------------------------
DOCX也是可以转换成功的。

Answer 1

return 。。。。vbs里有return吗？

追问

PPT那个也有，用的很好

追答

把MyPress.Saveas ls_new,17 换成 MyPress.Saveas ls_new
测试通过 运行环境 office2007 wscript5.1
================
另 你这个所谓的转换只是改了个名字而已 内容根本没变化

追问

改掉17当然只是改名字了，不去掉17，转换出的文档用adobe reader是可读的，确实是pdf格式而非doc，你试一下

追答

加上17 就报错了。。。可能是我的office版本不对吧