How can Programmatically exporting From crystal report to PDF

Hi
How can Programmatically exporting From crystal report to PDF using VB6.0?

I am using crystal report 8.5.

How to convert following code to PDF.

crptPur.ReportFileName = App.Path & "\rptStatus.rpt"
crptPur.Connect = "DNS =xx ; UID = xx; PWD =xx"
crptPur.Action = 1

Anyone know the code,pls reply soon.

Thanks
Sumathra

Moved from CodeBank.

See this post:
http://www.vbforums.com/showthread.php?t=363455

Hi
Where to add crystal report viewer.Pls Explain with coding.It's Very Urgent.
I need how to programmatically convert crystal report to PDF format.

Thanks
Sumathra