ready29003
June 9th, 2004, 07:05 PM
I have my vbscript working...now I just need it to play a wav file.
How do I do that? I have search and searched. Instead of "A Job is printing" I want it to play a .wav file. Please help. thanks.
Here is my script:
WARNING_THRESHOLD=0
Const PAUSETIME = 500
For i = 1 to 120000
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colPrintQueues = objWMIService.ExecQuery _
("Select * from Win32_PerfFormattedData_Spooler_PrintQueue Where Name <> '_Total'")
For Each objPrintQueue in colPrintQueues
If objPrintQueue.Jobs > WARNING_THRESHOLD Then
Wscript.Echo objPrintQueue.Name & "A Job is Printing!"
End If
NEXT
Wscript.Sleep PAUSETIME
Next
How do I do that? I have search and searched. Instead of "A Job is printing" I want it to play a .wav file. Please help. thanks.
Here is my script:
WARNING_THRESHOLD=0
Const PAUSETIME = 500
For i = 1 to 120000
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colPrintQueues = objWMIService.ExecQuery _
("Select * from Win32_PerfFormattedData_Spooler_PrintQueue Where Name <> '_Total'")
For Each objPrintQueue in colPrintQueues
If objPrintQueue.Jobs > WARNING_THRESHOLD Then
Wscript.Echo objPrintQueue.Name & "A Job is Printing!"
End If
NEXT
Wscript.Sleep PAUSETIME
Next