Computer Deployment

Set WshShell = CreateObject(“Wscript.Shell”)

Sub Window_onLoad
window.resizeTo 450,400

‘turn off setup flag in registry so we can query wmi
WshShell.RegWrite “HKLM\SYSTEM\Setup\SystemSetupInProgress”, 0, “REG_DWORD”

‘query wmi for serial number
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
strComputer = “.”
Set objWMIService = GetObject(“winmgmts:\\” & strComputer & “\root\CIMV2″)
Set colItems = objWMIService.ExecQuery(“SELECT * FROM Win32_BIOS”, “WQL”, _
wbemFlagReturnImmediately + wbemFlagForwardOnly)

For Each objItem In colItems
serialNumber = objItem.SerialNumber
Next

‘turn setup flag back on
WshShell.RegWrite “HKLM\SYSTEM\Setup\SystemSetupInProgress”, 1, “REG_DWORD”

‘put the serial number that was retrieved in the textbox
ComputerNameArea.Value = serialNumber

End Sub

Sub modUnattend

run_button.Disabled = True

Set fso = CreateObject(“Scripting.FileSystemObject”)

base = Wshshell.ExpandEnvironmentStrings(“%SystemRoot%”)
unattendFile = base & “\Panther\unattend.xml”

computerName = ComputerNameArea.Value
domainName = DomainNameArea.Value
userName = UserNameArea.Value
domainAdminPass = PasswordArea.Value
OUName = OUNameArea.Value

Set xmlDoc = CreateObject(“Microsoft.XMLDOM”)
xmlDoc.load unattendFile

‘Iterate through Unattend.xml searching for nodes and properties to replace
Set oNodes = xmlDoc.documentElement.selectNodes(“/unattend/settings/component/ComputerName”)
For each n in oNodes
n.text = computerName
xmlDoc.save unattendFile
Next

Set oNodes = xmlDoc.documentElement.selectNodes(“/unattend/settings/component/Identification/Credentials/Domain”)
For each n in oNodes
n.text = domainName
xmlDoc.save unattendFile
Next

Set oNodes = xmlDoc.documentElement.selectNodes(“/unattend/settings/component/Identification/Credentials/Password”)
For each n in oNodes
n.text = domainAdminPass
xmlDoc.save unattendFile
Next

Set oNodes = xmlDoc.documentElement.selectNodes(“/unattend/settings/component/Identification/Credentials/Username”)
For each n in oNodes
n.text = userName
xmlDoc.save unattendFile
Next

Set oNodes = xmlDoc.documentElement.selectNodes(“/unattend/settings/component/Identification/JoinDomain”)
For each n in oNodes
n.text = domainName
xmlDoc.save unattendFile
Next

Set oNodes = xmlDoc.documentElement.selectNodes(“/unattend/settings/component/Identification/MachineObjectOU”)
For each n in oNodes
n.text = OUName
xmlDoc.save unattendFile
Next

‘launch the continuation of setup in a hidden window and wait for return
‘if we dont wait, closing mshta, closes windeploy.exe
WshShell.Run “%WINDIR%\System32\oobe\windeploy.exe”, 0, True
idTimer = window.setTimeout(“closeHTA”, 5000, “VBScript”)
End Sub

Sub closeHTA
window.close
End Sub

Sub commandLine
WshShell.Run “%WINDIR%\System32\cmd.exe”, 1, True
End Sub

Computer Name:

Domain Name:

Container OU:

Desktops
Laptops

User Name:

Password:

Note: The following characters are invalid for use in the computer name: ” `~!@#$%^&*()=+[]{}\|;:’”,/?. ”
You will not recieve any warning regarding incorrectly supplied parameters during setup. If any of them are incorrect, setup completion
may take a long time.

These are not available when I add amd64_Microsoft-Windows-Deployment_6.1.7600.16385_neutral to specialize

Order: 1
path: net user administrator /active:yes
WillReboot: Never
RunSynchronousCommand[Order="1"]

RunSynchronous

AND you can not add amd64_Microsoft-Windows-Shell-Setup_6.1.7600.16385_neutral
to odbe system the selection is grayed out when you right click.

Any thoughts?

I have tryed deleting the computer name line but still get no promt at install. Is there anyway around this?
I have used Mysysprep which prompts for computer name but then does not add the machine to the network.

Any help would be great it seems to be one or the other at the moment.

I followed all the steps. The language bar customizations does not appear on the target machine

http://social.technet.microsoft.com/Forums/en-US/w7itprogeneral/thread/0be9b1f0-a21f-4889-9568-6ec455689aa9/

Just make sure to follow all the steps. In addition I discovered that the first registry key found in step 10 is the Wallpaper setting – in order to retain that setting I saved my wallpaper image in the Public Pictures Library while I was setting up the dummy profile to copy, then rather than deleting the Wallpaper key I change the username to %username% – worked perfectly. I’ve also experimented with loading the default ntuser.dat hive to make other minor default profile changes, like setting the IE home page to our website.

Oh, and I don’t use the CopyProfile setting in the unattend.xml file.

I like to have an image with the latest Winodws/Office update, configured the profile and setting in audit mode but it looks like Windows update keeps giving me error in audit mode.

Thanks