آژانس هواپیمایی
pop up

كريستال ريپورت

شروع موضوع توسط حميدرضا ‏13 آگوست 2005 در انجمن Visual Basic 6

  1. حميدرضا

    حميدرضا کاربر تازه وارد

    تاریخ عضویت:
    ‏6 آگوست 2005
    نوشته ها:
    5
    تشکر شده:
    0
    سلام
    من با كريستال ريپورت 9 ميخواهم كار بكنم
    با بانك sql , vb6
    منتها نمي توانم بانك را وصل كنم
    ايا كسي است مرا ياري دهد
     
  2. حميدرضا

    حميدرضا کاربر تازه وارد

    تاریخ عضویت:
    ‏6 آگوست 2005
    نوشته ها:
    5
    تشکر شده:
    0
    سلام
    in_chan_nafar زحمت كشيده بود و اموزش بسيار خوبي براي كريستال 10 نوشته بود ولي من چون كريستال 9
    داشتم نتوانستم نمونه هاي انرا اجرا كنم
    Private Sub Command1_Click()
    Dim crApp As New CRAXDRT.Application
    Dim crRept As New CRAXDRT.Report
    Set crRept = crApp.OpenReport(App.Path & "\Report1.Rpt") 'Report File
    CrystalActiveXReportViewer1.ReportSource = crRept
    CrystalActiveXReportViewer1.ViewReport
    Set crApp = Nothing
    Set crRept = Nothing
    End Sub
    در كريستال 9 خط 5 و 6 را خطا ميگيرد
    ايا كشي هست مرا ياري كند