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

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم قواعد البيانات > قسم اسئلة التقارير والطباعة تحت بيئة الـ.NET > تحديد مسار قاعدة بيانات اكسس لعرض التقرير ؟
نسخة كاملة : تحديد مسار قاعدة بيانات اكسس لعرض التقرير ؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

a.amin

25-10-12, 11:42 AM
السلام عليكم ورحمة الله وبركاته

كل عام وانتم بخير

أستخدم الكود التالى لعرض التقرير فى حالة SQL Server وهو يعمل دون أدنى مشاكل وهذا طبعا مع إستبدال [HTML]Application.StartupPath + "\Data"[/HTML] بإسم السيرفر الذى توجد به قاعدة البيانات

كود :
Dim mashobat_rpt As New ReportDocument
        mashobat_rpt.Load(Application.StartupPath & "\Reports\omlaa.rpt")
        mashobat_rpt.SetParameterValue("acc_nm", acc_nm_com.SelectedItem)
      [color=#FF0000]  mashobat_rpt.SetDatabaseLogon("admin", "lw'tn", Application.StartupPath + "\Data", "clint_data.mdb")[/color]
        Dim f As New rpt
        f.CrystalReportViewer1.ReportSource = mashobat_rpt
        f.Show()
[HTML][/HTML]

حاولت عمل نفس الكود السابق ولكن لقاعدة بيانات أكسس وكتبت الباسورد واسم المستخدم ومسار القاعدة ولكن تظهر لى رسالة اللوجن اثناء عرض التقرير وفى خانة Server Name يكون مكان القاعدة اثناء التصميم وليس عند المكان الذى حددته وهو Application.StartupPath + "\Data" ???

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

amgadtamer

25-10-12, 01:08 PM
مكان اسم السيرفر اكتب مسار قاعدة البيانات

a.amin

25-10-12, 01:42 PM
amgadtamer كتب :مكان اسم السيرفر اكتب مسار قاعدة البيانات

كود :
mashobat_rpt.SetDatabaseLogon("admin", "lw'tn", Application.StartupPath & "\Data\clint_data.mdb", "clint_data.mdb")

ومازالت راسلة الدخول تطالبنى بذلك ؟ وأيضا لو لاحظت فىالصورة ستجد ان اسم ServerName لم يتغير او بمعنى أدق لم يقم بالتعامل مع المسار الجديد ؟ كذلك لا يظهر اسم Database ؟؟

ما الحل ؟

amgadtamer

25-10-12, 02:47 PM
المسار بدون اسم قاعدة البيانات فقد جربتها عندي وتعمل دون اي مشكله

a.amin

25-10-12, 02:54 PM
amgadtamer كتب :المسار بدون اسم قاعدة البيانات فقد جربتها عندي وتعمل دون اي مشكله

كود :
mashobat_rpt.SetDatabaseLogon("admin", "lw'tn", Application.StartupPath & "\Data\", "clint_data.mdb")


كود :
mashobat_rpt.SetDatabaseLogon("admin", "lw'tn", Application.StartupPath & "\Data", "clint_data.mdb")


كود :
mashobat_rpt.SetDatabaseLogon("admin", "lw'tn", Application.StartupPath, "clint_data.mdb")

جربت الثلاثة السابقين ونفس الموضوع

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

amgadtamer

25-10-12, 03:55 PM
[HTML]
وليكن لدينا فورم اسمها reportform ولدينا crystalreportviewer اسمها viewer
ولدينا وليكن button في حدث click نكتب هذا الكود
reportform.show()
dim doc as new reportdocument
doc.load(application.
startuppath & "\ddd.rpt")
doc.setdatabaselogon("admin","","c:\mydatabasefolder","db.mdb")
viewer.reportsource=doc
viewer.refresh()

[/HTML]

a.amin

25-10-12, 04:01 PM
amgadtamer كتب :[HTML]
وليكن لدينا فورم اسمها reportform ولدينا crystalreportviewer اسمها viewer
ولدينا وليكن button في حدث click نكتب هذا الكود
reportform.show()
dim doc as new reportdocument
doc.load(application.
startuppath & "\ddd.rpt")
doc.setdatabaselogon("admin","","c:\mydatabasefolder","db.mdb")
viewer.reportsource=doc
viewer.refresh()

[/HTML]

اشكرك اخى امجد

ولكن هنا نضطر لكتابة المسار بالكامل
كود :
"c:\mydatabasefolder"

واعتقد ان تلك كانت هى المشكلة بالنسبة لى لأننى كنت أستخدم
كود :
Application.StartupPath

فهل يفضل فى حالة قاعدة بيانات أكسس كتابة المسار بالكامل ؟

amgadtamer

25-10-12, 04:09 PM
مسار بالكامل ؟ يااخي هذا الكود وضعته لك كمثال لكن قم بكتابة المسار الذي تريد

a.amin

25-10-12, 04:26 PM
amgadtamer كتب :مسار بالكامل ؟ يااخي هذا الكود وضعته لك كمثال لكن قم بكتابة المسار الذي تريد

قمت بعمل مجلد إسمه Data على الـ C ووضعت به الداتا بيز

ثم كتبت الكود التالى

كود :
Dim mashobat_rpt As New ReportDocument
        mashobat_rpt.Load(Application.StartupPath & "\Reports\omlaa.rpt")
        mashobat_rpt.SetParameterValue("acc_nm", acc_nm_com.SelectedItem)
        mashobat_rpt.SetDatabaseLogon("admin", "lw'tn", "C:\Data", "clint_data.mdb")
        Dim f As New rpt
        f.CrystalReportViewer1.ReportSource = mashobat_rpt
        f.Show()

نفس المشكلة ؟؟؟؟

ولكنى جربت ان اقوم بتعديل مصدر البيانات من داخل تصميم التقرير database expert فتم عمل المطلوب ولكن بعد معاناه ؟ هل من حلول بديلة لكى اتفادى تلك المشكلة لدى العميل
منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم قواعد البيانات > قسم اسئلة التقارير والطباعة تحت بيئة الـ.NET > تحديد مسار قاعدة بيانات اكسس لعرض التقرير ؟