24-07-18, 02:17 AM
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله إخواني الافاضل
في هذه السطور أردت أن أرفق لكم طريقة لطباعة التقارير مباشرة بدون فتح نافذة Report Viewer
للإشارة فقط هذه الطريقة تنفع كثيرا أصحاب برامج المبيعات
نبدأ على بركة الله
كود :
'داتا تابل لنحوي فيها البيانات
Dim dt As New DataTable
Dim adapter As New SQLiteDataAdapter
'نقوم بتفريغ الداتا تابل
dt.Rows.Clear()
'جملة الإستعلام
My.Computer.FileSystem.DeleteFile("C:\temp\1.pdf")
'إن شاء الله أكون أفدتكم بطريقة بسيطة
'دعائكم لي بالهداية