Retreive the vb object "printer" corresponding to the Default Printer

Paste the following code into it's own BAS module (or convert it to a class if required)

'MS Windows API Function Prototypesprivate Declare Function GetProfileString Lib "kernel32" Alias _     "GetProfileStringA					

															
					                    

                                        

                    
										


                                        

                                            

    

        

            IT Solutions Builder
            TOP IT RESOURCES TO MOVE YOUR BUSINESS FORWARD
        
    
    

        
 Which topic are you interested in? 
        

            

                
                
Mobile
            
            

                
                
Security
            
            

                
                
Networks/IoT
            
            

                
                
Cloud
            
            

                
                
Data Storage
            

        
        

            

                
                
Applications
            
            

                
                
Development
            
            

                
                
IT Management
            
            

                
                
Other
            
        
        
    
    

        
 What is your company size? 
        

            
            

                

                    
                                        Select company size
                        1-9
                        10-24
                        25-49
                        50-99
                        100-249
                        250-499
                        500-999
                        1000+
                    
                
            
        
        

            
        
    
    

        
 What is your job title? 
        

            
            

                

                    
                                           Select job title
                        C-Level/President
                        Manager
                        VP
                        Staff (Associate/Analyst/etc.)
                        Director
                    
                
            
        
        

            
        
    
    

        
 What is your job function? 
        

            
            

                

                    
                                           Select job function
                        IT - General
                        IT - Project Management
                        IT - Systems/Network Administration
                        IT - Developer
                        IT - Tester/QA
                        Accounting/Finance/Legal
                        Academic/Research
                        Administrative
                        General Management
                        Human Resources
                        Marketing
                        Operations
                        Sales
                        Consultant
                        Other
                    
                
            
        
        

            
        

    
    

        
Searching our resource database to find your matches...
        

            
            

        
    
    


    

    

        
    
    
    
    
    
                                        
					  
					
					

	


	






	
0 Comments (click to add your comment)
	

	

	

	

		

                Comment and Contribute

	
	

	
 
	


		

			
			Your name/nickname
		
		

			
			Your email
		
		

			
			Subject
		
		
			
			

		(Maximum characters: 1200). You have  characters left.