如何保持脚本运行自动打印然后删除

Question

到目前为止，我得到了自动打印的一部分。

我需要在后面保留脚本运行，以查找它可以在目标文件夹上找到的任何.pdf，例如“downloads”，这样每当我下载.pdf时，它将打印，然后删除该文件。

TargetFolder = "\\USER\FOLDER" 
Set objShell = CreateObject("Shell.Application") 
Set objFolder = objShell.Namespace(TargetFolder) 
Set colItems = objFolder.Items 
For Each objItem In colItems 
objItem.InvokeVerbEx ("Print") 
Next