PHP كود :
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports CrystalDecisions.CrystalReports
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myreport As New CrystalReport1
Dim export As New ExportOptions
Dim excelformat As New ExcelFormatOptions
Dim dfoptions As New DiskFileDestinationOptions
dfoptions.DiskFileName = "D:\Excel1.xls"
export = myreport.ExportOptions
export.ExportDestinationType = ExportDestinationType.DiskFile
export.ExportFormatType = ExportFormatType.Excel
export.ExportFormatOptions = excelformat
export.ExportDestinationOptions = dfoptions
myreport.Export()
MessageBox.Show("Operation SuccessFuly", "Export Excel", MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub
اولا يجب ان تكون منصبا cyrstal report
و تكون عامل تقرير للفورم الدي تريد عمل له عملية تصدير
ثم اضف زر في الفورم
السلام عليكم و رحمة الله تعالى و بركاته
هدا مثال على دالك
مثال شامل
اضافة بيانات
تعديل البيانات
حدف البيانات
البحث المتقدم
التنقل بين السجلات
حساب count sum avg
البحث بين تاريخين
الطباعة
تصدير البيانات الى الاكسل
تصدير البيانات الى pdf
ارجو من الله العلي القدير ان اكون قد وفقت في توصيل المعلومة
التميز و الابداع شعاري

