goJoe wrote:
> Hej!
> Jeg er ny til visual basic men sidder med et program hvor jeg vil
> udskifte den nuværende default med en anden vha. den nye printers
> navn og så skifte tilbage til den gamle default printer efter
> udskrift...
> Nogen gode ideer til dette?? har kigget på lidt kode men jeg kan ikke
> umiddelbart finde ud af det
'Set the Default Printer to \\research\library1
Dim WshNetwork
Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.SetDefaultPrinter "\\research\library1"
'udskriv...
WshNetwork.SetDefaultPrinter "\\research\library2"
Virker ikke med dos-tilknyttede printere som fx. LPT1.
WScript.Network er indbygget i Windows, men det er muligt du skal refere til
et bibliotek før den godtager det. Ellers søg på nettet efter det.
Man kan ellers også gøre det via API
http://vb.mvps.org/articles/dd200202.asp
http://www.experts-exchange.com/Programming/Programming_Languages/Visual_Basic/Q_10163669.html
--
///M