Failed to load database information.
تظهر هذه الرسالة عند تنفيذ البرنامج وهذا هو الكود الذي استخدمه في البرنامج....!
ds.Clear()
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = haider.mdb"
cn.Open()
sql = "select * from course where c_no = " + TextBox1.Text
dtadpt = New OleDbDataAdapter(sql, cn)
dtadpt.Fill(ds, "tra1")
sql = " select * from trained where c_no = " + TextBox1.Text
dtadpt = New OleDbDataAdapter(sql, cn)
dtadpt.Fill(ds, "tra")
rpt.SetDataSource(ds)
CrystalReportViewer1.ReportSource = rpt
CrystalReportViewer1.RefreshReport()
cn.Close()
يا إسراء،
هناك عدم تطابق لأسماء الجداول:
تم الاستعلام من الجدول course ولكن اسم tra1 مختلف
ونفس الشي للجدول trained والاسم tra
لو وضعت المشروع ممكن تنحل المشكلة
هذا تعديل لآسماء الجداول ممكن يفيد
PHP كود :
ds.Clear()
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = haider.mdb"
cn.Open()
sql = "select * from course where c_no = " + TextBox1.Text
dtadpt = New OleDbDataAdapter(sql, cn)
dtadpt.Fill(ds, "course")
sql = " select * from trained where c_no = " + TextBox1.Text
dtadpt = New OleDbDataAdapter(sql, cn)
dtadpt.Fill(ds, "trained")
rpt.SetDataSource(ds)
CrystalReportViewer1.ReportSource = rpt
CrystalReportViewer1.RefreshReport()
cn.Close()
[
attachment=10875][
attachment=10875]
PHP كود :
ds.Clear()
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = haider.mdb"
cn.Open()
sql = "select * from course where c_no = " + TextBox1.Text
dtadpt = New OleDbDataAdapter(sql, cn)
dtadpt.Fill(ds, "course")
sql = " select * from trained where c_no = " + TextBox1.Text
dtadpt = New OleDbDataAdapter(sql, cn)
dtadpt.Fill(ds, "trained")
rpt.SetDataSource(ds)
CrystalReportViewer1.ReportSource = rpt
CrystalReportViewer1.RefreshReport()
cn.Close()
السلام عليكم لكن اخي ليس المشكلة في الكود... لأن الكود كان مثل ماتفضلت وأشرت..لكن اعتقد في التقرير هل يمكنك أن تساعدني اكثر
[
attachment=10875]
rpt1.setdatasource(datagridview1.datasource)
او
rpt1.setdatasource(table)
بس أنا لا أستعمل الداتاقريد فيو ....وكذلك إذا استعملت الجملة الثانيةبيكون لازم استعمل جدول واحد وانا عندي اكثر من جدوال....!
هناك خطا انت مادام تعمل بالكريستل ريبورت الاول ليش تنشا اوبجكت وتعطيلوا الدتا سورس
هذا خطا
rpt1.setdatasource(ds)
جرب هذا
Dim crystal As New CrystalReport1
crystal.SetDataSource(ds)
CrystalReportViewer1.ReportSource = crystal
CrystalReportViewer1.Refresh()
ليس واضح اخي
سؤال هل انت مغير الاعدادات الافتراضية للكريستال ريبورت
ثانيا جرب عدم الدمج بين (ds) جرب انشاء متغيرين
[
attachment=10881]
نعم لقد ظهرت لي الرسالة التي في الصورة وتتبعت المسار ونقلت الملف من مكانه لكن حاليا أعدته وهاهي الرسالة تظهر من جديد