crPEExportToDisk的定义哪位大侠知道啊?我就这点分了!急!急!在线等候!多谢!
输出rec文件时候调用crPEExportToDisk没有错误返回,可是没有输出rec文件,我怀疑
是它的定义有问题,可是实验了几回还是没有输出rec文件,那位打侠帮忙啊,急!
Dim Result As Integer
Dim FormatDLLName As String
Dim formatType As Long
FormatDLLName = "u2frec.dll"
formatType = crUXFRecordType
Result = crPEExportToDisk(printJob, Oupput_Path + Chr(0), FormatDLLName + Chr(0), formatType, 0, 0, "", "")
'定义在这里,但我觉得crPEExportToDisk 的定义好象有问题
Const crUXFRecordType = 500
Declare Function crPEExportToDisk Lib "crwrap32.dll" (printJob As Integer, fileName As String, FormatDLLName As String, _
formatType As Long, useNumFormat As Long, useDateFormat As Long, StringDelimiter As String, FieldDelimiter As String) As Integer