منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مشكلة عدم اتصال التقرير crystalreport
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
سلام عليكم

التقرير لا يتصل بالكود

كود :
  If Sqlconn.State = ConnectionState.Open Then
                    Sqlconn.Close()
                End If
                Sqlconn.Open()
                Dim sql As String = " SELECT  * FROM Table  WHERE age " & Colog.Text.Trim & " " & (T4.Text.Trim) & " "
                Dim comm As New SqlCommand(sql, Sqlconn)
                Dim da As New SqlDataAdapter(comm)
                Dim dt As New DataTable
                da.Fill(dt)
                Dim rpt As New reportcrystal
                rpt.SetDataSource(dt)
                rpt.SetDatabaseLogon("admin", "1234", "serverday, "dbempl")
                Form_REPORTING.CrystalReportViewer.ReportSource = rpt
                Form_REPORTING.Show()

عند استعراض العارض يطلب معلومات الاتصال و معلومات اتصال موجوده ؟؟





شوو المشكلة ؟
كود :
If Sqlconn.State = ConnectionState.Open Then
                   Sqlconn.Close()
else
             Sqlconn.Open()
              End If
               Dim sql As String = " SELECT  * FROM Table  WHERE age " & Colog.Text.Trim & " " & (T4.Text.Trim) & " "
               Dim comm As New SqlCommand(sql, Sqlconn)
               Dim da As New SqlDataAdapter(comm)
               Dim dt As New DataTable
               da.Fill(dt)
               Dim rpt As New reportcrystal,fr as new Form_REPORTING
               rpt.SetDataSource(dt)
               fr.CrystalReportViewer.ReportSource = rpt
               fr.Show()
جرب هذا الكود
(18-08-17, 11:32 PM)محمود بكرى كتب : [ -> ]
كود :
If Sqlconn.State = ConnectionState.Open Then
                   Sqlconn.Close()
else
             Sqlconn.Open()
              End If
               Dim sql As String = " SELECT  * FROM Table  WHERE age " & Colog.Text.Trim & " " & (T4.Text.Trim) & " "
               Dim comm As New SqlCommand(sql, Sqlconn)
               Dim da As New SqlDataAdapter(comm)
               Dim dt As New DataTable
               da.Fill(dt)
               Dim rpt As New reportcrystal,fr as new Form_REPORTING
               rpt.SetDataSource(dt)
               fr.CrystalReportViewer.ReportSource = rpt
               fr.Show()
جرب هذا الكود

نفس المشكلة اخ محمود
ممكن ترفق المشروع لان مشكلتك صادفتي فى بدايتى و الطريقة بالكود حلت معي
(19-08-17, 02:15 AM)محمود بكرى كتب : [ -> ]ممكن ترفق المشروع لان مشكلتك صادفتي فى بدايتى و الطريقة بالكود حلت معي

اخ محمود المشروع كبير وانا لصقة الجزء الذي به مشكلة مع العلم أن الكود يعمل في الجهاز الرئيسي اما على الاجهزة الاخرى بنفس الشبكة نفس المشكلة

المشكلة هنا    rpt.SetDataSource(dt) بالضبط جرب ازلها لترى الكود يعمل !!

حاولة اعمل مصادفة للتقرير


كود :
rpt.SetDatabaseLogon("admin", "1234", "database", "192.168.1.240\SQLEXPRESS")

برضو نفس المشكلة
مرحبا اخى

المشكله لديك غالبا في ConnectionString

ضعها هنا واذكر اسم السيرفر او الجهاز الرئيسى
اتوقع والعلم عند الله ،، ان الاخ صاحب السؤال رابط التقرير مباشرة مع قاعدة البيانات ،، لو تم ربط التقرير مع الداتا سيت ما تظهر الرساله بهذا الشكل .
اخي الغالى ما هى طريقة اتصال البرنامج ع الشبكة لانها قد تكون المشكلة
الامر الافضل ان يكون قاعدة البيانات على الشبكة و يمكن الوصول اليها من خلال الويندوز للاجهزة المشتركة (اقصد تسجل دخول لها من خلال الويندوز) وليس البرنامج
ثم تعدل نص الاتصال للبرنامج لمكان القاعدة بداية من اي بى الجهاز الموجود عليه القاعدة وبذلك سوف يعمل معك بكفائة للجهزة التى تسطيع الوصول للشبكة من خلال الويندوز
(19-08-17, 08:58 AM)أبو نوره كتب : [ -> ]مرحبا اخى

المشكله لديك غالبا في ConnectionString

ضعها هنا واذكر اسم السيرفر او الجهاز الرئيسى

تفضل الجهاز الرئيسي اسمه admin-pc

كود :
Data Source=192.168.1.100\SQLEXPRESS;Initial Catalog=database;User ID= admin;Password=123456

(19-08-17, 09:18 AM)حريف برمجة كتب : [ -> ]اتوقع والعلم عند الله ،، ان الاخ صاحب السؤال رابط التقرير مباشرة مع قاعدة البيانات ،، لو تم ربط التقرير مع الداتا سيت ما تظهر الرساله بهذا الشكل .

اخوي التقارير تشتغل على الجهاز الرئيسي بس اي جهاز من خارج الشبكة دي المشكلة الله العالم جملة الاتصال

(19-08-17, 01:02 PM)محمود بكرى كتب : [ -> ]اخي الغالى ما هى طريقة اتصال البرنامج ع الشبكة لانها قد تكون المشكلة
الامر الافضل ان يكون قاعدة البيانات على الشبكة و يمكن الوصول اليها من خلال الويندوز  للاجهزة المشتركة (اقصد تسجل دخول لها من خلال الويندوز) وليس البرنامج
ثم تعدل نص الاتصال للبرنامج لمكان القاعدة بداية من اي بى الجهاز الموجود عليه القاعدة وبذلك سوف يعمل معك بكفائة للجهزة التى تسطيع الوصول للشبكة من خلال الويندوز

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

(19-08-17, 09:18 AM)حريف برمجة كتب : [ -> ]اتوقع والعلم عند الله ،، ان الاخ صاحب السؤال رابط التقرير مباشرة مع قاعدة البيانات ،، لو تم ربط التقرير مع الداتا سيت ما تظهر الرساله بهذا الشكل .

كأن كلامك صحيح ربطه كذا 



مشى الحال ونفذ جملة الاستعلام وطبع التقرير لاكن تبقى المشكلة كيف إذا نقلته لجهاز اخر اكيد أو تغير الايبي اكيد راح تضهر نفس المشكلة وعدد التقارير الي عندي 250 تقرير  Huh
الصفحات : 1 2