hamideh_m
یک شنبه 18 مهر 1389, 03:17 صبح
اشكال اين دستور چيه
DataGridView1.Rows(Val(dr(0).ToString)).DefaultCel lStyle.BackColor = Color.Coral
و اشكال اين
Dim report As New ezj
Dim exportoption As New ExportOptions()
Dim pdfexportformatoptions As New PdfRtfWordFormatOptions()
Dim diskdestinationoptions As New DiskFileDestinationOptions
exportoption.ExportFormatType = ExportFormatType.PortableDocFormat
pdfexportformatoptions.FirstPageNumber = 1
pdfexportformatoptions.LastPageNumber = 5
pdfexportformatoptions.UsePageRange = True
exportoption.ExportFormatOptions = pdfexportformatoptions
exportoption.ExportDestinationType = ExportDestinationType.DiskFile
diskdestinationoptions.DiskFileName = "c:\report-zoj.pdf"
exportoption.DestinationOptions = diskdestinationoptions
report.Export(exportoption)
report.Close()
از exportoption ارور ميگيره
DataGridView1.Rows(Val(dr(0).ToString)).DefaultCel lStyle.BackColor = Color.Coral
و اشكال اين
Dim report As New ezj
Dim exportoption As New ExportOptions()
Dim pdfexportformatoptions As New PdfRtfWordFormatOptions()
Dim diskdestinationoptions As New DiskFileDestinationOptions
exportoption.ExportFormatType = ExportFormatType.PortableDocFormat
pdfexportformatoptions.FirstPageNumber = 1
pdfexportformatoptions.LastPageNumber = 5
pdfexportformatoptions.UsePageRange = True
exportoption.ExportFormatOptions = pdfexportformatoptions
exportoption.ExportDestinationType = ExportDestinationType.DiskFile
diskdestinationoptions.DiskFileName = "c:\report-zoj.pdf"
exportoption.DestinationOptions = diskdestinationoptions
report.Export(exportoption)
report.Close()
از exportoption ارور ميگيره