检测打印机待打印文档（Detect printer to print document）.docVIP

检测打印机待打印文档（Detect printer to print document） 306, how to know that a network printer still has several copies of the report waiting to be printed? 307, how to download a page in Internet every day in the picture to replace the desktop design? 308. How do I call the control panel of the system? 309, how to completely simulate the systems control panel? 310, how do you set the MsgBox automatically shut down after a certain period of time and if there is no response? 306, how to know that a network printer still has several copies of the report waiting to be printed? When we want to print reports, if the printer is the local printer, of course, the report will be printed out immediately, anyway, the printer is only you are using it! But if you are in a large number of companies or enterprises, often a lot of people have to share a printer, and the printer is not necessarily placed in the eyes of what can be seen! When you will report into a network printer, the printer may not see, you have to put the printer place to take a report at this time, you are most concerned about, no report is printed, if not, there are a few not print statements ahead of your report? Heres a program that lets you know how many copies of a network printer are waiting to print As your application throws out the report, you can tell your User how many of his statements are in line! Add the following declarations and modules in the.Bas file: Constants Definition Public Const CCHDEVICENAME = 32 Public Const CCHFORMNAME = 32 Public, Const, PRINTER_ACCESS_ADMINISTER = H4 Public, Const, PRINTER_ACCESS_USE = H8 Types Definition Public Type DEVMODE DmDeviceName, As, String * CCHDEVICENAME DmSpecVersion As Integer DmDriverVersion As Integer DmSize As Integer DmDriverExtra As Integer DmFields As Long DmOrientation As Integer DmPaperSize As Integer DmPaperLength As Integer DmPaperWidth As Integer DmScale As Integer DmCopies As Integer DmDefaultSource As Integer DmPrintQuality As Integer DmColor As Integ