print_file.vbs

Dim WshShell, fso, configFile, objReadFile, str64, strPath, ApplicationData
Dim dbWatchDir, attFolder, objShell, objFolder, colItems, objItem, dbLogDir, logFolder, doneFolder
Set WshShell = CreateObject("Wscript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
ApplicationData = WshShell.ExpandEnvironmentStrings("%APPDATA%")
Set objShell = CreateObject("Shell.Application")
path = "C:\auto-printing\file-to-print"
Set objFolder = objShell.Namespace(path)
Set colItems = objFolder.Items
doneFolder = dbWatchDir & "\" & "printed"

For Each objItem in colItems
 If Not objItem.IsFolder Then

  'WScript.Echo "Now printing: " & path & "\" & objItem.Name & " Expected: " & WScript.Arguments.Item(0)
  if path & "\" & objItem.Name = WScript.Arguments.Item(0) then
    objItem.InvokeVerbEx("Print")
  end if
  end if
Next