AllExperts > Experts 
Search      

VB.NET

Volunteer
Answers to thousands of questions
 Home · More Questions · Answer Library  · Encyclopedia ·
More VB.NET Answers
Question Library

Ask a question about VB.NET
Volunteer
Experts of the Month
Expert Login

Awards

About Us
Tell friends
Link to Us
Disclaimer

 
 
 
 
About Syed Adeel Rizvi
Expertise
I can answers questions regarding web based and desktop based programming in VB.Net. Which can include XML, Custom Controls + Computer Hardware and Windows Turboshooting...etc. More Skills : 1 . PHP - > All Type Of CMS e.g. (Joomla,Drupul,PHPNuke...etc) 2 . ASP 3 . ASP.Net 4 . CMS 5 . MySql 6 . SQl Server 2000 & 2005 7 . Ms Access 8 . Web Designing 9 . Networking Turboshooting 10 . Windows Turboshooting 11 . Hardware Turboshooting All Type Of Work Related To IT I also Do Work as a Freelance as Application & Web Developer & Designer

Experience
i have 3 years work experience in software house and 4 years work experience for computer hardware and Networking..

Organizations
110 Solutions

Education/Credentials
Bsc (Honors)

 
   

You are here:  Experts > Computing/Technology > Basic > VB.NET > printer state

Topic: VB.NET



Expert: Syed Adeel Rizvi
Date: 8/10/2007
Subject: printer state

Question
my printer is connected to USB ,how can i determine the status of printer before sending job, using VB.net?


Answer
Hello Sir

Sir Plz try This Maybe This Will Help You if Not Then Plz mail me at syedadeel2@gmail.com i will help u out.

     Sub CheckPrinter()
       ' First Add System.Management Reference
       Dim MR As Management.ManagementObjectCollection

       Dim MS As Management.ManagementObjectSearcher

       Dim MO As Management.ManagementObject

       MS = New Management.ManagementObjectSearcher("Select * from Win32_Printer")

       MR = MS.Get

       Dim MyPrinter As String = ""
       For Each MO In MR

           MyPrinter = MO("Name")

           If MyPrinter.Equals(PrintDocument1.PrinterSettings.PrinterName) Then

               MsgBox("Printer Connected")

           Else

               MsgBox("Printer Is Offline")

           End If

       Next
End Sub


Add to this Answer    Ask a Question



  Rate this Answer
   Was this answer helpful?
Not at allDefinitely              
   12345  

     
About Us | Advertise on This Site | User Agreement | Privacy Policy | Help
Copyright  © 2008 About, Inc. About and About.com are registered trademarks of About, Inc. The About logo is a trademark of About, Inc. All rights reserved.