منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : اية فكرة موضوع الطباعة على 2 طابعة بنفس الوقت
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كنت عاوز اعرف اية فكرة موضوع الطباعة على 2 طابعة بنفس الوقت مثل المطاعم نسخة من طابعة تعطى للعميل ونسخة من طابعة اخرى تكون للمطبخ
كرر سطر أمر الطباعة مرتين
(20-07-20, 08:11 PM)محمد كريّم كتب : [ -> ]كرر سطر أمر الطباعة مرتين

شكرا على الاهتمام
بس انا عاوز اطبع على طابعتين مختلفتين
طابعة بجانب الكاشير
وطابعة فى المطبخ
هو بيطبع على الديفولت
عاوز اخلى الطابعتين مع بعض ديفولت
(20-07-20, 07:58 PM)ahmedramzyaish كتب : [ -> ]كنت عاوز اعرف اية فكرة موضوع الطباعة على 2 طابعة بنفس الوقت مثل المطاعم نسخة من طابعة تعطى  للعميل ونسخة من طابعة اخرى تكون  للمطبخ


توجد طريقة عن طريق الويندوز بتفعيل print pooling و بالطبع sharing ل طابعة المطبخ على الشبكة

و هناك ايضا طريقة سهلة للغاية عن طريق برامج متخصصة لهذا الامر، تقوم بتحميل البرنامج على الويندوز و تجعله الطابعة الافتراضية ثم من اعدادات البرنامج نفسه تختار الطابعات التي يرسل لها امر الطباعة عندما يتلقى الامر من تطبيقك


 https://www.printdistributor.com/

https://www.foldermill.com/solutions/aut...y-printers
هذا الموضوع يشرح طريقة الطباعة على طابعتين فى نفس الوقت
هذا الموضوع

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

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





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

... و التالى كود يقوم بالطباعة على أكثر من طابعة (هو كان سى شارب و حولته الى 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
(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

الف الف شكر