+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ما الطريقة للتخلص من login database dialog (/showthread.php?tid=22770)
ما الطريقة للتخلص من login database dialog - KH_Alaswad - 01-12-17
بسم الله الرحمن الرحيم
اخواني اعضاء المنتدى ... السلام عليكم ورحمة الله وبركاته
عندي مشكلة تظهر عند تشغيل تقرير كريستال ريبورت ... رغم انه في البداية كان يعمل بشكل جيد
ولا ادري ماذا حصل حتى ظهرت لي هذه النافذة
login database dialog
بحثت كثيرا لحل هذه المشكلة .. ولكن اغلب الحلول والاكواد تنطبق على قاعدة بيانات SQL SERVER
مع العلم انني استخدم فيجوال بيسيك دوت نت 2012 و قاعدة بيانات اكسس 2007
شاكرا لكم حسن تعاونكم معنا
ولكم من اطيب التحايا
والسلام عليكم ورحمة الله وبركاته
اخواني اعضاء المنتدى ... السلام عليكم ورحمة الله وبركاته
عندي مشكلة تظهر عند تشغيل تقرير كريستال ريبورت ... رغم انه في البداية كان يعمل بشكل جيد
ولا ادري ماذا حصل حتى ظهرت لي هذه النافذة
login database dialog
بحثت كثيرا لحل هذه المشكلة .. ولكن اغلب الحلول والاكواد تنطبق على قاعدة بيانات SQL SERVER
مع العلم انني استخدم فيجوال بيسيك دوت نت 2012 و قاعدة بيانات اكسس 2007
شاكرا لكم حسن تعاونكم معنا
ولكم من اطيب التحايا
والسلام عليكم ورحمة الله وبركاته
RE: ما الطريقة للتخلص من login database dialog - Amir_Alzubidy - 01-12-17
السلام عليكم ورحمة الله و بركاته
ضع هذا الكود في زر الامر طباعة التقرير
بعد تعيين الداتا سيت و جملة الاستعلام
PHP كود :
Application.DoEvents()
Dim ConInfo As New CrystalDecisions.Shared.TableLogOnInfo
ConInfo.ConnectionInfo.ServerName = Application.StartupPath & "\DataBaseName.mdb"
ConInfo.ConnectionInfo.DatabaseName = "DataBaseName.mdb"
ConInfo.ConnectionInfo.UserID = "Admin"
ConInfo.ConnectionInfo.Password = "" ' كلمة المرور ان وجدت
Dim rpt1 As New Report1 'اسم التقرير
rpt1.Database.Tables(0).ApplyLogOnInfo(ConInfo)
rpt1.SetDataSource(DataSetTable)
Dim frm As New Form3 ' اسم الفورم الموجود فيه الفيور
frm.CrystalReportViewer1.ReportSource = rpt1
frm.CrystalReportViewer1.LogOnInfo(0).ConnectionInfo.Password = "" ' كلمة المرور ان وجدت
frm.ShowDialog()
RE: ما الطريقة للتخلص من login database dialog - KH_Alaswad - 05-12-17
السلام عليكم ورحمة الله
عزيز Amir_alzubidy
اشكرك على سرعة الرد
جربت الكود الذي لديك ولكن لم يجدي لي نفعا
لا اقصد انه غير فعال ولكن الخطأ هو خطائي
اكتشفت ان مربع الحوار يظهر في حالة تحديث التقرير
اما بالضغط على زر التحديث الموجود في شريط الادوات
أو الجملة التي تقوم بعملية التحديث وهي : FrmRportTable.CrystalReportViewer1.RefreshReport()
فعندما احذفها يعمل التقرير بشكل جيد حتى اضغط زر تحديث في التقرير
اكرر اعتذاري لعدم توضيحي لهذه النقطة
وارجو منكم ايجاد الحل المناسب
بارك الله فيكم وجزاكم الله الف خير
والسلام عليكم ورحمة الله
RE: ما الطريقة للتخلص من login database dialog - KH_Alaswad - 21-12-17
ما المشلكة ...... المطلوب صعب لهذه الدرجة ؟؟؟؟؟