Predmet:Re: Poruka o završetku printanja, dali može?
E sad dolazi poziv.
Najbolje da napravis jednu formu koju ces podici pa moze biti i nevidljiva.
Forma je samo radi tajmera da nebi kucao kod i za tajmer.
Na on Timer forme mozes postaviti ovaj kod:
PreuzmiIzvorni kôd (Visual Basic):Private Sub Form_Timer()
Dim PrinterStatus As String
Dim JobStatus As String
Dim ErrorInfo As String
'Clear the status info for new info/status.
'Call sub to perform check.
'Debug.Print CheckPrinter(PrinterStatus, JobStatus)
'Debug.Print PrinterStatus
'Debug.Print JobStatus
'Forms!Form1.T = JobStatus & " " & vbCr & PrinterStatus
MsgBox JobStatus & " " & vbCr & PrinterStatus
End Sub
Timer interval mozes staviti napr 5000 ili mozda vise.
Printer status funkciju mozes i pobrisati ako ti netreba.
Koliko se sjecam tebi samo treba job status.
Kada sve isprobas onda ti tu treba i jedan iff da ti javlja samo ako je printer slobodan mada ni to nijje mozda dovoljno dobro nego da ti javlja samo kada ga ukljucis i kada je printer slobodan.
O tom po tom.
Prvo probaj ovo proraditi.
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.