تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[مثال] ربط قاعدة بيانات محمية في تقرير كرستال عن طريق الكود
#1
Shocked 

.rar   CrystalReports 8.rar (الحجم : 240.4 ك ب / التحميلات : 41)
.rar   CrystalReports 10.rar (الحجم : 94.58 ك ب / التحميلات : 39)
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
اخواني عندي ملف قاعدة بيانات من نوع mdb  وبها جدول للمنتجات وهي محمية بكلمة مرور والمشكلة أني لم استطيع ربط هذا الملف المحمي عن طريق الكود .
استطيع ربطه وهوا غير محمي ارجو منكم المساعدة في تعديل المشروع المرفق مع هذا الموضوع كي استطيع ربط ملف قاعدة البيانات المحمي بكرستال ريبورت عن طريق الكود.
حيث أني املك الاصدار Crystal Report 8.5 من البرنامج
يوجد مع المرفقات ملفان ملف باسم CrystalReports 8 وهو الملف الي يحوي المشروع المراد تعديلة . كلمة مرور قاعدة البيانات هي (123).

اما الملف الأخر باسم CrystalReports 10 ويحتوي على مثال نقلتة من احد المواقع به بعض الامثلة لربط قواعد البيانت على CrystalReports 10 عند طريق الكود عدة طرق لربط قواعد البيانات ولاكن المكتبات لم تعمل على  Crystal Report 8.5 .
ارجوا منكم إن استطعتوا تعديل المثال كي يعمل على الاصدار Crystal Report 8.5 .
من ناحية ربط المكتبات وتعريف الكائنات على الاصدار 8.5

ولكم مني جزيل الشكر
ALHUMIDI Soft
الرد
تم الشكر بواسطة:
#2
وعليك السلام ورحمة الله وبركاته

إستبدل كود حدث الـ Form_Load للفورم2 بهذا الكود :

PHP كود :
On Error Resume Next
Call Form_Resize
Dim ReportFile 
As String
ReportFile 
App.Path "\DATA1\2016\ASNAF1.rpt"
Set m_Report m_Application.OpenReport(ReportFile)
m_Report.Database.Tables(1).SetLogOnInfo "p2sodbc.dll""ASNAF.mdb""Admin""123"
m_Report.Database.Tables(1).Location App.Path "\data1\2016\ASNAF.mdb"
CRViewer1.ReportSource m_Report
CRViewer1
.ViewReport
Screen
.MousePointer vbDefault
CRViewer1
.Zoom 1 
[/php]

ماتم إضافته هو هذا السطر :

PHP كود :
m_Report.Database.Tables(1).SetLogOnInfo "p2sodbc.dll""ASNAF.mdb""Admin""123" 
الرد
#3
(26-09-16, 01:01 AM)Ahmed_Mansoor كتب : وعليك السلام ورحمة الله وبركاته


ماتم إضافته هو هذا السطر :

PHP كود :
m_Report.Database.Tables(1).SetLogOnInfo "p2sodbc.dll""ASNAF.mdb""Admin""123" 

شكراً  أخي هذا حل المشكلة جزاك الله الف خير

Heart Heart Heart Heart Blush Blush
الله يبارك فيك أخي أحمد
ALHUMIDI Soft
الرد
تم الشكر بواسطة: Ahmed_Mansoor , ahmedabdelaliem


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية نسخ قاعدة بيانات جديدة وباسم في هذا المثال khezzani 5 74 15-10-18, 10:55 PM
آخر رد: سعداء
  مشكلة عندي مشكلة في فتح قاعدة بيانات اكسس 2000 بيتم التعامل مع اكسس 97 fathyfarag122 3 57 03-10-18, 02:54 AM
آخر رد: عبدالله الصافي
  سؤال عن كيفية ربط برنامج فجوال بيسي6 بقاعدة بيانات على النت amrou 4 175 19-09-18, 08:37 PM
آخر رد: amrou
  احبابى فى الله ارجو المساعدة تغير ربط قاعدة البينات من (.accdb) الى mbp mhareek 6 137 14-09-18, 11:18 PM
آخر رد: mhareek
  [vb6.0] خاصية تعتمد علي Artificial intelligence عند كتابة في قاعدة بيانات اكسيس من خلال VB6 mohamed arafa 5 159 13-09-18, 03:47 AM
آخر رد: mohamed arafa
  [سؤال] كيفية استخراج تقرير ملف PDF من برنامج مصمم بالفيجوال بيسك 6 mohamed arafa 4 145 11-09-18, 05:10 PM
آخر رد: mohamed arafa
  [vb6.0] حل مشكلة حفظ الصورة في ملف وليس على قاعدة البياناتDataBase عبدالقادرعواد 2 146 11-09-18, 02:45 PM
آخر رد: عبدالقادرعواد
Question [vb6.0] كيف يتم إضهار الترقيم تلقائي المجود في قاعدة البيانات عند النقر على امر جديد ؟ Microformt 7 397 07-09-18, 06:04 PM
آخر رد: Microformt
  مثال على كيفية الطريقة لتحديث برنامجك عن طريق الإنترنت Ahmed_Mansoor 14 3,152 01-09-18, 03:41 PM
آخر رد: MicroDoha
  استيراد بيانات من اكسس إلى إكسل والعكس مصمم هاوي 9 324 22-08-18, 07:49 PM
آخر رد: Ahmed_Mansoor

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


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