KARIMSOFT

التعديل برقم الصفحة Report1.rar

up

ابحث في المنتدي قبل السؤال يوجد امثله كثيره

لا يتكرر ولكن يتغير في كل فتح للموقع

اضف مجموع عمل الكريستل 10

اوضح اكثر لو يمكن عمل رسم توضحي

ربما خطء في الكود الخاط بالبوست باك والاكسبلورر حفظ كلمة السر

اكرمك الله -ولكن اريد ان تضهر عن طريق الكود مثلا بعد حفظ البيانات او حدث خطء -يتم اغلاقها بعد 20 ثانية مثال جزاك الله واكرمك برية وجه الكريم

اكرمك الله

بعد عمل التقرير الاساسي قم بضع تقرير فرعي اختار نفس التقرير ثم افتح التقرير الفرعي اخفي التفصيل المرفق يوضح Report1.rar

يمكن الضغط على حقل بالكريستال ريبورت وفتح نموذج المرفيق يوضح هذا الضغط على حقل بالكريستال ريبورت وفتح نموذج.rar

يمكن اب يعطيك هذا الملف بعض الافكار نتيجه.rar

يوجد في الدورس المثبته في القسم شرح لهذا

ابحث في مكتبة المكان هو افضل مكان للبحث والمشريع السابقة

في التفرير ادارج Report Title من Special Field في الكود Dim e1 As New CrystalReport1 e1.SummaryInfo.ReportTitle = "rhgoldh" e1.SetDataSource(ds.Tables(tb)) CrystalReportViewer1.ReportSource = e1 Me.CrystalReportViewer1.RefreshReport() Return Nothing

البحث بين تارخين Conn.Open()' remove this line DataSet1.Clear() SQLstr= "SELECT * FROM Table1 where dateField>='" & val1.Text & "' and dateField<='" & val2.Text & "'" Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn) DataAdapter1.Fill(DataSet1, "Table1") …

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

لا شكر علي واجب Conn.Open()' remove this line DataSet1.Clear() SQLstr= "SELECT * FROM Table1 where id='" & TextBox10.Text & "'" Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn) DataAdapter1.Fill(DataSet1, "Table1") Conn.Close()' remove this line كود البح…

ممكن مثال