☰

vbs打印脚本问题

tag-icon • tag-icon script printing vbscript
vbs打印脚本问题

大家好，我在使用这个 vbs 脚本时遇到了一些问题

set shApp = CreateObject("shell.application")
currentPath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".") 
set shFolder = shApp.NameSpace( currentPath )
set files = shFolder.Items()
for each files in files

if files.name <> "2" then
    'msgbox("printing "&files.name) 
                            files.InvokeVerbEx ("Print") 

end if
next

这应该打印脚本文件夹中的所有文件，但它也会打印脚本的源代码，我不想打印 vbs 脚本本身，只想打印其他文件，我该怎么做？我做错了什么？2 是脚本本身的文件名 2.vbs

打印后如何自动关闭Word？

谢谢 ！

相关内容