Aquí os dejo este archivo de instalación desatendida de Windows 8 que he hecho con WSIM (Windows System Image Manager),
Funciona de maravilla, lo único que requiere es elegir el disco donde se desea instalar Windows 8, TODO lo demás lo he dejado preconfigurado y no requiere más intervención que lo que acabo de comentar.

El nombre de usuario por defecto es "Administrador".
La red por defecto es "Hogar".
La hora, el idioma y esas cosas está configurado para Español de España.

Posibles valores que quieran modificar:
- Nombre de la organización
- Nombre del PC
- Nombre de usuario
- La clave (Si disponen de una clave legal)

...Es fácil de modificar, solo hay que buscar el valor correspondiente en este archivo de aquí abajo, y cambiar el valor.

El archivo lo guardan como "AutoUnattend.xml" y lo colocan en el DVD de Windows 8 en la carpeta principal junto al "setup.exe".

PD: No lo he testeado con Windows 8 PRO.

<?xml version="1.0" encoding="utf-8"?>
<unattend xmlns="urn:schemas-microsoft-com:unattend">
    <settings pass="windowsPE">
        <component name="Microsoft-Windows-International-Core-WinPE" processorArchitecture="amd64" publicKeyToken="31bf3856ad364e35" language="neutral" versionScope="nonSxS" xmlns:wcm="http://schemas.microsoft.com/WMIConfig/2002/State" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
            <UserLocale>es-ES</UserLocale>
            <UILanguageFallback>es-ES</UILanguageFallback>
            <UILanguage>es-ES</UILanguage>
            <SystemLocale>es-ES</SystemLocale>
            <InputLocale>es-ES</InputLocale>
        </component>
        <component name="Microsoft-Windows-Setup" processorArchitecture="amd64" publicKeyToken="31bf3856ad364e35" language="neutral" versionScope="nonSxS" xmlns:wcm="http://schemas.microsoft.com/WMIConfig/2002/State" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
            <Display>
                <HorizontalResolution>1920</HorizontalResolution>
                <VerticalResolution>1080</VerticalResolution>
                <ColorDepth>32</ColorDepth>
            </Display>
            <UserData>
                <ProductKey>
                    <WillShowUI>Never</WillShowUI>
                    <Key>FB4WR-32NVD-4RW79-XQFWH-CYQG3</Key>
                </ProductKey>
                <AcceptEula>true</AcceptEula>
                <Organization>Elektro Studios</Organization>
                <FullName>Christian Soriano</FullName>
            </UserData>
            <EnableNetwork>true</EnableNetwork>
            <EnableFirewall>true</EnableFirewall>
        </component>
    </settings>
    <settings pass="specialize">
        <component name="Microsoft-Windows-Shell-Setup" processorArchitecture="amd64" publicKeyToken="31bf3856ad364e35" language="neutral" versionScope="nonSxS" xmlns:wcm="http://schemas.microsoft.com/WMIConfig/2002/State" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
            <AutoLogon>
                <Enabled>true</Enabled>
                <LogonCount>1</LogonCount>
                <Username>Administrator</Username>
            </AutoLogon>
            <ComputerName>Elektro-PC</ComputerName>
            <ProductKey>FB4WR-32NVD-4RW79-XQFWH-CYQG3</ProductKey>
            <RegisteredOrganization>Elektro Studios</RegisteredOrganization>
            <ShowWindowsLive>false</ShowWindowsLive>
            <TimeZone>Romance Standard Time</TimeZone>
            <WindowsFeatures>
                <ShowInternetExplorer>false</ShowInternetExplorer>
                <ShowMediaCenter>false</ShowMediaCenter>
                <ShowWindowsMail>false</ShowWindowsMail>
                <ShowWindowsMediaPlayer>false</ShowWindowsMediaPlayer>
            </WindowsFeatures>
        </component>
    </settings>
    <settings pass="oobeSystem">
        <component name="Microsoft-Windows-Shell-Setup" processorArchitecture="amd64" publicKeyToken="31bf3856ad364e35" language="neutral" versionScope="nonSxS" xmlns:wcm="http://schemas.microsoft.com/WMIConfig/2002/State" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
            <OOBE>
                <HideEULAPage>true</HideEULAPage>
                <SkipUserOOBE>true</SkipUserOOBE>
                <SkipMachineOOBE>true</SkipMachineOOBE>
                <ProtectYourPC>3</ProtectYourPC>
                <NetworkLocation>Home</NetworkLocation>
                <HideWirelessSetupInOOBE>true</HideWirelessSetupInOOBE>
                <HideOnlineAccountScreens>true</HideOnlineAccountScreens>
                <HideOEMRegistrationScreen>true</HideOEMRegistrationScreen>
                <HideLocalAccountScreen>true</HideLocalAccountScreen>
            </OOBE>
            <VisualEffects>
                <FontSmoothing>On</FontSmoothing>
            </VisualEffects>
        </component>
    </settings>
    <cpi:offlineImage cpi:source="wim:c:/users/administrador/desktop/Elektro Win8-Core-Mod/x64/sources/install.wim#Windows 8" xmlns:cpi="urn:schemas-microsoft-com:cpi" />
</unattend>
 

---

---

Saludos

Sólamente he usado los códigos de ejemplo que te puse, con alguna que otra modificación.

El proyecto está hecho en VS2012, VB.NET

Saludos

Pues que los milagros suceden y el crack perfecto existe xD, ahí dejo la cosa!

Pueden cerrar este tema ya si quieren

un saludo

vamos, que no es dificil SyntaxError404

Pero si empeizas a usar if's anidados te puedes acabar liando.

Aquí tienes el source del siguiente form: http://elektrostudios.tk/WindowsApplication3.zip

Public Class Form1
 
    Dim Run_Sound As Boolean = False
    Dim Run_Program As Boolean = False
 
    Dim TotalTime As Long
    Dim Time_Elapsed_Watch As New Stopwatch
    Dim Time_Remaining_Span As New TimeSpan()
    Dim WithEvents CountDown_Timer As New Timer
 
    Dim TimeIsOut As Boolean = False
    Dim Want_To_Stop As Boolean
 
 
#Region " Form "
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        RadioButton1.Tag = "sound"
        RadioButton2.Tag = "program"
    End Sub
 
    Private Sub RadioButtons_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles _
                                                                                           RadioButton1.Click, _
                                                                                           RadioButton2.Click
        Select Case sender.tag.tolower
            Case "sound" : Run_Sound = True : Run_Program = False
            Case "program" : Run_Program = True : Run_Sound = False
            Case Else : Throw New Exception("Wrong tagname")
        End Select
 
    End Sub
 
    Private Sub NumericUpDown1_ValueChanged(sender As Object, e As EventArgs) Handles _
                                                                      NumericUpDown1.ValueChanged, _
                                                                      NumericUpDown2.ValueChanged, _
                                                                      NumericUpDown3.ValueChanged
 
        TotalTime = (NumericUpDown1.Value * 3600000) _
                  + (NumericUpDown2.Value * 60000) _
                  + (NumericUpDown3.Value * 1000)
 
    End Sub
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        TimeIsOut = False
        Want_To_Stop = False
        CountDown_Start()
        While Not TimeIsOut : Application.DoEvents() : End While
        If Not Want_To_Stop Then Time_Success()
    End Sub
 
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Want_To_Stop = True
    End Sub
 
#End Region
 
#Region " Procedures "
 
    Private Sub CountDown_Start()
        Time_Remaining_Span = TimeSpan.FromMilliseconds(TotalTime + 1000)
        Time_Elapsed_Watch.Start()
        CountDown_Timer.Start()
    End Sub
 
    Private Sub CountDown_Timer_Tick(sender As Object, e As EventArgs) Handles CountDown_Timer.Tick
 
        Dim TimeRemaining As TimeSpan = Time_Remaining_Span - Time_Elapsed_Watch.Elapsed
 
        If Want_To_Stop Then TimeIsOut = True : Time_Elapsed_Watch.Reset() : CountDown_Timer.Stop()
 
        Try
            NumericUpDown1.Value = String.Format("{0:00}", CLng(Math.Floor(TimeRemaining.TotalHours)) Mod 999999999999999999)
            NumericUpDown2.Value = String.Format("{0:00}", CLng(Math.Floor(TimeRemaining.TotalMinutes)) Mod 60)
            NumericUpDown3.Value = String.Format("{0:00}", CLng(Math.Floor(TimeRemaining.TotalSeconds)) Mod 60)
        Catch
            TimeIsOut = True
            Time_Elapsed_Watch.Reset()
            CountDown_Timer.Stop()
        End Try
 
    End Sub
 
    Private Sub Time_Success()
        If Run_Sound Then
            MsgBox("Reproducir sonido")
        ElseIf Run_Program Then
            MsgBox("Ejecutar proceso")
        Else
            Throw New Exception("Wrong option")
        End If
    End Sub
 
#End Region
 
End Class

Saludos.

En ningúna parte de tú código veo que hayas usado el código que te he mostrado, tampoco veo que hayas declarado las variables de mi ejemplo.

PD: Aunque tampoco voy a testear un código sin que me des detalles de porque "no funciona"

Saludos!

Está bien que lo aclares, no sé tanto de C# hasta el punto de saber eso,
pero de todas formas mi comentario trataba sobre en la diferencia entre "nuevo y antiguo", "actual y obsoleto", esa es la definición que le quería dar a "obsoleto".

¿Para que aprender a escribir con pluma cuando existe el bolígrafo?

Saludos!

Bueno, ya me he informado diréctamente por un moderador del foro de Microsoft y no se puede comprar individuálmente una licencia para Windows 8 Core, sólamente para Windows 8 Pro.
...Aunque gracias a una persona ya no necesito comprar nada.

Espero que a alguien con el mismo problema le sirva la información:
http://answers.microsoft.com/es-es/windows/forum/windows_8-windows_install/como-obtener-una-licencia-de-uso-casero-de-windows/44b452be-5223-41ac-b3bc-b5cf2c01113c

Saludos.

Yo no me considero un "especialista", pero si aprendes Visual Basic 6 malgastarás tiempo y estarás 100 pasos por detrás de cualquier programador, al menos un buen programador.

...No se donde has podido leer que lo mejor es VB6, pero dejemos los lenguajes obsoletos de hace décadas para la gente que quiera aprender cosas obsoletas como Pascal o VB6 por sus razones personales, pero tú no lo necesitas ni debes aprenderlo si quieres aspirar a programar cosas "importantes", sería un grave error ponerse a aprender vb6.

Si te gusta la sintaxis de VB, lo mejor es que empieces con VB.NET, si te gusta la sintaxis de C/C++, lo mejor es que empieces con C#, en resumen las dos opciones te llevan a la plataforma .NET (VisualStudio) donde puedes programar en VB.NET como en C# y otros.

Si quieres mi opinión yo me quedaría con VB.NET, por cuestión de gustos me ha sido más productivo aprenderlo y usarlo, y no hecho en falta los punteros de C# teniendo los "Intptr" de VB, sincéramente tampoco es que necesite mucho manejar punteros, pero eso creo que es en lo que más se fija la gente cuando se decide por aprender C++/C#.

PD: Lo que nombras como VB2008 y VB2010 es VB.NET

Saludos!

Cuando hago mis modificaciones y pincho en "validar respuesta" me salen un montón de errores.

En la imagen pueden ver la versión de WSIM que estoy usando,
y la imagen que estoy modificando es la ISO de un Windows 8 x64 Core.

He seguido estos pasos: www.windows-noob.com/forums/index.php?/topic/575-what-is-windows-sim-and-how-can-i-use-it/

No sé si es que estoy usando la versión incorrecta, o que... pero siempre me dice que "la configuración no se ha modificado"




Y esto es lo que yo esperaba que me saliese:

(No warnings or errors, in spanish)