Nunca antepongas esa semejante CHORRADA a una necesidad de bienestar físico, Porque entonces ya no sentirás que pierdes femeninidad, Sinó humanidad (Y neuronas del calor).

Yo me corto la melena de arriba, Y la de abajo, ¿Pierdo mascunilidad?, Pues no, Y encima me siento más a gusto (Y ellas también...). Puf... Todo está en tu mente de mujer, Y no es para tomarse a broma que dudes ante la pregunta que has hecho, Lo grave es que tengas dudas, En serio, Piensalo mejor.

Saludos.

+1
Toda la razón del mundo.

Si no te importa tener que reinstalar el SO en un par de meses (Porque con la RTM te podrán venir problemas de las típicas beta y no sabrás de donde vienen, preguntarás en foros, y nadie tendrá respuesta, y al final por todo eso reinstalaras para ponerte la versión oficial)... Entonces merece la pena, De lo contrario, Escucha a Vicentnala.

Saludos

Aún no ha salido Windows 8 y ya todo el mundo busca un crack...

Las versiones consummer preview, RTM, etc, son eso, Versiones Beta, Y tendrán sus diferencias ante la versión final de Windows 8. A favor tengo que decir que seguramente los cambios no afecten a la parte importante (Donde se realiza el método de activación pirata) pero no creo que nadie se moleste en programar un activador para la versión RTM...

EDITO: Si el activador de DAZ loader sigue progresando con los seriales de Windows 8 es posible que lo hagan compatible con Windows 8, Pero los demás activadores de Windows 7, Ni lo sueñes xD.


Solo habrá 4 ediciones.

Windows 8
Windows 8 PRO
Windows 8 ENTERPRISE
Windows 8 RT (OEM de Tablets)

Saludos.

Este script sirve para auto-instalar una máquina virtual en VirtualBox, Sin necesidad de abrir el programa y darle al botón de "Máquina > Agregar".

La idea del script es automatizar la tarea de instalar una máquina clonada, en otros equipos (Por ejemplo).

Instrucciones:
1º - Hacer un backup de una máquina virtual o Clonar una máquina virtual en una carpeta.
2º - Meter este script en la carpeta junto a los archivos de la máquina clonada (máquina.vbox, disco.vhd, script.bat , etc...)
3º - Ejecutar el script.

PD: Cada vez hago scripts más raros

EDITO: Bug corregido
Nueva versión

@Echo OFF
Title VBOX VirtualMachine Installer by Elektro H@cker v0.3
REM Testeado con la versión 4.1.18 de VirtualBox
Color 07
 
Echo.
Echo: VBOX VirtualMachine Installer  by Elektro H@cker
Echo: _____________________________  _________________ | MORE
 
:: Comprueba si existe VirtualBOX en el sistema.
REG Query "HKEY_CURRENT_USER\Software\Oracle\VirtualBox\Install" | Find /I "installed" >NUL 2>&1 || (
	Echo La operaci¢n se ha cancelado porque VirtualBox no est… instalado en este PC. | MORE
	Timeout /T 10 || (Pause)
	Exit /B 1
)
 
:: Comprueba si existe el archivo de configuración de VirtualBox, De lo contrario, Crea el archivo por defecto.
If Not Exist "%USERPROFILE%\.VirtualBox\VirtualBox.xml" (
	(
	Echo ^<?xml version="1.0"?^>
	Echo ^<!--
	Echo ** DO NOT EDIT THIS FILE.
	Echo ** If you make changes to this file while any VirtualBox related application
	Echo ** is running, your changes will be overwritten later, without taking effect.
	Echo ** Use VBoxManage or the VirtualBox Manager GUI to make changes.
	Echo --^>
	Echo ^<VirtualBox xmlns="http://www.innotek.de/VirtualBox-settings" version="1.12-windows"^>
	Echo   ^<Global^>
	Echo     ^<ExtraData^>
	Echo       ^<ExtraDataItem name="GUI/DetailsPageBoxes" value="general,system,preview,display,storage,audio,network,usb,sharedFolders,description"/^>
	Echo       ^<ExtraDataItem name="GUI/LastWindowPosition" value="575,245,770,550"/^>
	Echo       ^<ExtraDataItem name="GUI/SplitterSizes" value="302,463"/^>
	Echo       ^<ExtraDataItem name="GUI/UpdateCheckCount" value="2"/^>
	Echo       ^<ExtraDataItem name="GUI/UpdateDate" value="1 d, 2012-08-17, stable, 4.1.18"/^>
	Echo     ^</ExtraData^>
	Echo     ^<MachineRegistry/^>
	Echo     ^<MediaRegistry^>
	Echo       ^<HardDisks/^>
	Echo       ^<DVDImages/^>
	Echo       ^<FloppyImages/^>
	Echo     ^</MediaRegistry^>
	Echo     ^<NetserviceRegistry^>
	Echo       ^<DHCPServers^>
	Echo         ^<DHCPServer networkName="HostInterfaceNetworking-VirtualBox Host-Only Ethernet Adapter" IPAddress="192.168.56.100" networkMask="255.255.255.0" lowerIP="192.168.56.101" upperIP="192.168.56.254" enabled="1"/^>
	Echo       ^</DHCPServers^>
	Echo     ^</NetserviceRegistry^>
	Echo     ^<SystemProperties defaultMachineFolder="C:\Users\Administrador\VirtualBox VMs" defaultHardDiskFormat="VDI" VRDEAuthLibrary="VBoxAuth" webServiceAuthLibrary="VBoxAuth" LogHistoryCount="3"/^>
	Echo     ^<USBDeviceFilters/^>
	Echo   ^</Global^>
	Echo ^</VirtualBox^>
	) > "%USERPROFILE%\.VirtualBox\VirtualBox.xml"
)
 
:: Elimina el archivo temporal (Si existiera).
Del /Q "%userprofile%\.VirtualBox\virtualbox.xml.tmp" 2>NUL
 
For /R %%@ in (*.vbox) DO (
 
:: Obtiene el nombre de la máquina virtual.
	Set "Name=%%~n@"
	Call Echo M…quina virtual encontrada: "%%NAME%%" | MORE
 
:: Obtiene el Machine UUID de la máquina virtual.
	For /F "Tokens=2 Delims={}" %%A in ('Type "%%@" ^| Find /I "Machine uuid"') Do (Set "Machine_UUID={%%A}")
 
:: Obtiene el HardDisk UUID de la máquina virtual.
	For /F "Tokens=2 Delims={}" %%A in ('Type "%%@" ^| Find /I "HardDisk uuid"') Do (Set "HardDisk_UUID={%%A}")
 
:: Obtiene el formato del disco duro virtual.
	For /F "Tokens=4 Delims==" %%A in ('Type "%%@" ^| Find /I "HardDisk uuid="') Do (Set "DISK=%%A"))
	Set "DISK=%DISK:~1,3%"
)
 
:: Obtiene el directorio por defecto de las máquinas virtuales de VBOX.
For /F tokens^=2^ delims^=^" %%A in ('Type ^"%USERPROFILE%\.VirtualBox\VirtualBox.xml^" ^| Find /I ^"defaultMachineFolder^"') Do (Set "FOLDER=%%A") & REM "
 
:: Comprueba si esta máquina ya está instalada.
 
Type "%userprofile%\.VirtualBox\virtualbox.xml" | find "%Machine_UUID%" >NUL 2>&1
IF NOT %ERRORLEVEL% EQU 0 (Goto :COPY)
 
Echo La m…quina virtual "%NAME%" ya existe. | MORE
Choice /M "¨Desea reemplazar la m…quina virtual?"
If "%ERRORLEVEL%" EQU "1" (Set "Replace=SI") ELSE (
	Echo La operaci¢n se ha cancelado.
	Timeout /T 5 || (Pause)
	Exit
)
 
:: Copia la máquina virtual al directorio de destino.
:COPY
Echo Copiando los archivos de la m…quina virtual "%NAME%"... | MORE
MKDIR "%FOLDER%\%NAME%\" 2>NUL
For /R %%@ in (*.vbox*) DO (Echo Copiando %%~nx@ & copy "%%@" "%FOLDER%\%NAME%\" >NUL)
For /R %%@ in (*.%DISK%) DO (Echo Copiando %%~nx@ | MORE & copy "%%@" "%FOLDER%\%NAME%\" >NUL)
If defined REPLACE (GOTO :FIN)
 
:: Comprueba si esta será la primera máquina virtual que instalaremos, O ya existen más máquinas virtuales instaladas en VirtualBox.
type "%userprofile%\.VirtualBox\virtualbox.xml" | find "<MachineRegistry>" >NUL 2>&1 && (
		Set "FirstMachine=NO"
		For /F "tokens=1 delims=:" %%X in ('type "%userprofile%\.VirtualBox\virtualbox.xml" ^| findstr /N "<MachineRegistry>"')  Do (Set Line=%%X)
	) || (
		Set "FirstMachine=YES"
		For /F "tokens=1 delims=:" %%X in ('type "%userprofile%\.VirtualBox\virtualbox.xml" ^| findstr /N "<MachineRegistry/>"') Do (Set Line=%%X)
		Set /A Line-=1
)
Set /A LastLine=LINE+1
 
:: Modifica el archivo de configuración de VirtualBox agregando las lineas necesarias.
For /F "tokens=*" %%# in ('type "%userprofile%\.VirtualBox\virtualbox.xml"') Do (
	Echo %%# >> "%userprofile%\.VirtualBox\virtualbox.xml.tmp"
	Call :Next
)
 
:Next
Set /A Next+=1
IF "%NEXT%" EQU "%LINE%" (
	IF "%FirstMachine%" EQU "NO" (
		Echo ^<MachineEntry uuid="%Machine_UUID%" src="%FOLDER%\%NAME%\%NAME%.vbox"/^> >> "%userprofile%\.VirtualBox\virtualbox.xml.tmp"
		Type "%userprofile%\.VirtualBox\virtualbox.xml" | MORE +%LINE% >> "%userprofile%\.VirtualBox\virtualbox.xml.tmp"
	) ELSE (
		Echo ^<MachineRegistry^> >> "%userprofile%\.VirtualBox\virtualbox.xml.tmp"
		Echo ^<MachineEntry uuid="%Machine_UUID%" src="%FOLDER%\%NAME%\%NAME%.vbox"/^> >> "%userprofile%\.VirtualBox\virtualbox.xml.tmp"
		Echo ^</MachineRegistry^> >> "%userprofile%\.VirtualBox\virtualbox.xml.tmp"
		Type "%userprofile%\.VirtualBox\virtualbox.xml" | MORE +%LASTLINE% >> "%userprofile%\.VirtualBox\virtualbox.xml.tmp"
	)
	Move /Y "%userprofile%\.VirtualBox\virtualbox.xml.tmp" "%userprofile%\.VirtualBox\virtualbox.xml" >NUL
	Goto :FIN
)
Goto :EOF
 
:FIN
Echo La m…quina virtual "%NAME%" se ha instalado satisfact¢riamente.
Timeout /T 5 || (Pause)
Exit

¿En que formato tienes esos archivos que intentas descomprimir?.

PD: Con WinRAR deberias poder.

Salu2.

Parece que estemos cambiando cromos xDDD

Los enlaces siguen funcionando, Si lo comentas por eso...

Saludos!

Debería funcionar correctamente en Windows 7 x64 (Lo probé en 2 máquinas virtuales), ¿En que windows lo has instalado?

PD: Por si acaso fuese este el problema: Ejecuta el instalador con privilegio de admin (Click derecho > ejecutar como administrador), Para agregar las rutas del registro que contienen el serial.

salu2

Hola,

Como mínimo deberías especificar detalladamente el error que manda el script la próxima vez que tengas una duda.
Supongo que el error que aparece en este caso al ejecutar el script es: "PERMISO DENEGADO".

El error no tiene nada que ver con los atributos de APPDATA, No importa si la carpeta está oculta o no lo está.

En lo que estás fallando es aquí, Al escribir las rutas, No le pones un slash al final del nombre de la ruta, Entonces el script lo confunde con un archivo, Y no una carpeta. Ponselo y ya no dará error.

Aquí tienes:

If objUrl.FolderExists("C:\Users\"+UserName+"\Desktop") Then
	ObjCopy.CopyFile "test.txt", "C:\Users\" + UserName + "\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\", true
	MsgBox "Instalado"
End If

PD: No te olvides de añadirle el slash al resto de rutas de tu script...

Saludos

(Estaba editando el comentario de arriba xD.)

Pues eso ya no lo sé, No fabrico el hardware de los televisores... Pero aquí tienes una respuesta más convincente:


Saludos.

Las tV solo leen FAT32 y NTFS que yo sepa, (NTFS solo algunos, escasos TV), Tienes que dejarlo en FAT32 si quieres asegurarte al 100% de que séa compatible con tu TV, Además, Lo leerá más rápido.

PD: Y con la tool que te puse arriba te soluciona lo del tamaño.

Saludos