[ahmedramzyaish]

(20-07-20, 09:29 PM)DR.YASER كتب :

هذا الموضوع يشرح طريقة الطباعة على طابعتين فى نفس الوقت

هذا الموضوع

و هذا للطباعة على أكثر من طابعة فى نفس الوقت .. و من ميكروسوفت اضغط هنا

و مرفق أيضا سورس كود للطباعة لكنه فى نفس الوقت يعرض أكثر من طابعة مفعلة فى نفس الوقت ... هذه صور هذا المشروع و طريقة تصميمه :

و السورس كود بالمرفقات

... و التالى كود يقوم بالطباعة على أكثر من طابعة (هو كان سى شارب و حولته الى VB.NET )

you can use the 

كود :

System.Management

 API to query them

كود :

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

الف الف شكر