PDA

View Full Version : سوال: خروجی گرفتن مستقیم فایل PDF از Stimulsoft



vbblog
جمعه 04 مرداد 1392, 14:28 عصر
سلام به دوستان عزیز
سوال: چطور میتونم از داخل برنامه بدون این که گزارش رو نشون بدم خروجی PDF ازش بگیرم (از Stimulsoft)
ممنونم

farbod61
شنبه 05 مرداد 1392, 06:53 صبح
سلام
از این کد استفاده کن


این رو اول فرم بنویس
Imports Stimulsoft.Report.Export
این کدها رو هم داخل رویداد کلیک باتن

Me.StiReport1.RegData(Me.Ghaleb)

Dim pdfexport As StiPdfExportService = New StiPdfExportService
StiReport1.Render()
Dim s As New SaveFileDialog
s.Filter = "Adob PDF |*.pdf"
If s.ShowDialog = Windows.Forms.DialogResult.OK Then
pdfexport.ExportPdf(StiReport1, s.FileName.Replace(".pdf", "") & ".pdf")
End If
MsgBox("ذخیره فایل با موفقیت انجام شد")

vbblog
شنبه 05 مرداد 1392, 14:02 عصر
سلام
از این کد استفاده کن


این رو اول فرم بنویس
Imports Stimulsoft.Report.Export
این کدها رو هم داخل رویداد کلیک باتن

Me.StiReport1.RegData(Me.Ghaleb)

Dim pdfexport As StiPdfExportService = New StiPdfExportService
StiReport1.Render()
Dim s As New SaveFileDialog
s.Filter = "Adob PDF |*.pdf"
If s.ShowDialog = Windows.Forms.DialogResult.OK Then
pdfexport.ExportPdf(StiReport1, s.FileName.Replace(".pdf", "") & ".pdf")
End If
MsgBox("ذخیره فایل با موفقیت انجام شد")


سلام از این که لطف کردید و جواب دادید ممنونم. درست کار میکنه مرسی.