30-03-20, 02:22 AM
(آخر تعديل لهذه المشاركة : 30-03-20, 02:31 AM {2} بواسطة mohamedgadain61.)
(29-03-20, 07:27 PM)حريف برمجة كتب :(29-03-20, 02:46 AM)رحم الله والديك وجعله بميزان حسناتك ان شاء الله....كل الشكر mohamedgadain61 كتب : في احد يساعدنا بألية كود الطباعة تلقائيا من ال Report Viwer عجزت احصل كود
مرحبا اخي ،،
1 - اتبع ونفذ الموجود في الصور ،، ملف الطباعة التلقائية موجود في المرفقات :
2 - احذف الفورم 2 .
3 - كود بوتن الطباعة الموجود في الفورم 1 كالتالي :
كود :
Imports Microsoft.Reporting.WinForms
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim myRPTForm As New ReportViewer
Dim report As LocalReport = New LocalReport()
Dim myPRT As New Reporting
'''''''''''''''''''''''''''''''''''''''''''''
report.ReportPath = Application.StartupPath & "\Report1.rdlc"
'''''''''''''''''''''''''''''''''''''''''''''
'امر الطباعة المباشرة بدون عرض التقرير
myPRT.Export(report)
myPRT.m_currentPageIndex = 0
myPRT.Print()
End Sub
End Class
وبالتوفيق للجميع .
(29-03-20, 11:48 PM)عبد العزيز البسكري كتب :السلام عليكم و رحمة الله و بركاتهأنصحك أخي الكريم و بشدّةمتابعة هذا الموضوع المميّز للتعامل مع الريبورت فيورتحياتي
ابشر ي غالي كل الشكر ي عزيزي رحم الله والديك
ابشر ان شاء الله كل الشكر والتقدير لكم جميعا
ابشر ان شاء الله كل الشكر جميعا
