السلام عليكم ورحمة الله وبركاته
ارجو مساعدتي اريد عند عمل طباعه من البرنامج يقوم بتغيير الطابعه الافتراضيه وفور الانتها يقوم بارجاع الطابعه السابقه
وشكرا
السلام عليكم انا استخدم تقارير الاكسس وليس الكرستال ريبورت
السلام عليكم ورحمة الله وبركاته
تم حل المشكله ولطرحها من اجل المعرفه
1- اضافة class
كود :
Imports System.Runtime.InteropServices
Public Class Class1
<DllImport("winspool.drv", CharSet:=CharSet.Auto, SetLastError:=True)>
Public Shared Function SetDefaultPrinter(hp As String) As Boolean
End Function
End Class
2-تغيير الطابعه الافتراضيه هذا عند الامر حيث my.settings.printers هو اسم الطابعه المراد وضعها افتراضيه
كود :
Class1.SetDefaultPrinter(My.Settings.printers)
تقبلو مني فائق الشكر والتقدير