عرض مشاركة واحدة
قديم 02-Nov-2012, 09:43 AM   #7
ahmedzico
موقوف
 
تاريخ التسجيل: Aug 2007
الدولة: السعودية
المشاركات: 48
من مواضيعي  
افتراضي

السلام عليكم اخواني الاعزاء
المشكلة في استدعاء التقارير تحدث عندما تكون بيانات الــ Schema لقاعدة البيانات مخزنة بالتقرير .
فعند استدعاء التقرير يجب علينا مسح تلك البيانات ان وجدت وايضا يجب علينا المرور على جميع جداول التقرير لتمرير اسم قاعدة البيانات والمستخدم وكلمة المرور وفيما يلي الكود الخاص بتلك العملية :
كود:
Dim crxTable As CRAXDRT.DatabaseTables
For Each crxTable In crxRpt.Database.Tables
   crxTable.SetLogOnInfo "ServerOrDSNName", "DBName", "UserID", "Password"
   If InStr(crxTable.Location, ".dbo.") > 1 Then
      crxTable.Locaton = Split(crxTable.Location, ".")(2)
   End If
Next crxTable
ahmedzico غير متواجد حالياً   رد مع اقتباس