Search  
Thursday, September 09, 2010 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
SearchForum Home
  Visual FoxPro  Rapoarte si generatoare de rapoarte  Captare erori i...
 Captare erori imprimanta
 
 1/17/2010 10:21:41 PM
User is offlineocs
31 posts


Captare erori imprimanta
 (N/A)
Cand trimit un raport la imprimanta vreau sa stiu daca aceasta comanda a fost executata cu succes. Pot gasi undeva pe forum o procedura utila ? Multumesc mult !
 1/18/2010 11:06:01 AM
User is offlineDaniel Buduru
1436 posts
1st




Re: Captare erori imprimanta
 (N/A)
Codul urmator da o serie de informatii, dintre care le poti alege pe cele de care ai nevoie:

strComputer = "."
objWMIService = GetObject("winmgmts:\\"+ strComputer + "\root\CIMV2")
colItems = objWMIService.ExecQuery("SELECT * FROM Win32_PrintJob",,48)
For Each objItem in colItems
    ? "Caption: " , objItem.Caption
    ? "DataType: " , objItem.DataType
    ? "Description: " , objItem.Description
    ? "Document: " , objItem.Document
    ? "DriverName: " , objItem.DriverName
    ? "ElapsedTime: " , objItem.ElapsedTime
    ? "HostPrintQueue: " , objItem.HostPrintQueue
    ? "InstallDate: " , objItem.InstallDate
    ? "JobId: " , objItem.JobId
    ? "JobStatus: " , objItem.JobStatus
    ? "Name: " , objItem.Name
    ? "Notify: " , objItem.Notify
    ? "Owner: " , objItem.Owner
    ? "PagesPrinted: " , objItem.PagesPrinted
    ? "Parameters: " , objItem.Parameters
    ? "PrintProcessor: " , objItem.PrintProcessor
    ? "Priority: " , objItem.Priority
    ? "Size: " , objItem.Size
    ? "StartTime: " , objItem.StartTime
    ? "Status: " , objItem.Status
    ? "StatusMask: " , objItem.StatusMask
    ? "TimeSubmitted: " , objItem.TimeSubmitted
    ? "TotalPages: " , objItem.TotalPages
    ? "UntilTime: " , objItem.UntilTime
Next


Daniel Buduru
 2/28/2010 7:14:28 AM
User is offlineocs
31 posts


Re: Captare erori imprimanta
 (N/A)
Iti multumesc mult pt. cod, a fost util.
 2/28/2010 10:27:10 AM
User is offlineGrigore Dolghin
2937 posts
www.class-software.eu
1st






Re: Captare erori imprimanta
 (N/A)
Daniel? Poti sa-mi dai si mie un link catre documentatia lui Windows Management? Vreau sa fac o clasa care sa interogheze toate alea si s-o pun pe profox.

Grigore Dolghin
Visual FoxPro MVP 2006 - 2010
Class Software
My blog
 2/28/2010 7:37:01 PM
User is offlineDaniel Buduru
1436 posts
1st




Re: Captare erori imprimanta
 (N/A)
Grig, descarca Sciptomatic 2 sau Wmi Code Creator 1, ambele de la ms.
http://www.microsoft.com/downloads/details.aspx?FamilyID=09dfc342-648b-4119-b7eb-783b0f7d1178&displaylang=en
http://www.microsoft.com/downloads/details.aspx?FamilyID=2cc30a64-ea15-4661-8da4-55bbc145c30e&displaylang=en
Au toate clasele wmi. Genereaza cod VBScript, JScript, Perl si Pithon.




Daniel Buduru
  Visual FoxPro  Rapoarte si generatoare de rapoarte  Captare erori i...

Search  Forum Home         

 Google Ads Minimize

    

Copyright 2002-2007 Profox   Terms Of Use  Privacy Statement