السلام عليكم
انا احاااااول اوضح لكم بشكل كبير لكي يفهمني الكل
انا عملت برنامج وعندي ثلاث طابعات وحده Epson للفواتير--والثانيه hp للكشوفات----,والثالثة zebra لطباعة الباركود
واكيد البرنامج فيه تقارير او ازرار طباعة !!!!
المطلوب:
عندما اضغط على طباعة فاتورة تلقائيا يختار الطابعة Epson
وعندما اطبع كشف حساب تلقائيا يختار الطابعة hp
وعندما اطبع ملصق باركود تلقائيا يختار الطابعة zebra
يعني كود لأختيار الطابعة تلقائيا ويكون اكيد داخل زر command
بانتظاركم وان شاء الله تلقون لي الحل
تم تعديل هذه المشاركة بواسطة MaTaRi في 19 مايو 2005 في 02:28
السلام عليكم
أخي الكريم MaTaRi
هه بعض الأكواد المتعلقه بالطابعات أرجو أن تفيدك في مشروعك
بخصوص طلبك يمكن أن تستفيد من هذا البرنامج
منتديات كوكب الكمبيوتر
لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية
وهاذا كود يقوم بإعطائك حالة الطباعه الحاليه
منتديات كوكب الكمبيوتر
لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية
وهذا كود يقوم بعرض خصائص الطابعه
منتديات كوكب الكمبيوتر
لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية
وهذا كود لإستدعاء شاشة الطباعه
منتديات كوكب الكمبيوتر
لكل جديد في عالم تكنولوجيا المعلومات والكمبيوتر والأخبار العلمية
انا ماادري كيف اشكرك اخوي seaprince46
الاكواد كلها مفيدة
واللي انا حاس اللي انا بستفيد منه هو كود تحديد الطابعة الافتراضية بحيث لما يضغط زر طباعة باركود على الطابعة zebra يروح دايركت يخليها الافتراضية
بدون انت يظهر الفورم
ولما اطبع فاتورة بيع او شراء على الطابعة epson يروح دايركت يخليها الافتراضية وهكذا يتم التنقل بين الطابعة بحيث تكون كل وحده افتراضية حسب زر الطباعة.
بس اهم شي ان هذه الجملة
Printers(i).DeviceName
اذا اردت ان اننا اركبها في زر مثلا طباعة باركود بختار الطابعة zebra هل هذا الكود صحيح
Dim DeviceName As String DeviceName = "zebra" cSetPrinter.SetPrinterAsDefault(DeviceName)
اذا اردت ان اننا اركبها في زر مثلا طباعة فاتورة بختار الطابعة Epson هل هذا الكود صحيح
Dim DeviceName As String DeviceName = "Epson" cSetPrinter.SetPrinterAsDefault(DeviceName)
شباب انا محتاااااج المساعدة
هل هذا الكود صحيح
واللي عنده عدة طابعات يغير بس الاسامي ويجرب
انا بانتظار الرد
انا جربت وعرفت طابعة اخرى وحاولت بالكود اللي ارفقته وهو تحديد الطابعه الإفتراضيه
بعد ماطلعت لي list1
اختر الطابعة الوهمية الجديدة لكن رحت الى مجلد الطابعات لقيت الطابعة الافتراضية مااتغيرت
ابي كود تحديد الطابعة الافتراضية ويكون شغال
شكر لك اخي seaprince46 ماقصرت
بعد البحث والتعديل
توصلنا الى .....................................
كود شغال 100%
في اختيار الطابعات الافتراضية
وانا ايضاَعدلت في الكود لكي يختار افتراضي وقت اختيار نوع الطباعة (فاتورة-باركود-كشف)
بدون ان يظهر اي فورم يعني (اتوماتيك)
كود اختيار الطابعة الافتراضية مرفق
هذا الموضوع مغلق.