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

كيف يتم تحديث البيانات تلقائيا عند فتح الكريستال ريبورت

مغلق
بدأه booknet في 7 أكتوبر 2006 · 7 رد · 792 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

وجدت بالمنتدى مشروع صغير معمول بالفيجول بيسك كما هو مرفق يحتوي على الكريستال ريبورت 10 مربوط بداتا وكل شيء جيد ماعدا شيء واحد وهو إذا أضفت شيئا أو حذفت شيئا من الداتا فعند فتح الفورم لازم أضغط على تحديث في الريبورت حتى أرى هذه التغييرات.

وسؤالي هو هل يمكنني أن أرى التغييرات من دون الضغط على زر التحديثات؟ وكيف؟

وشكرا

link.zip

#2

سوف اعطيك مثال من كريستال ريبورت4.6 وابحث عن مثيله فى كريستال 10 لاننى نزعته من جهازى لعدم امكانى الاستفاده منه

فى مساحة تصميم التقرير بالكريستال ريبورت 4.6 افتح القائمه file ومنها افتح options ومنها افتح reporting ومنها اختر refresh data on every print

لعلى اكون قد قدمت لك مساهمه

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

#3

فقط افنح التقرير و أزل علامة الصح وفعل الخيار save الذي بجانبه صورة قرص مرن

post-697-1160346257_thumb.gif

#4

جزاكم الله خيرا جميعا

تم تعديل هذه المشاركة بواسطة booknet في 9 أكتوبر 2006 في 19:56

#5

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

المثال المذكور link مثال جيد ولكننى لم استطع فهم الاكواد الموجوده فى form2 فهل اطمع فى تفسير لها والاكواد هى كما يلى :

Option Explicit

Dim m_Application As New CRAXDDRT.Application

Dim m_Report As New CRAXDDRT.Report

Private Sub Form_Load()

Dim ReportFile As String

ReportFile = App.Path & "\Rep1.rpt"

Set m_Report = m_Application.OpenReport(ReportFile)

CrViewer.ReportSource = m_Report

CrViewer.Zoom 1

CrViewer.ViewReport

CrViewer.Refresh

End Sub

Private Sub Form_Resize()

CrViewer.Top = 0

CrViewer.Left = 0

CrViewer.Height = Me.ScaleHeight

CrViewer.Width = Me.ScaleWidth

End Sub

كما واننى حاولت استخدام نفس الاكواد فى برنامج مستقل فكانت النتيجه مخيبه للامال حيث تظهر رساله ان المتغيرات الموجوده فى الاعلان العام غير موجود

#6

اخ fkwinna

coffee.gif

تفسير الشفرة كالتالي

Dim m_Application As New CRAXDDRT.Application
Dim m_Report As New CRAXDDRT.Report

بأختصار هذه تعاريف من نوع التقرير لكي يسهل التعامل معه من احداث

Dim ReportFile As String
ReportFile = App.Path & "\Rep1.rpt"

تعريف متغيير من نوع نص لأسناد مسار التقرير إليه

Set m_Report = m_Application.OpenReport(ReportFile)
CrViewer.ReportSource = m_Report

هنا تحديد مصدر التقرير المرتبط أو الخاص بالاداة المرسومة على الفورم

CrViewer.Zoom 1

دقة العرض

CrViewer.ViewReport
CrViewer.Refresh

نوع أو شكل التقرير اثناء العرض مع تحديث البيانات

CrViewer.Top = 0
CrViewer.Left = 0
CrViewer.Height = Me.ScaleHeight
CrViewer.Width = Me.ScaleWidth

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

اقتباس
كما واننى حاولت استخدام نفس الاكواد فى برنامج مستقل فكانت النتيجه مخيبه للامال حيث تظهر رساله ان المتغيرات الموجوده فى الاعلان العام غير موجود

يجب ان يكون الأصدار الخاص بالكريستال ريبورت مطابق لما لديك لكي تتعامل مع الشفرات .... فهي تختلف من اصدار لآخر

ويمكنك مراجعة قسم التقارير بأعلى الصفحة فهناك دورة لتصميم التقارير للكريستال ريبورت الاصدر 10

هذا بأختصار والله اعلم

تم تعديل هذه المشاركة بواسطة HnHn في 10 أكتوبر 2006 في 04:08

سجل ايميلك هنا

googlejb5.gif ليصلك كل ما هو مفيد في عالم البرمجة
#7

جزاك الله خيرا الأخ HnHn على هذا التوضيح المفيد

الأخ fkwinna لازم تكون مركب كريستال ريبورت 10 حتى يشتغل عندك المثال

#8

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

هل زرت : قسم التقارير ؟

يحتوي هذا القسم على كل المواضيع التي تتحدث عن التقارير عموماً، سواء باستخدام الـ Crystal Report أو الـ Data Report أو أي وسيلة أخرى

فكل ما تود معرفته ستجده بإذن الله في هذا القسم ( هذه الاداه خاصه بـ Crystal Report ).

وبالاخص :

f_closed.gifروابط دروس دورة الCrystal Reports 10 روابط الدورة

بالتوفيق ..............

A7med_prof

تم تعديل هذه المشاركة بواسطة A7med_prof في 30 أبريل 2007 في 09:34

اقتباس

آسف الدخول متقطع هذه القتره

اقتباس

[يمين]

.[/يمين]

A7med_prof-4-2007.jpg

اخر مواضيعي 2007

االمثال مطبق على موقع بورصه سعودي

.

.

مواضيع مهمه ومطلوبه بكثره VB6

.

بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,

.

أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .

.

</

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

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…