Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

problem with viewing the report

Status
Not open for further replies.

sudi123

Programmer
May 8, 2002
20
0
0
US
am trying to view the report using the printengine functions ...i am able to view the report but its on only a fraction of second and disappears.... any one can help me regarding this

the code i have used is ....

intMainJob = PEOpenPrintJob("c:\envelope.rpt")

ParamFieldInfo.StructSize = PE_SIZEOF_PARAMETER_FIELD_INFO


intResult = PESetAllowPromptDialog(intMainJob, 0)

intResult = PEGetNthParameterField(intMainJob, 0, ParamFieldInfo)


ParamFieldInfo.CurrentValue = "000050"
ParamFieldInfo.CurrentValueSet = True

intResult = PESetNthParameterField(intMainJob, 0, ParamFieldInfo)


intResult = PEOutputToWindow(intMainJob, "envelope", 0, 0, 1100, 1100, 0, 0)
'intResult = crPEExportToHTML(intMainJob, FormatType, "c:\amar\myfilename.html" & vbNullChar)
intResult = PEExportPrintWindow(intMainJob, False, True)
' intResult = crPEExportToDisk(mainjob, "c:\amar\myfilename.xml" & vbNullChar, FormatDLLName & vbNullChar, FormatType, 1, 1, StringDelimiter & vbNullChar, FieldDelimiter & vbNullChar)

' Start the print job
intResult = PEStartPrintJob(intMainJob, 1)

' Close the print job
PEClosePrintJob (intMainJob)
' Close the engine
PECloseEngine

i donno why this is happening ....can anybody help me with this
 
i dont have a db login.its a btreive database (btr file) and its in my pc only . am able to retreive the content of the report but i can see it for only fraction of a sec
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top