Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
'Receive command line arguments set args = WScript.Arguments num = args.Count if num = 0 then WScript.Echo "There is no document to print!" WScript.Quit 1 end if 'Print each document using MS Word for k = 0 to num - 1 Set objWord = CreateObject("Word.Application") Set objDoc = objWord.Documents.Open("C:\" & args.Item(k)) objDoc.PrintOut objWord.Quit next Wscript.Sleep 25000 'Delete temporary files from local drive for k = 0 to num - 1 Set fso = CreateObject("Scripting.FileSystemObject") Set aFile = fso.GetFile("C:\" & args.Item(k)) aFile.Delete next
Join the community of 500,000 technology professionals and ask your questions.