+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم اسئلة التقارير والطباعة تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=71)
+--- الموضوع : [سؤال] كيفية تمرير الباسوورد للكريستال عن طريق الكود قاعدة بيانات اكسس بجميع الاصدارات (/showthread.php?tid=2733)
كيفية تمرير الباسوورد للكريستال عن طريق الكود قاعدة بيانات اكسس بجميع الاصدارات - Abu_hamzah - 02-05-14
السلام عليكم ورحمة الله وبركاته
لدي كود يقوم بتمرير الباسوورد للكريستال يعمل بشكل سليم على قاعدة بيانات SqlServer
ولكن عند استخدام الكود مع بعض التعديلات لكي يعمل مع الاكسس تأتي شاشة طلب الباسوورد , فهل يوجد حل ؟
هذا الكود المستخدم :
PHP كود :
Dim CTableLogInfo As New TableLogOnInfo
Dim ConnInfo As New ConnectionInfo
filename = ReportFileName
ConnInfo.ServerName = dbName
ConnInfo.DatabaseName = dbName
ConnInfo.Password = dbPassword
CRpt.Load(filename)
CRpt.Refresh()
For Each CTable As Table In CRpt.Database.Tables
CTable.LogOnInfo.ConnectionInfo = ConnInfo
CTableLogInfo = CTable.LogOnInfo
CTableLogInfo.ReportName = CRpt.Name
CTableLogInfo.TableName = CTable.Name
CTable.ApplyLogOnInfo(CTableLogInfo)
Next
CRViewer.ReportSource = CRpt