السلام عليكم رحمة الله وبركاته
عندي تقرير قدرت أطبع الكل فيه
محتاج أستخدم نفس التقرير بشرط تنظيفه أولاً ومن ثم طباعة عن طريق رقم الموظف
ياليت تساعدوني في تكويده
تكست بكس يدخل رقم الموظف ويضغط طباعه يطبع في التقرير
وعليكم السلام رحمة الله وبركاته
وضح أخي الكريم، ماذا تقصد بتنظيفه وتكويده ؟
وما نوع التقرير،
ولو ترفق مشروع صغير يكون أفضل، مع الشرح الإضافي طبعاً.
(09-11-16, 11:38 PM)ممدوح كتب : [ -> ]وعليكم السلام رحمة الله وبركاته
وضح أخي الكريم، ماذا تقصد بتنظيفه وتكويده ؟
وما نوع التقرير،
ولو ترفق مشروع صغير يكون أفضل، مع الشرح الإضافي طبعاً.
الفكره أني أستخدم كرستال ريبورت ولكن ماعندي إلا فورم واحد لطباعه بحيث أني لما أطبع الكل وأنتهي وبعدها أرجع أطبع قيمه واحده فقط يطبع لي الكل لأنه ما مسح القديم من التقرير هاذي من جربت أنا
تفضل هذا المشـورع شاكر ومقدر لك يا غالي
مشروعك ليس فيه أكواد طباعة من أساسه ليتم التعديل عليه
وقاعدة البيانات معمولة على إصدار أحدث من الموجود عندي
أنا رسمت لك الفكره
والأصدار على سكيول سيرفر 2008
الفكره ياصاحبي بسيطه جداً
أستخدمت كرستال ريبورت
عندي فورم 1 لأظهار التقارير
طباعة الكل اللي بالجدول الحمد لله أمرها يسير وسهل
عندي تكست بكس + زر طباعه
يدخل في التكست بكس رقم الموظف
هنا يتم تهئية التقرير بحيث أذا كان فيه بيانات قديمه يشيلها
ويظغط على زر طباعه يظهر في التقرير الموظف المدخل رقمه + بيانات اللي في نفس الجدول فقط
فقط
أعذرني يا أستاذ ممدوح أنا على بالي تبي الفكره فقط
أنا رسمت لك الفكره
والأصدار على سكيول سيرفر 2008
الفكره ياصاحبي بسيطه جداً
أستخدمت كرستال ريبورت
عندي فورم 1 لأظهار التقارير
طباعة الكل اللي بالجدول الحمد لله أمرها يسير وسهل
عندي تكست بكس + زر طباعه
يدخل في التكست بكس رقم الموظف
هنا يتم تهئية التقرير بحيث أذا كان فيه بيانات قديمه يشيلها
ويظغط على زر طباعه يظهر في التقرير الموظف المدخل رقمه + بيانات اللي في نفس الجدول فقط
فقط
أعذرني يا أستاذ ممدوح أنا على بالي تبي الفكره فقط
عموما يجب ان تقوم بالاستعلام وتملئ جدول تقوم بربط التقرير بالجدول مثل التالي
كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim daa As New SqlDataAdapter("SELECT * FROM [Table1] WHERE [ID]=@id", cnn)
daa.SelectCommand.Parameters.AddWithValue("@id", 2)
Dim tbl As New DataTable
daa.Fill(tbl)
Dim rpt As New CrystalReport1
rpt.SetDataSource(tbl)
Me.CrystalReportViewer1.ReportSource = rpt
End Sub
يعطيك العافيه سيتم التجربه أن شاء الله ألف شكر