Solved

How I can control the Print queue?

Posted on 2001-06-17
10
208 Views
Last Modified: 2010-05-02
Dear All....

I need to build an application to control our network printer by number of pages for each user then if any user exceed his limit the program should delete his printing job.

About 70% of My application now is ready it's counting number of pages printed,saveing all the printer jobs for each user in a database.

What I need is a code to delete or cancel any printer jobs from the print queue if the owner of this job is exceeding his paper limit?

Your help is realy appreciated.









0
Comment
Question by:mohd130
  • 8
  • 2
10 Comments
 

Author Comment

by:mohd130
ID: 6199411
Please as soon as possible

Many Thanks
0
 

Author Comment

by:mohd130
ID: 6199412
Please as soon as possible

Many Thanks
0
 
LVL 7

Expert Comment

by:q2eddie
ID: 6199457
0
Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

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.

 

Author Comment

by:mohd130
ID: 6199514
thank you Q2eddie

It's a nice program but only for WNT and 2000 I need the program to run with W98.

0
 

Author Comment

by:mohd130
ID: 6199522
By using the function SetJob, In MSDN it's written that:

The SetJob function pauses, resumes, cancels, or restarts a print job on a specified printer. You can also use the SetJob function to set print job parameters, such as the print job priority and the document name.

BOOL SetJob(
  HANDLE hPrinter,  // handle to printer object
  DWORD JobId,      // print job identifier
  DWORD Level,      // specifies type of job information structure
  LPBYTE  pJob,     // pointer to job information structure
  DWORD Command     // job command value
);
 

But how I can use it in VB??

0
 
LVL 7

Accepted Solution

by:
q2eddie earned 300 total points
ID: 6199540
Hi, again.

I think the declaration is like this:

Declare Function SetJob _
    Lib "winspool.drv" _
    Alias "SetJobA" ( _
        ByVal hPrinter As Long, ByVal JobId As Long, _
        ByVal Level As Long, pJob As Byte, _
        ByVal command As Long) _
    As Long

#Links
1. "bas for 13 Windows dll's"
http://www.planet-source-code.com/xq/ASP/txtCodeId.7927/lngWId.1/qx/vb/scripts/ShowCode.htm

Bye. -e2
0
 

Author Comment

by:mohd130
ID: 6199615
I thing it's right declaration, only I have a problrm with the parameter:

PJob as byte

I define Job_info_1 as :

Type JOB_INFO_1
  JobId        As Long
  pPrinterName As Long
  pMachineName As Long
  pUserName    As Long
  pDocument    As Long
  pDatatype    As Long
  pStatus      As Long
  Status       As Long
  Priority     As Long
  Position     As Long
  TotalPages   As Long
  PagesPrinted As Long
  Submitted    As SYSTEMTIME
End Type

or do you have any example that used this function.

0
 

Author Comment

by:mohd130
ID: 6199626
I get It :):):):):):):)

I just define avariable of Byte and send it with the function argument with the commend &H4 to delete the printer job and it was success.


Many Thanks q2eddi
I'll accept your comment as answer.

Moh'd
0
 

Author Comment

by:mohd130
ID: 6199647
I get It :):):):):):):)

I just define avariable of Byte and send it with the function argument with the commend &H4 to delete the printer job and it was success.


Many Thanks q2eddi
I'll accept your comment as answer.

Moh'd
0
 

Author Comment

by:mohd130
ID: 6199649
Sorry it seems that there is something wrong??

It's not working.

Please help again
Mo
0

Featured Post

Free Tool: IP Lookup

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.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction While answering a recent question about filtering a custom class collection, I realized that this could be accomplished with very little code by using the ScriptControl (SC) library.  This article will introduce you to the SC library a…
Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…

839 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question