20-07-20, 11:01 PM
(20-07-20, 09:29 PM)DR.YASER كتب :هذا الموضوع يشرح طريقة الطباعة على طابعتين فى نفس الوقت
و هذا للطباعة على أكثر من طابعة فى نفس الوقت .. و من ميكروسوفت اضغط هنا
و مرفق أيضا سورس كود للطباعة لكنه فى نفس الوقت يعرض أكثر من طابعة مفعلة فى نفس الوقت ... هذه صور هذا المشروع و طريقة تصميمه :
![]()
![]()
![]()
![]()
و السورس كود بالمرفقات
... و التالى كود يقوم بالطباعة على أكثر من طابعة (هو كان سى شارب و حولته الى VB.NET )
you can use the
API to query themكود :
System.Management
كود :
Private Sub SurroundingSub()
Dim printerQuery = New ManagementObjectSearcher("SELECT * from Win32_Printer")
For Each printer In printerQuery.[Get]()
Dim name = printer.GetPropertyValue("Name")
Dim status = printer.GetPropertyValue("Status")
Dim isDefault = printer.GetPropertyValue("Default")
Dim isNetworkPrinter = printer.GetPropertyValue("Network")
Console.WriteLine("{0} (Status: {1}, Default: {2}, Network: {3}", name, status, isDefault, isNetworkPrinter)
Next
End Sub
الف الف شكر
