الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال في الكريستال ريبورت

مغلق
بدأه salehgmash في 5 يونيو 2005 · 3 رد · 687 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الاخوة الاعزاء اسعد الله صباحكم

لدي برنامج يعمل على دوت نت 2003 وتقاريره باستخدام الكريستال ريبورت ولا توجد لدي مشكلة في استخراج التقارير التي يتم بناؤها اثناء التصميم الا اني ارغب في كيفية طباعة تقرير يكون المستخدم هو الذي يقرر شكل استخراج التقريروكمثال على ذلك لنفترض ان المستخدم يرغب في طباعة تقرير لجميع الذين تم تسجيلهم بالشركة مثلا من جنسية معينة وخلال فترة محددة

اي ان يكون هناك عمل textbox لبداية التاريخ واخر لنهاية تاريخ الفترة وانشاء textbox اخر يتم وضع فيه الجنسية ووضعها على الفورم وبمجرد الضغط على button محدد على الفورم يكتب داخله الكود الذي ينفذ المطلوب

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

#2

بسم الله الرحمن الرحيم

أولا عليك ربط الكريستال ريبورت بview منشأ في قاعدة البينات وبعدها سميه:

view1

هندها تقوم بكتابة هذا الكود لتغير الview1 عند الضغط على button1 مثلا:

[ Dim cn As New ADODB.Connection

Dim cm As New ADODB.Command

Dim cm2 As New ADODB.Command

cn.Provider = "sqloledb"

cn.ConnectionString = "data sourse"

cn.Open()

cm2.ActiveConnection = cn

cm.ActiveConnection = cn

cm.CommandType = ADODB.CommandTypeEnum.adCmdText

cm.CommandText = "if exists(select * from sysobjects where name ='view1' "') drop view 1" & customerid

cm.Execute()

cm2.CommandType = ADODB.CommandTypeEnum.adCmdText

cm2.CommandText = "create view1" & customerid & " as select * from customer where [customer id]= " & customerid

cm2.Execute()

cn.Close()]

ووظيفة هذا الكود هو هد الview1 القديم وإنشاء view1 جديد على حسب القيود المطلوبة

ملاحظة : هذا الكود يستخدم فقط إذا كان البرنامج المنشأ لمسخد واحد فقط وعليك إضافة refrance من نافذة solution explorer بالنقر على على

refrances واضافة adobd

وبالتوفقيق إنشأأأأأأأأأأأأأالله

أخوكMegren

البرمجه منطق وذوق وخدع .............والمعرفة طريق سهل وعذب

#3

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

الف الف شكر لك يااخ megren على حسن تجاوبك وشرحك الجميل حيث اني والله قد فقدت الامل في الحصول على اجابة لمشكلتي حتى اني اضطررت لعرض المشكلة في قسم التقارير التابع لفيجوال 6 ولكن للاسف لم اجد من يساعدني فشكرا وجزاك الله خيرا

#4

بسم الله

لسلام عليكم

ولكن أخي الكريم MEGREN كيف يمكن الربط بين الريبورت والفيو ، معذرة فأنا لم أتعامل مع الفيو إلا بشكل طفيف

وجزاك الله خيرا

هذا الموضوع مغلق.

مواضيع مشابهة