crystal report و Connection string

سلام
برنامه من با Vb.net‌هست و ميخوام گزارشات اون را با crystal report موجود در vb.net بسازم
در برنامه براي اتصال به ديتا بيس از Connection string استفاده كردم حالا بايد چطور با اين نوع اتصال به ديتا بيس با crystal report كار كنم
لطفا راهنمايي بفرماييد
ممنون

يك تجربه شخصي :
به هيچ عنوان كانكشن را به كريستال ندهيد و همواره منبع داده كريستال ريپورت را بر روي ديتاست تنظيم كنيد و اين ديتاست را از طريق برنامه پر كرده و سپس به كريستال بفرستيد .

راه حل شما :

کد:

---


using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using CrystalDecisions.CrystalReports.Engine ;
using CrystalDecisions.Shared;
using System.Windows.Forms;

namespace BackSell
{
    public  class SetCrystalConnection
    {

        private static void AssignTableConnection(CrystalDecisions.CrystalReports.Engine.Table table, ConnectionInfo connection)
        {
            // Cache the logon info block
            TableLogOnInfo logOnInfo = table.LogOnInfo;

            // Set the connection
            logOnInfo.ConnectionInfo = connection;

            // Apply the connection to the table!
            table.ApplyLogOnInfo(logOnInfo);
        }


        public  ReportDocument  AssignConnection(ReportDocument  repDoc)
        {
            try
            {
                ConnectionInfo connection = new ConnectionInfo();
                connection.IntegratedSecurity = true;
                connection.ServerName = "192.168.1.10\\sqlexpress";
                connection.DatabaseName = "hesab88";


                // First we assign the connection to all tables in the main report
                //
                foreach (Table table in repDoc.Database.Tables)
                {
                    AssignTableConnection(table, connection);
                }

                // Now loop through all the sections and its objects to do the same for the subreports
                //
                foreach (Section section in repDoc.ReportDefinition.Sections)
                {
                    // In each section we need to loop through all the reporting objects
                    foreach (ReportObject reportObject in section.ReportObjects)
                    {
                        if (reportObject.Kind == ReportObjectKind.SubreportObject)
                        {
                            SubreportObject subReport = (SubreportObject)reportObject;
                            ReportDocument subDocument = subReport.OpenSubreport(subReport.SubreportName);

                            foreach (Table table in subDocument.Database.Tables)
                            {
                                AssignTableConnection(table, connection);
                            }
                        }
                    }
                }
            }

            catch (Exception ex)
            {
                MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            return repDoc;
        }
    }
}

---

خيلي ممنون از شما
پياده سازي همين مورد در vb.net چطوري هست اگه ممكنه كمك بفرماييد

يك سؤال ديگه اين كه اگر بخواهيم يك فرم را با ديتا بيس پرينت بگيريم بايد چكار كنيم مثلاً (چاپ يك فاكتور يا يك نسخه با استفاده از داده‌هاي ديتابيس)
ممنون

خيلي ممنون از شما

معادل همين مورد با vb.net چطور هست؟

نقل قول:

---

نوشته شده توسط شفيعي [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

خيلي ممنون از شما

معادل همين مورد با vb.net چطور هست؟

---

كد ها واضح است و نيازي به تخصص براي تبديل ندارد ، فقط بايد خودتان كمي وقت بگذاريد