Tilføj Printer efter Computernavn

hej nu har jeg lavet et VBScript
som finder et computernavn og tilføjer en printer.

Men da vi nu har omkring 300 maskiner er det ikke optimalt at skulle skrive dette ind hvergang. Derfor ville jeg høre om nogen kunne hjælpe med at få den til at køre pr.
Lokale.

Vores computernavne er bygget op over det strategi

PC "Lokale" U "Maskine"
altså:
PC142U12
Lokale 142 Maskine 12

derfor skal vi ha taget lokalerne ud derfra
dvs jeg skal bruge noget som kan læse de 3 tegn 3+4+5 og så ha en If commando på det.


<code>
Set WshNetwork = WScript.CreateObject("WScript.Network")

If WshNetwork.ComputerName = "PC003U6" Then
WshNetwork.AddWindowsPrinterConnection "\\olympia\Farveprinter i 0.03"
WshNetwork.SetDefaultPrinter "\\olympia\Farveprinter i 0.03"
Else
WScript.Echo "Kender ikke maskinen"
End If
</code>