18-11-13, 11:18 AM
اخواني لدي طابعتين اريد كود لجعل الريبورت الاول يطبع في طابعة والريبورت الثاني يطبع في طابعة اخرى
ارجو الافادة
ارجو الافادة
ارجو المساعده في طباعة التقرير
|
18-11-13, 11:18 AM
اخواني لدي طابعتين اريد كود لجعل الريبورت الاول يطبع في طابعة والريبورت الثاني يطبع في طابعة اخرى
ارجو الافادة تم الشكر بواسطة: allayl
18-11-13, 12:10 PM
متابع
18-11-13, 11:24 PM
ارجو الافادة
19-11-13, 02:11 AM
متابع نأمل الحل من اعضاء المنتدى
20-11-13, 07:17 PM
؟؟؟؟؟؟؟؟؟؟؟؟؟؟
22-11-13, 05:14 PM
لا يوجد حل لهذا الموضوع
23-11-13, 03:07 AM
بصراحة يا اخي لم اجرب هكذا فكرة
لكن ارى ان تظهر الطابعات والمستخدم يختار الطابعة المناسبة للطباعة سبحان الله والحمدلله ولا إله إلا الله والله أكبر
اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
23-11-13, 06:17 AM
السلام عليكم
- هذا السؤال تم طرحه في المنتدى القديم ,و الذي رابطه في أعلى صفحة هذا المنتدى , هذا هو الكود لعمل ذلك : كود : Private Declare Function SetDefaultPrinter Lib "winspool.drv" Alias "SetDefaultPrinterA" (ByVal pszPrinter As String) As Long - تحياتي . كود : For each Breathe in MyLife تم الشكر بواسطة: ناجي إبراهيم
26-11-13, 05:20 PM
مشكور اخوي
طيب اذا اردنا ان تكون اسم الطابعة محدده في التكست بوكس ماهو الكود بدل هذا If Prt.DeviceName = "HP" Then
26-11-13, 06:48 PM
السلام عليكم...
بالإضافة إلى ما تقدم به أخونا VB_Coder مشكوراً فإنه يمكن استعمال الكائنين Printer و Printers لضبط الطابعة الافتراضية للتطبيق دون تغيير الطابعة الافتراضية للنظام (لاحظ أننا نستعمل الخاصية DeviceName التي تعطي الاسم الصحيح الكامل للطابعة): كود : Dim Prn As Printer و تبديل الطابعات حسب الحاجة: كود : Dim Prn As Printer * ملاحظة: بدل تكرار كود البحث عن الطابعتين كلما أردت الطباعة، يمكنك جعل المتغيرين Printer1 و Printer2 عامين (Public) في Module و ضبطهما عند بداية تشغيل البرنامج ثم استعمالهما حسب الحاجة (كما في الأسطر الأربعة الأخيرة في الكود السابق). أخيراً، و للحصول على قائمة بأسماء الطابعات (في ListBox مثلاً): كود : Dim Prn As Printer نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
|
|