تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] طريقة الاتصال بقاعدة بيانات اكسس 2003 محمية برقم سري لتشغيل تقرير معمول بالاكيف ريبو
#1
السلام عليكم اساتذتي الافاضل ورحمة الله
عملت رقم سري لقاعدة البيانات من نوع اكسس 2003 وهي تعمل بصورة صحيحة وشغالة عند فتح البرنامج ولكن واجهتني مشكلة عند فتح التقرير
التقرير معمول بالاكتف ريبورت طبعا عند الغاء كلمة المرور لقاعدة البيانات التقرير يعمل بشكل صحيح وهذا هو الكود في الاسفل يرجى التعديل عليه (كلمة المرور هي : 123 )

هذا كود الاتصال بقاعدة البيانات للبرنامج :
Set db = OpenDatabase(".\compny.mdb", False, False, ";pwd=123")

وهذا الكود لفتح التقرير الذي اريد التعديل عليه لفتحه بعد وضع كلمة مرور لقاعدة البيانات :

Private Sub Command14_Click()
Unload Report1
Report1.DataControl1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\compny.mdb;Persist Security Info=False"
If Text4.Text = "" Then
Report1.DataControl1.Source = "Select * From [tbl1]"
Else
Report1.DataControl1.Source = "Select * From [tbl1] WHERE [IDnum] = " & Trim(Text4.Text)
End If
Report1.Show
End Sub

مع وافر التحايا
الرد }}}
تم الشكر بواسطة:
#2
الحمد لله والفضل لله جل وعلا توصلت الى الحل وهذا هو الكود :
Unload Report1
Report1.DataControl1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDBBig Grinatabase Password=123; Data Source=" & App.Path & "\compny.mdb"
If Text4.Text = "" Then
Report1.DataControl1.Source = "Select * From [tbl1]"
Else
Report1.DataControl1.Source = "Select * From [tbl1] WHERE [IDnum] = " & Trim(Text4.Text)
End If
Report1.Show
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل بيانات عمود DataGridView دفعة واحدة مصمم هاوي 0 73 05-03-24, 02:40 PM
آخر رد: مصمم هاوي
  [vb6.0] طريقة تصدير بيانات الداتا ريبورت datareport لصيغة pdf hamada salah90 6 1,479 19-01-24, 07:59 PM
آخر رد: hamada salah90
  اريد طريقة تصدير بيانات الاكتف ريبورت لملف اكسل scsi7000 0 299 03-11-23, 10:41 AM
آخر رد: scsi7000
Question [vb6.0] كيف اجعل تقرير برنامجي تكون السجلات ملونه مثل الذي في الصورة التأليه ؟ Microformt 0 276 29-10-23, 07:37 PM
آخر رد: Microformt
  اريد طريقة لطباعة مستند مكون من صفحتين علي ورقة وحدة من الجهتين scsi7000 2 371 25-10-23, 07:38 PM
آخر رد: scsi7000
  نقل بيانات الجدول الى جدول اخر بعد تجميع البيانات haithamelareny 1 359 10-08-23, 11:54 PM
آخر رد: ahmedabdelaliem
Question [vb6.0] هل يوجد كود لضغط وإصلاح قاعدة البيانات ، أعني قاعدة بيانات Access؟ Microformt 1 455 27-07-23, 08:33 PM
آخر رد: Taha Okla
  [vb6.0] كود ربط قاعدة بيانات اكسيس 2010 بالفيجوال بيسك6 وادي العوضي 4 553 21-07-23, 12:11 AM
آخر رد: وادي العوضي
  [vb6.0] المساعدة في تشغيل استعلام الحاقي في تبويب الاستعلامات في قاعدة بيانات اكسيس من واجهة وادي العوضي 6 601 09-07-23, 12:44 AM
آخر رد: وادي العوضي
  [سؤال] كود تشغيل استعلامين معمولين في قاعدة بيانات اكسس من واجهة البرنامج من خلال زر امر وادي العوضي 16 1,450 04-07-23, 03:26 PM
آخر رد: وادي العوضي

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


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