تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مساعدة بخصوص الطابعه
#1
Sad 
السلام عليكم أخواني مساعده من اصحاب الخبره
الرابط اسفل المشاركه فيه شرح لخصائص الطابعه من مايكروسوفت

" حاجتي هي رساله بعدد الاوراق ومصدر الطباعه "

أسبوع ماوصلت لشيئ . Sad





http://msdn.microsoft.com/en-us/library/...10%29.aspx
الرد }}}}
تم الشكر بواسطة:
#2
.....

على السريع جداً جداً....

منقول

أضف المرجع System.Management.dll
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    ' أضف المرجع التالي
    ' Reference: System.Management.dll

    ' مزيد من المعلومات
    ' http://msdn.microsoft.com/en-us/library/aa394370(v=vs.85).aspx
    ' http://msdn.microsoft.com/en-us/library/aa387873(v=vs.85).aspx

    Dim printJobSet As New Management.ManagementObjectSearcher(New System.Management.ObjectQuery("SELECT * FROM Win32_PrintJob"))
    For Each printJob As Management.ManagementObject In PrintJobSet.Get()
        Dim itm As New ListViewItem
        itm.Text = printJob("Document")
        itm.SubItems.Add(printJob("Status"))
        itm.SubItems.Add(printJob("PagesPrinted") & "/" & printJob("TotalPages"))
        Me.ListView1.Items.Add(itm)
    Next job

End Sub

أو بدون مرجع
كود :
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    ' مزيد من المعلومات
    ' http://msdn.microsoft.com/en-us/library/aa394370(v=vs.85).aspx
    ' http://msdn.microsoft.com/en-us/library/aa387873(v=vs.85).aspx

    Dim printJobSet As Object = GetObject("winmgmts:").InstancesOf("Win32_PrintJob")
    For Each printJob As Object In printJobSet
        Dim itm As New ListViewItem
        itm.Text = printJob.Document
        itm.SubItems.Add(printJob.Status)
        itm.SubItems.Add(printJob.PagesPrinted & "/" & printJob.TotalPages)
        Me.ListView1.Items.Add(itm)
    Next

End Sub

.....
الرد }}}}
تم الشكر بواسطة: عقرب يماني , kslawy
#3
أشكرك كل الشكر عزيزي
انت حقاً vb.net يمشي على الارض Smile

والعفو منك .. تبقت لي مسئله..

الحدث كان في زر .. وانا اريده أوتوماتيكياً بمجرد وجود أمر طباعه جديد
جربت الثريد لكني لم أفلح Sad

أتمنى لك التوفيق في كل شيئ وفي حل معضلتي خصوصاً

وانشاء الله لك مني اهداء في كتاب بدأت في كتابته اليوم وآمل ان انهيه غداً . ^_^
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [مساعدة] تحويل من #C إلى Vb أحمد إبراهيم سعد 3 35 منذ 1 ساعه مضت
آخر رد: طالب برمجة
  [VB.NET] استفسار بخصوص كود select all CheckBox dubai.eig 2 42 أمس, 08:16 PM
آخر رد: dubai.eig
  [VB.NET] مساعدة يا شباب ابغي عمل لعبة خفيفة اون لاين 0theghost0 0 36 14-12-17, 06:28 AM
آخر رد: 0theghost0
  [VB.NET] مساعدة لمنع تكرار البيانات او تجميعها علي حسب التاريخ englishman210 15 240 13-12-17, 11:00 AM
آخر رد: englishman210
  [VB.NET] نا اريد مساعدة سريعة حنان المغربى 0 51 12-12-17, 04:14 PM
آخر رد: حنان المغربى
  بخصوص حفظ التاريخ aftfm 5 102 10-12-17, 12:05 AM
آخر رد: aftfm
  مساعدة في فاتورة مبيعات الدريساوي 2 83 09-12-17, 11:58 PM
آخر رد: الدريساوي
  [VB.NET] استفسار :- بخصوص رقم ال ID MySql INSERT dubai.eig 2 56 07-12-17, 06:39 PM
آخر رد: dubai.eig
  مساعدة في مشروع Riffa 2 90 06-12-17, 03:57 PM
آخر رد: Riffa
  مساعدة فى تعديل كود اذا سمحتوا مسح كل حاجه فى الداتا جريد فيو نبيل فتحى 2 60 04-12-17, 02:14 AM
آخر رد: عبد الاحد

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم