تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ربط اداة datareport مع قاعدة البينات عن طريق الكود
#1
إخواني الكرام 
أستعمل الاداة Data Control
في ربط قاعدة البينات بالفيجوال بيسك
وعند عمل التقارير يتوجب علي ربط قاعدة البينات بالاداة DataEnvironment1
ولكنها تطلب مسار القاعدة كاملا
وهذه مشكلة في نقل البرنامج من جهاز لاخر

وسؤالي كيف اقوم بالربط عن طريق الكود لاستطيع كتابة كود مسار قاعدة البينات بالكود
لتفادي هذه المشكلة

وجزاكم الله خيرا
الرد
تم الشكر بواسطة:
#2
كود :
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\" & "data.mdb;" & "Jet OLEDB:Database Password=123;"
Set rs = New ADODB.Recordset
rs.Open " select * from Tabel1 ", cn, adOpenStatic, adLockReadOnly
DataReport1.Orientation = 2
Set DataReport1.DataSource = rs
DataReport1.Caption = "عنوان التقرير"
DataReport1.Show
إذا طُعِنتَ من الخلفِ فاعلمْ أنك في المقدمةِ
الرد
#3
جزاكم الله كل خير
ونفع الله بك
الرد
تم الشكر بواسطة: elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  احبابى فى الله ارجو المساعدة تغير ربط قاعدة البينات من (.accdb) الى mbp mhareek 6 103 14-09-18, 11:18 PM
آخر رد: mhareek
  [vb6.0] خاصية تعتمد علي Artificial intelligence عند كتابة في قاعدة بيانات اكسيس من خلال VB6 mohamed arafa 5 143 13-09-18, 03:47 AM
آخر رد: mohamed arafa
  [vb6.0] حل مشكلة حفظ الصورة في ملف وليس على قاعدة البياناتDataBase عبدالقادرعواد 2 111 11-09-18, 02:45 PM
آخر رد: عبدالقادرعواد
Question [vb6.0] كيف يتم إضهار الترقيم تلقائي المجود في قاعدة البيانات عند النقر على امر جديد ؟ Microformt 7 354 07-09-18, 06:04 PM
آخر رد: Microformt
  مثال على كيفية الطريقة لتحديث برنامجك عن طريق الإنترنت Ahmed_Mansoor 14 2,907 01-09-18, 03:41 PM
آخر رد: MicroDoha
  احتاج كود ليعرض معلومات من قاعدة بيانات اكسس لتاريخ معين حسن الغزي 7 203 18-08-18, 03:42 AM
آخر رد: عبدالله الصافي
Big Grin [vb6.0] مساعدة في خصوص اداة Winstock anoname 2 104 30-07-18, 09:26 PM
آخر رد: anoname
  تعبئة صفحة ويب عن طريق MSFlexGrid بالفيجوال بيسك 6 ربوح بوبكر 1 130 19-06-18, 02:47 AM
آخر رد: عبدالله الصافي
  إضافة التاريخ عن طريق النموذج ZaerAllail 4 171 15-06-18, 05:57 AM
آخر رد: elgokr
Question [vb6.0] هل يمكن تشفير قاعدة البيانات اكسس بحث لا يمكن فتحها من خلال برنامج Microsoft Access Microformt 0 167 05-05-18, 02:40 PM
آخر رد: Microformt

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم