@@ -5,6 +5,8 @@ Imports System.ComponentModel
55
66Public Class MainForm
77
8+ Private RestartMessage As String , ProcessExitCodeMessage As String
9+
810 Private Sub MainForm_Load(sender As Object , e As EventArgs) Handles MyBase .Load
911 ' Since we need Windows Server to run PXE Helper Servers, we'll block access to that page
1012 ' on non-Server Windows.
@@ -14,6 +16,74 @@ Public Class MainForm
1416 LinkLabel3.Enabled = (instTypeVal = "Server" )
1517 PictureBox4.Image = If (instTypeVal = "Server" , My.Resources.arrow_normal, My.Resources.arrow_disabled)
1618 PictureBox4.Enabled = (instTypeVal = "Server" )
19+
20+ Select Case My.Computer.Info.InstalledUICulture.ThreeLetterWindowsLanguageName
21+ Case "ENU" , "ENG"
22+ RestartMessage = "This will restart your computer. Make sure you have configured your computer to boot via installation media. Do you want to restart?"
23+ ProcessExitCodeMessage = "Process exited with code 0x{0}:" & CrLf & CrLf & "{1}"
24+ Label1.Text = "What do you want to do?"
25+ Label3.Text = "Start a PXE Helper Server for Network Installation"
26+ LinkLabel1.Text = "Install an Operating System"
27+ LinkLabel2.Text = "Restart to Installation Media"
28+ LinkLabel3.Text = "Start a PXE Helper Server for Network Installation"
29+ LinkLabel4.Text = "Prepare System for Image Capture"
30+ LinkLabel5.Text = "Back"
31+ LinkLabel7.Text = "Start PXE Helper Server for FOG"
32+ LinkLabel8.Text = "Start PXE Helper Server for Windows Deployment Services"
33+ ExitLink.Text = "Exit"
34+ Case "ESN"
35+ RestartMessage = "Esto reiniciará su equipo. Asegúrese de haber configurado el equipo para iniciar este medio de instalación. ¿Desea reiniciar?"
36+ ProcessExitCodeMessage = "El proceso terminó con código 0x{0}:" & CrLf & CrLf & "{1}"
37+ Label1.Text = "¿Qué desea hacer?"
38+ Label3.Text = "Iniciar un servidor de PXE Helpers para instalación en red"
39+ LinkLabel1.Text = "Instalar un sistema operativo"
40+ LinkLabel2.Text = "Reiniciar desde el medio de instalación"
41+ LinkLabel3.Text = "Iniciar un servidor de PXE Helpers para instalación en red"
42+ LinkLabel4.Text = "Preparar el sistema para captura de imágenes"
43+ LinkLabel5.Text = "Atrás"
44+ LinkLabel7.Text = "Iniciar el servidor de PXE Helpers para FOG"
45+ LinkLabel8.Text = "Iniciar el servidor de PXE Helpers para WDS"
46+ ExitLink.Text = "Salir"
47+ Case "FRA"
48+ RestartMessage = "Votre ordinateur va redémarrer. Assurez-vous qu’il est configuré pour démarrer sur le média d’installation. Voulez-vous redémarrer ?"
49+ ProcessExitCodeMessage = "Processus terminé avec le code 0x{0} :" & CrLf & CrLf & "{1}"
50+ Label1.Text = "Que voulez-vous faire ?"
51+ Label3.Text = "Démarrer un serveur PXE Helper pour l’installation réseau"
52+ LinkLabel1.Text = "Installer un système d’exploitation"
53+ LinkLabel2.Text = "Redémarrer sur le média d’installation"
54+ LinkLabel3.Text = "Démarrer un serveur PXE Helper pour l’installation réseau"
55+ LinkLabel4.Text = "Préparer le système pour la capture d’image"
56+ LinkLabel5.Text = "Retour"
57+ LinkLabel7.Text = "Démarrer un serveur PXE Helper pour FOG"
58+ LinkLabel8.Text = "Démarrer un serveur PXE Helper pour WDS"
59+ ExitLink.Text = "Sortie"
60+ Case "PTB" , "PTG"
61+ RestartMessage = "O computador será reiniciado. Certifique-se de que está configurado para iniciar pelo meio de instalação. Deseja reiniciar?"
62+ ProcessExitCodeMessage = "Processo terminou com o código 0x{0}:" & CrLf & CrLf & "{1}"
63+ Label1.Text = "O que deseja fazer?"
64+ Label3.Text = "Iniciar servidor PXE Helper para instalação em rede"
65+ LinkLabel1.Text = "Instalar um sistema operativo"
66+ LinkLabel2.Text = "Reiniciar para o meio de instalação"
67+ LinkLabel3.Text = "Iniciar servidor PXE Helper para instalação em rede"
68+ LinkLabel4.Text = "Preparar sistema para captura de imagem"
69+ LinkLabel5.Text = "Voltar"
70+ LinkLabel7.Text = "Iniciar servidor PXE Helper para FOG"
71+ LinkLabel8.Text = "Iniciar servidor PXE Helper para WDS"
72+ ExitLink.Text = "Sair"
73+ Case "ITA"
74+ RestartMessage = "Il computer verrà riavviato. Assicurati che sia configurato per avviarsi dal supporto di installazione. Vuoi riavviare?"
75+ ProcessExitCodeMessage = "Processo terminato con codice 0x{0}:" & CrLf & CrLf & "{1}"
76+ Label1.Text = "Cosa vuoi fare?"
77+ Label3.Text = "Avvia server PXE Helper per installazione di rete"
78+ LinkLabel1.Text = "Installa un sistema operativo"
79+ LinkLabel2.Text = "Riavvia al supporto di installazione"
80+ LinkLabel3.Text = "Avvia server PXE Helper per installazione di rete"
81+ LinkLabel4.Text = "Prepara sistema per acquisizione immagine"
82+ LinkLabel5.Text = "Indietro"
83+ LinkLabel7.Text = "Avvia server PXE Helper per FOG"
84+ LinkLabel8.Text = "Avvia server PXE Helper per WDS"
85+ ExitLink.Text = "Esci"
86+ End Select
1787 End Sub
1888
1989 Private Sub ExitLink_LinkClicked(sender As Object , e As LinkLabelLinkClickedEventArgs) Handles ExitLink.LinkClicked
@@ -51,7 +121,7 @@ Public Class MainForm
51121 Dim exitCode As Integer = ProcessHelper.RunProcess(FilePath, Arguments, RunAsAdmin)
52122 Visible = True
53123 If exitCode <> 0 Then
54- MsgBox( String .Format( "Process exited with code 0x{0}:" & CrLf & CrLf & "{1}" , Hex(exitCode), New Win32Exception(exitCode).Message),
124+ MsgBox( String .Format(ProcessExitCodeMessage , Hex(exitCode), New Win32Exception(exitCode).Message),
55125 vbOKOnly + vbExclamation, Text)
56126 End If
57127 End Sub
@@ -61,20 +131,20 @@ Public Class MainForm
61131 End Sub
62132
63133 Private Sub LinkLabel2_LinkClicked(sender As Object , e As LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
64- If MsgBox( "This will restart your computer. Make sure you have configured your computer to boot via installation media. Do you want to restart?" , vbYesNo + vbQuestion, "Computer Restart" ) = MsgBoxResult.Yes Then
134+ If MsgBox(RestartMessage , vbYesNo + vbQuestion, Text ) = MsgBoxResult.Yes Then
65135 RunProcess(Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Windows), "system32" , "shutdown.exe" ), "/r /t 0" )
66136 End If
67137 End Sub
68138
69139 Private Sub LinkLabel8_LinkClicked(sender As Object , e As LinkLabelLinkClickedEventArgs) Handles LinkLabel8.LinkClicked
70140 RunProcess(Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Windows), "system32" , "WindowsPowerShell" , "v1.0" , "powershell.exe" ),
71- "-Executionpolicy Bypass -Command iex " & Quote & Path.Combine(Application.StartupPath, "pxehelpers" , "wds" , "wdshelper_server.ps1" ) & Quote,
141+ "-Executionpolicy Bypass -File " & Quote & Path.Combine(Application.StartupPath, "pxehelpers" , "wds" , "wdshelper_server.ps1" ) & Quote,
72142 True )
73143 End Sub
74144
75145 Private Sub LinkLabel7_LinkClicked(sender As Object , e As LinkLabelLinkClickedEventArgs) Handles LinkLabel7.LinkClicked
76146 RunProcess(Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.Windows), "system32" , "WindowsPowerShell" , "v1.0" , "powershell.exe" ),
77- "-Executionpolicy Bypass -Command iex " & Quote & Path.Combine(Application.StartupPath, "pxehelpers" , "fog" , "foghelper_server.ps1" ) & Quote,
147+ "-Executionpolicy Bypass -File " & Quote & Path.Combine(Application.StartupPath, "pxehelpers" , "fog" , "foghelper_server.ps1" ) & Quote,
78148 True )
79149 End Sub
80150
0 commit comments