Dr-Freak on Jul 17, 2010, in GermanVB for ApplicationsEntwicklung
VBScript, mehrere Dateien auf einem speziellen Windows-Drucker ausgeben (Druckername im Script angeben)
'PrintAll.vbs sSourceFolder = "P:\" If WScript.Arguments.Count Then sSourceFolder = WScript.Arguments(0) End If Set fso = CreateObject("Scripting.FileSystemObject") If Not fso.FolderExists(sSourceFolder) Then WScript.Echo "Ordner " &