@@ -16,7 +16,7 @@ Public Class NewUnattendWiz
16
16
17
17
Dim DotNetRuntimeSupported As Boolean
18
18
Dim PreferSelfContained As Boolean
19
- Dim UnattendGenReleaseTag As String = "24122 "
19
+ Dim UnattendGenReleaseTag As String = "2511 "
20
20
21
21
' Regional Settings Page
22
22
Dim ImageLanguages As New List( Of ImageLanguage)
@@ -33,6 +33,7 @@ Public Class NewUnattendWiz
33
33
Dim SelectedArchitecture As New DismProcessorArchitecture()
34
34
Dim Win11Config As New SVSettings()
35
35
Dim PCName As New ComputerName()
36
+ Dim UseConfigSet As Boolean
36
37
37
38
' Time Zone Panel
38
39
Dim TimeOffsets As New List( Of TimeOffset)
@@ -339,6 +340,7 @@ Public Class NewUnattendWiz
339
340
GenericKeys.Add(NewKeyVar( "2B87N-8KFHP-DKV6R-Y2C8J-PKCKT" )) ' Pro N
340
341
GenericKeys.Add(NewKeyVar( "WYPNQ-8C467-V2W6J-TX4WX-WT2RQ" )) ' Pro N for Workstations
341
342
GenericKeys.Add(NewKeyVar( "XGVPP-NMH47-7TTHJ-W3FW7-8HV2C" )) ' Enterprise
343
+ GenericKeys.Add(NewKeyVar( "WGGHN-J84D6-QYCPR-T7PJ7-X766F" )) ' Enterprise N
342
344
343
345
DynaLog.LogMessage( "Adding default users. 1 Admin and 4 unused Users..." )
344
346
UserAccountsList.Add( New User( True , "Admin" , "" , UserGroup.Administrators))
@@ -651,6 +653,7 @@ Public Class NewUnattendWiz
651
653
CheckBox2.Checked = False
652
654
CheckBox3.Checked = True
653
655
TextBox1.Text = ""
656
+ CheckBox19.Checked = False
654
657
' Restore time zone
655
658
ComboBox5.SelectedItem = DefaultOffset.DisplayName
656
659
RadioButton1.Checked = True
@@ -929,7 +932,8 @@ Public Class NewUnattendWiz
929
932
"- Windows 11 Settings:" & CrLf &
930
933
" - Bypass System Requirements? " & If (Win11Config.LabConfig_BypassRequirements, "Yes" , "No" ) & CrLf &
931
934
" - Bypass Mandatory Network Connection? " & If (Win11Config.OOBE_BypassNRO, "Yes" , "No" ) & CrLf &
932
- "- Computer name: " & If (PCName.DefaultName, "random by Windows" , PCName.Name) & CrLf)
935
+ "- Computer name: " & If (PCName.DefaultName, "random by Windows" , PCName.Name) & CrLf &
936
+ "- Will a configuration set or distribution share be used? " & If (UseConfigSet, "Yes" , "No" ) & CrLf)
933
937
' 3. -- TIME ZONE
934
938
TextBox13.AppendText( "Time zone configuration: " & If (TimeOffsetInteractive, "based on regional settings" & CrLf, CrLf))
935
939
If Not TimeOffsetInteractive Then
@@ -1607,6 +1611,8 @@ Public Class NewUnattendWiz
1607
1611
Return "pro_workstations_n"
1608
1612
Case "Enterprise"
1609
1613
Return "enterprise"
1614
+ Case "Enterprise N"
1615
+ Return "enterprise_n"
1610
1616
End Select
1611
1617
Return ""
1612
1618
End Function
@@ -1690,6 +1696,10 @@ Public Class NewUnattendWiz
1690
1696
If Not PCName.DefaultName Then
1691
1697
UnattendGen.StartInfo.Arguments &= " /computername=" & PCName.Name
1692
1698
End If
1699
+ DynaLog.LogMessage( "Saving configuration set/distribution share settings..." )
1700
+ If UseConfigSet Then
1701
+ UnattendGen.StartInfo.Arguments &= " /ConfigSet"
1702
+ End If
1693
1703
ReportMessage( "Saving user settings..." , 10 )
1694
1704
DynaLog.LogMessage( "Saving time zone settings..." )
1695
1705
If TimeOffsetInteractive Then
@@ -2306,4 +2316,8 @@ Public Class NewUnattendWiz
2306
2316
Private Sub Button3_MouseHover(sender As Object , e As EventArgs) Handles Button3.MouseHover
2307
2317
CNameTTip.Show( "Uses the name of your computer as the computer name of the unattended answer file." & CrLf & "Only use this if the system you want to target is this one" , sender)
2308
2318
End Sub
2319
+
2320
+ Private Sub CheckBox19_CheckedChanged(sender As Object , e As EventArgs) Handles CheckBox19.CheckedChanged
2321
+ UseConfigSet = CheckBox19.Checked
2322
+ End Sub
2309
2323
End Class
0 commit comments