@Unah

i need to print a emf file
i'm using this code, and i get a message saying "no print job...." when printing to acrobat distiler. Can you help me?

' ***************
' Win32 API Calls
'***************
private Declare Function GetProfileString Lib "kernel32" Alias "GetProfileStringA" (byval lpAppName as string, byval lpKeyName as Any, byval lpDefault as string, byval lpReturnedString asstring, byval nSize as Long) as Long
private Declare Function OpenPrinter Lib "winspool.drv" Alias "OpenPrinterA" (byval pPrinterName as string, phPrn as Long, pDefault as Any) as Long
private DeclareFunction StartDocPrinter Lib "winspool.drv" Alias "StartDocPrinterA" (byval hPrn as Long, byval Level as Long, pDocInfo as DOC_INFO_1) as Long
private Declare Function StartPagePrinter Lib"winspool.drv" (byval hPrn as Long) as Long
private Declare Function EndPagePrinter Lib "winspool.drv" (byval hPrn as Long) as Long
private Declare Function EndDocPrinter Lib "winspool.drv" (byval hPrn asLong) as Long
private Declare Function ClosePrinter Lib "winspool.drv" (byval hPrn as Long) as Long
private Declare Function GetEnhMetaFile Lib "gdi32" Alias "GetEnhMetaFileA" (byval lpszMetaFile asstring) as Long
private Declare Function GetEnhMetaFileHeader Lib "gdi32" (byval hEMF as Long, byval cbBuffer as Long, lpemh as ENHMETAHEADER) as Long
private Declare Function PlayEnhMetaFile Lib"gdi32" (byval hDC as Long, byval hEMF as Long, lpRect as Any) as Long
' *********************************************
' Estrutura requerida pelo GetEnhMetaFileHeader
'*********************************************
private Type RECT
LEFT as Long
Top as Long
Right as Long
Bottom as Long
End Type

private Type SIZEL
cx as Long
cy as Long
End Type

private Type ENHMETAHEADER
iType as LongnSize as Long
rclBounds as RECT
rclFrame as RECT
dSignature as Long
nVersion as Long
nBytes as Long
nRecords as Long
nHandles as Integer
sReserved as Integer
nDescription as Long...