Prikazi cijelu temu 14.12.2010 21:38
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: Poruka o završetku printanja, dali može?
Ovaj Kod prekopiraj u drugi modul.

PreuzmiIzvorni kôd (Visual Basic):
  1. Public Declare Function lstrcpy Lib "kernel32" _
  2.    Alias "lstrcpyA" _
  3.    (ByVal lpString1 As String, _
  4.    ByVal lpString2 As String) _
  5.    As Long
  6.  
  7. Public Declare Function OpenPrinter Lib "winspool.drv" _
  8.    Alias "OpenPrinterA" _
  9.    (ByVal pPrinterName As String, _
  10.    phPrinter As Long, _
  11.    pDefault As PRINTER_DEFAULTS) _
  12.    As Long
  13.  
  14. Public Declare Function GetPrinter Lib "winspool.drv" Alias "GetPrinterA" _
  15.    (ByVal hPrinter As Long, _
  16.    ByVal Level As Long, _
  17.    pPrinter As Byte, _
  18.    ByVal cbBuf As Long, _
  19.    pcbNeeded As Long) _
  20.    As Long
  21.  
  22. Public Declare Function ClosePrinter Lib "winspool.drv" _
  23.    (ByVal hPrinter As Long) _
  24.    As Long
  25.  
  26. Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _
  27.    (Destination As Any, _
  28.    Source As Any, _
  29.    ByVal Length As Long)
  30.  
  31. Public Declare Function EnumJobs Lib "winspool.drv" Alias "EnumJobsA" _
  32.    (ByVal hPrinter As Long, _
  33.    ByVal FirstJob As Long, _
  34.    ByVal NoJobs As Long, _
  35.    ByVal Level As Long, _
  36.    pJob As Byte, _
  37.    ByVal cdBuf As Long, _
  38.    pcbNeeded As Long, _
  39.    pcReturned As Long) _
  40.    As Long
  41.    
  42. ' constants for PRINTER_DEFAULTS structure
  43. Public Const PRINTER_ACCESS_USE = &H8
  44. Public Const PRINTER_ACCESS_ADMINISTER = &H4
  45.  
  46. ' constants for DEVMODE structure
  47. Public Const CCHDEVICENAME = 32
  48. Public Const CCHFORMNAME = 32
  49.  
  50. Public Type PRINTER_DEFAULTS
  51.    pDatatype As String
  52.    pDevMode As Long
  53.    DesiredAccess As Long
  54. End Type
  55.  
  56. Public Type DEVMODE
  57.    dmDeviceName As String * CCHDEVICENAME
  58.    dmSpecVersion As Integer
  59.    dmDriverVersion As Integer
  60.    dmSize As Integer
  61.    dmDriverExtra As Integer
  62.    dmFields As Long
  63.    dmOrientation As Integer
  64.    dmPaperSize As Integer
  65.    dmPaperLength As Integer
  66.    dmPaperWidth As Integer
  67.    dmScale As Integer
  68.    dmCopies As Integer
  69.    dmDefaultSource As Integer
  70.    dmPrintQuality As Integer
  71.    dmColor As Integer
  72.    dmDuplex As Integer
  73.    dmYResolution As Integer
  74.    dmTTOption As Integer
  75.    dmCollate As Integer
  76.    dmFormName As String * CCHFORMNAME
  77.    dmLogPixels As Integer
  78.    dmBitsPerPel As Long
  79.    dmPelsWidth As Long
  80.    dmPelsHeight As Long
  81.    dmDisplayFlags As Long
  82.    dmDisplayFrequency As Long
  83. End Type
  84.  
  85. Type SYSTEMTIME
  86.    wYear As Integer
  87.    wMonth As Integer
  88.    wDayOfWeek As Integer
  89.    wDay As Integer
  90.    wHour As Integer
  91.    wMinute As Integer
  92.    wSecond As Integer
  93.    wMilliseconds As Integer
  94. End Type
  95.  
  96. Type JOB_INFO_2
  97.    JobId As Long
  98.    pPrinterName As Long
  99.    pMachineName As Long
  100.    pUserName As Long
  101.    pDocument As Long
  102.    pNotifyName As Long
  103.    pDatatype As Long
  104.    pPrintProcessor As Long
  105.    pParameters As Long
  106.    pDriverName As Long
  107.    pDevMode As Long
  108.    pStatus As Long
  109.    pSecurityDescriptor As Long
  110.    Status As Long
  111.    Priority As Long
  112.    Position As Long
  113.    StartTime As Long
  114.    UntilTime As Long
  115.    TotalPages As Long
  116.    Size As Long
  117.    Submitted As SYSTEMTIME
  118.    time As Long
  119.    PagesPrinted As Long
  120. End Type
  121.  
  122. Type PRINTER_INFO_2
  123.    pServerName As Long
  124.    pPrinterName As Long
  125.    pShareName As Long
  126.    pPortName As Long
  127.    pDriverName As Long
  128.    pComment As Long
  129.    pLocation As Long
  130.    pDevMode As Long
  131.    pSepFile As Long
  132.    pPrintProcessor As Long
  133.    pDatatype As Long
  134.    pParameters As Long
  135.    pSecurityDescriptor As Long
  136.    Attributes As Long
  137.    Priority As Long
  138.    DefaultPriority As Long
  139.    StartTime As Long
  140.    UntilTime As Long
  141.    Status As Long
  142.    cJobs As Long
  143.    AveragePPM As Long
  144. End Type
  145.  
  146. Public Const ERROR_INSUFFICIENT_BUFFER = 122
  147. Public Const PRINTER_STATUS_BUSY = &H200
  148. Public Const PRINTER_STATUS_DOOR_OPEN = &H400000
  149. Public Const PRINTER_STATUS_ERROR = &H2
  150. Public Const PRINTER_STATUS_INITIALIZING = &H8000
  151. Public Const PRINTER_STATUS_IO_ACTIVE = &H100
  152. Public Const PRINTER_STATUS_MANUAL_FEED = &H20
  153. Public Const PRINTER_STATUS_NO_TONER = &H40000
  154. Public Const PRINTER_STATUS_NOT_AVAILABLE = &H1000
  155. Public Const PRINTER_STATUS_OFFLINE = &H80
  156. Public Const PRINTER_STATUS_OUT_OF_MEMORY = &H200000
  157. Public Const PRINTER_STATUS_OUTPUT_BIN_FULL = &H800
  158. Public Const PRINTER_STATUS_PAGE_PUNT = &H80000
  159. Public Const PRINTER_STATUS_PAPER_JAM = &H8
  160. Public Const PRINTER_STATUS_PAPER_OUT = &H10
  161. Public Const PRINTER_STATUS_PAPER_PROBLEM = &H40
  162. Public Const PRINTER_STATUS_PAUSED = &H1
  163. Public Const PRINTER_STATUS_PENDING_DELETION = &H4
  164. Public Const PRINTER_STATUS_PRINTING = &H400
  165. Public Const PRINTER_STATUS_PROCESSING = &H4000
  166. Public Const PRINTER_STATUS_TONER_LOW = &H20000
  167. Public Const PRINTER_STATUS_USER_INTERVENTION = &H100000
  168. Public Const PRINTER_STATUS_WAITING = &H2000
  169. Public Const PRINTER_STATUS_WARMING_UP = &H10000
  170. Public Const JOB_STATUS_PAUSED = &H1
  171. Public Const JOB_STATUS_ERROR = &H2
  172. Public Const JOB_STATUS_DELETING = &H4
  173. Public Const JOB_STATUS_SPOOLING = &H8
  174. Public Const JOB_STATUS_PRINTING = &H10
  175. Public Const JOB_STATUS_OFFLINE = &H20
  176. Public Const JOB_STATUS_PAPEROUT = &H40
  177. Public Const JOB_STATUS_PRINTED = &H80
  178. Public Const JOB_STATUS_DELETED = &H100
  179. Public Const JOB_STATUS_BLOCKED_DEVQ = &H200
  180. Public Const JOB_STATUS_USER_INTERVENTION = &H400
  181. Public Const JOB_STATUS_RESTART = &H800
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.