تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مشكلة في اتصال كريستال ريبورت
#1
Photo 
لدي برنامج بنظام vb.net وتقارير كريستال ريبورت يعمل على شبكة داخلية مكونة من 5 اجهزة
التقارير تطبع بدون مشاكل في 3 اجهزة وفي جهازين تظهر المشكلة التالية

ارجو الإفادة لمن لديه حل للمشكلة 
 وهذه دالة الإتصال 


كود :
Public Sub LogOn(ByVal poReport As CrystalDecisions.CrystalReports.Engine.ReportDocument, ByVal strServer As String, ByVal strTable As String, ByVal strUsername As String, ByVal strPassword As String)


       Dim loConnInfo As New CrystalDecisions.Shared.ConnectionInfo
       loConnInfo.ServerName = strServer.ToString.Trim

       'MsgBox(strServer)
       loConnInfo.DatabaseName = strTable.ToString.Trim


       loConnInfo.UserID = strUsername.ToString.Trim

       'MsgBox(strUsername)
       loConnInfo.Password = strPassword.ToString.Trim

       ' MsgBox(strPassword)
       loConnInfo.IntegratedSecurity = False

       Dim loTables As Tables
       Dim loTable As CrystalDecisions.CrystalReports.Engine.Table
       Dim loTableLogonInfo As CrystalDecisions.Shared.TableLogOnInfo
       loTables = poReport.Database.Tables

       For Each loTable In loTables
           loTableLogonInfo = loTable.LogOnInfo
           loTableLogonInfo.ConnectionInfo.UserID = strUsername
           loTableLogonInfo.ConnectionInfo.Password = strPassword
           loTableLogonInfo.ConnectionInfo.ServerName = strServer
           loTableLogonInfo.ConnectionInfo.DatabaseName = strTable
           loTableLogonInfo.ConnectionInfo.IntegratedSecurity = False
           loTable.ApplyLogOnInfo(loTableLogonInfo)

       Next
   End Sub


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#2
إستبدل الاتصال المباشر بالإتصال بـ DataSet
[صورة مرفقة: images?q=tbn:ANd9GcT72OLJW7D1E5QW-HUeWeJ...TGoNeg2jnQ]
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تغيير لون السجلات في كريستال ريبورت بناء على قيم معينة صالح عبدالله 4 360 16-02-24, 09:30 PM
آخر رد: صالح عبدالله
Question [VB.NET] هل يمكن الحصول على رابط تحميل كريستال ربوت يعمل مع فجوال البيسك نت ؟ Microformt 0 533 22-11-23, 07:58 PM
آخر رد: Microformt
  [سؤال] مشكلة في طباعة footer تقرير كريستال ريبورت i1982 5 1,127 29-03-23, 11:30 PM
آخر رد: sanyor77
Question [سؤال] سوال في الكرستال ريبورت ali bajmmal 0 381 17-02-23, 03:34 PM
آخر رد: ali bajmmal
  دالة التفقيط داخل الكريستال ريبورت bassant 6 5,438 08-02-23, 04:26 PM
آخر رد: kezzat
  هل يوجد امكانية لعمل متغير لكل record في الكريستال ريبورت bassant 0 644 29-11-22, 12:47 PM
آخر رد: bassant
  كيفية تصميم التقرير الكريستال ريبورت للطباعة على جانبين الورقة (وش وظهر) bassant 3 932 22-11-22, 12:22 PM
آخر رد: Taha Okla
  [VB.NET] مشكلة التقرير لا يعمل على الاجهزة الاخرى New Pro 2 1,584 15-12-21, 05:55 PM
آخر رد: New Pro
  كريستال ريبورت Lathe1 0 1,216 01-10-21, 12:34 PM
آخر رد: Lathe1
  تغيير اتجاة صفحة الكريستال ريبورت aftfm 0 1,608 06-09-21, 05:34 PM
آخر رد: aftfm

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


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