*PHIL* help with a vbs problem

Oh man! Ad-blocking software has been detected! :'(

This website is run by the community, for the community... and it needs advertisements in order to keep running. Blocking our ads means your killing our stats!
Please disable your ad-block, or become a premium member to hide all advertisements and this notice.

Som time ago you helped me with this vbs code that set a default printer:

Code:

Set NIC1 = GetObject("winmgmts://.").InstancesOf("Win32_NetworkAdapterConfiguration") 
For Each Nic in NIC1 
     IF Nic.IPEnabled THEN 
              hostname = Nic.DNSHostName 
                  
     End If 
Next 

if not hostname = "LIBRARY-03" then 

Set WshNetwork = CreateObject("WScript.Network") 
PrinterPath = "\\library-03\LIBRARY03-HP1100" 
PrinterDriver = "LIBRARY-03-HP1100" 
WshNetwork.AddWindowsPrinterConnection PrinterPath, PrinterDriver 
WshNetwork.SetDefaultPrinter "\\library-03\LIBRARY03-HP1100" 

end if 

Part of the help I needed was to not appy the code to a spacific computer (Library-03 in this example). My question is can this be extended to two named computers and if so how is it acomplished.

Thanks, Si.

 

Oh man! Ad-blocking software has been detected! :'(

This website is run by the community, for the community... and it needs advertisements in order to keep running. Blocking our ads means your killing our stats!
Please disable your ad-block, or become a premium member to hide all advertisements and this notice.

Hi Si,

if you change the line

Code:

 if not hostname = "LIBRARY-03" then  

to

Code:

 if not hostname = "LIBRARY-03" or "SOME OTHER COMPUTER" then  

you should be fine.

HTH
Phil

 

I get a runtime error, type mismatch: '[string: "PCNAME"]'

 

couldnt you create a text file listing the computer names and then loop the script moving on to the next item each time?
or take the contets of the text file into an array at runtime?

 

ok, the following should work

Code:

 
if not hostname = "LIBRARY-03" then
if not hostname = "SOME OTHER COMPUTER" then  
.
.
.
.
.
.
end if
end if

It's quick and dirty but should work fine, Pheonix is right you could read in a text file.