مشكلة في الcrystal report مع ال سي شارب

اجابة سؤالك ستجدها في هذه المشاركة

/index.php?showtopic=122916

السلام عليكم ورحمة الله وبركاته

المشكلة الموجودة في الرابط هي نفس المشكلة التي تواجهني بالظبط

بس انا شغال سي شارب وجربت الكود ده هو تقريبا نفس الكود الموجود في الرابط

            ConnectionInfo myConnectionInfo = new ConnectionInfo();

            myConnectionInfo.DatabaseName = "EstkamaDB.mdb";
            myConnectionInfo.UserID = "sa";
            myConnectionInfo.Password = "pwd";
            TableLogOnInfos mytableloginfos = new TableLogOnInfos();
            mytableloginfos = reportViewer.LogOnInfo;//reportViewer is CrystalReportViewer
            foreach (TableLogOnInfo myTableLogOnInfo in mytableloginfos)
            {
                myTableLogOnInfo.ConnectionInfo = myConnectionInfo;
            }

ولكن بيطلع exceptionان ال mytableinfos قمته ب null

في حاجة تانية احب اوضحها:

انا عامل فورمة عليها crystalreportviewer وعامل اكتر من كريستال ريبورت بعرضهم عليه حسب قيمة معينه ببعتها للفورمة

و الكريستال ريبورت اللي انا عملها بتاخد datasource في الكود

ومش بستخدم ال reportdocument

ياريت لو تعرف حضرتك تحولي الكود الموجود في الرابط ل سي شارب لان حولت احوله ولكن المحولة فشلت

الجزء اللي مش عارف احوله ل سي شارب هو

            Dim CrTables As Tables
            Dim CrTable As Table
            Dim crReportDocument As New Crpt_All()

ال exception اللي كان بيظهر راح الحمد لله (كنت حطت الكود في مكان غلط)

بس لازال الشاشة اللي بتطلب كلمة السر و اسم المستخدم تظهر ولكن مكتوب فيها كلمة السر اللي انا كتبها في الكود وعند الضغط علي fininsh بظهر رسالة "Logon Failed. Please tyr again"

جربت اعمل check علي use integrated security ولم تفلح المحاولة

هل هناك فرق بين الكود اللي انا استخدمته و الكود الموجود في الرابط ؟؟

أخي الفاضل

ممكن ترفق لنا البرنامج أو مثال يحتوي علي نفس المشكلة حتي استطيع فحصة وشرح المشكلة بالتفصيل

السلام عليكم

قمت باخد هذا الكود من الرابط الموجود في الموضوع

        Try
            Dim con As New OleDbConnection("provider=microsoft.jet.oledb.4.0; data source = \\xp\SharedDocs\ahmad.mdb; jet oledb:database password=123wer")
            Dim crtableLogoninfos As New TableLogOnInfos()
            Dim crtableLogoninfo As New TableLogOnInfo()
            Dim crConnectionInfo As New ConnectionInfo()
            Dim CrTables As Tables
            Dim CrTable As Table
            Dim crReportDocument As New Crpt_All()
            With crConnectionInfo
                .DatabaseName = "\\xp\shareddocs\ahmad.mdb"
                .Password = "123wer"
            End With
            CrTables = crReportDocument.Database.Tables
            For Each CrTable In CrTables
                crtableLogoninfo = CrTable.LogOnInfo
                crtableLogoninfo.ConnectionInfo = crConnectionInfo
                CrTable.ApplyLogOnInfo(crtableLogoninfo)
            Next
            CrystalReportViewer1.ReportSource = crReportDocument
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
        Me.CrystalReportViewer1.RefreshReport()

ولكن ظهر لي خطأ في هذا السطر ..

       Dim crReportDocument As New Crpt_All()

ارجوا توضيح المشكلة ,, مع العلم اني قمت باستدعاء مجالات الاسماء التالية ..

Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.Data.OleDb