Vbs passwort bei mehreren PC ändern

Ich habe ein VBS um das PW zu ändern
Wie kann ich mehrere PC’s ansprechen

Pc0001 bis pc0015

Oder
Pc0001 bis pc0011 und pc0014 bis pc0015

Account= „Administrator“
Kennwort = „ttttt.1001“
'**Start Encode**
Dim oShell
Set oShell = WScript.CreateObject („WSCript.shell“)
Befehl= "net user " & Account & " " & Kennwort
oShell.run Befehl
wscript.quit