Win2003 AD, Logon script - standard printer/bakke valg.
Hej,System: Win2003 SBS, kører AD.
Jeg har et logon script, som vist herunder:
Jeg kender ikke noget til vbs.
Jeg har brug for 2 ting:
1. hvordan giver man forskellige brugere, forskellige default printere? (de vil have den, som er tættest på.) Kan dette opsættes med grupper under AD?
2. hvordan sætter men en default bakke på den valgte standardprinter?
Mit vbs script ses her...
--------------------------
' ** PRINT **
Dim WshNetworkPrinter
Set WshNetworkPrinter = WScript.CreateObject("WScript.Network")
On error resume next
Printer1 = "\\NTSERVER\ADVPRN01"
WshNetworkPrinter.RemovePrinterConnection Printer1,True,True
If Err.Number <> 0 Then
'Msgbox "Fejl Printer1: " & Err.Description
Err.Clear
End If
' Tilføj Printere til Brugerens Profil
WshNetworkPrinter.AddWindowsPrinterConnection Printer1
If Err.Number <> 0 Then
MsgBox "Der opstod problemer i forbindelse med oprettelse af netværksdrevet!" & vbCrLf _
& "Kontakt venligst den IT Ansvarlige (UX Data ApS)." & vbCrLf _
& vbCrLf _
& "Fejlbeskrivelse:" & vbCrLf _
& vbCrLf _
& "Der er ingen netværksforbindelse til " & Printer1 & " !", vbinformation + vbokonly, "Problemer med Netværksdrev"
Err.Clear
End If
WshNetworkPrinter.SetDefaultPrinter Printer1
If Err.Number <> 0 Then
Err.Clear
End If