منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم ورحمة الله وبركاته ...

برنامجي يعمل على قاعدة بيانات اكسس 2010 وكود الاستدعاء للقاعدة هو :

[HTML]My.Settings.con = "Provider = Microsoft.ACE.OLEDB.12.0; Data Source = " & OpenFileDialog1.FileName & ";Jet OLEDBatabase Password = " & dbpass & ";Persist Security Info=False;"
[/HTML]

اما بالنسبة لتقرير الكريستال فتم ادراج الباث الخاص بقاعدة البيانات الموجودة على جهازي ..

المشكلة :

كيف يمكنني استبدال الباث المستخدم لربط التقرير مع قاعدة البيانات الحالي , بطريقة اخرى تناسب عمل البرنامج وخاصة واني سأقوم بتحزيمه وكذلك سأستدعي قاعدة البيانات وهي موجود كملف ( شير ) على جهاز السيرفر ؟؟ .

دمتم بالف خير ...

[ATTACH=CONFIG]2919[/ATTACH]

اني اربط الريبورت بالملف قاعدة البيانات من خلال هذه الطريقة المبينة في الصورة اعلاه ...
الان اضافة هذا الكود ( CrystalRpoertViewer.ReportSource = "Path.rpt"; ) لايضر مع عرض بيانات القاعدة على الريبورت بدون استخدام طريقة الباريمتر ؟

علما اني حاليا مستخدم الكود الحالي :

إقتباس : Dim SQLstr As String = "SELECT * FROM Table2 WHERE CourseNamei LIKE '%" & KryptonLabel1.Text & "%'"
Conn.Open()
Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn)
DataAdapter1.Fill(DataSet1, "Table2")
Conn.Close()

rp.SetDataSource(DataSet1)
CrystalReportViewer1.ReportSource = rp

شي ثاني ... انا حينما سأعمل له تحزيم , كيف يمكنني حينما انصب البرنامج على اي جهاز سيتعرف بشكل مباشر على باث ملف قاعدة البيانات الموجودة في الشير نيتوورك ؟