davidsuarez.es

Aqui teneis un script que he utilizado para instalar java en los pcs de una red con dominio.

Todo pc que lo ejecute se le instalará el java, evidentemente está escrito para mi dominio pero cualquiera que necesite cambiarlo para su red puede consultarme como adaptarlo.

#AutoIt3Wrapper_aut2exe=C:\Archivos de programa\AutoIt3\Aut2Exe\Aut2Exe.exe
#AutoIt3Wrapper_icon=X:\Scripts\Au3\Java_Install\Java_Install.ico
#AutoIt3Wrapper_outfile=X:\Scripts\Au3\Java_Install\Java_Install.exe
#AutoIt3Wrapper_Res_Comment=davidsuarez.es
#AutoIt3Wrapper_Res_Description=Instala el java si no existe
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=n
#AutoIt3Wrapper_Run_AU3Check=1

;############################################
;SCRIPT CREADO POR DAVID SUAREZ PARA INSTALAR
;LA VERSION DE JAVA jre1.6.0_03 DESATENDIDA
;TAMBIEN ACTUALIZA LOS ARCHIVOS DE
;ENCRIPTACION DE 256 BITS
;############################################

;$TMPDIR = EnvGet ( “TEMP”)
$TMPDIR = “c:\Temp”
$ALLUSERSPROFILE = EnvGet ( “ALLUSERSPROFILE”)
$PATH = EnvGet (“PATH”)

;Nombre de la aplicación
$AppName = “Java JRE jre1.6.0_03″
;Variable de Hora.
$Hora= @HOUR & “:” & @MIN & “:” & @SEC & ” – “
;Ruta al archivo binario del que se saca la version
$AppBinFile = @ProgramFilesDir & “\java\jre1.6.0_03\bin\java.exe”
;La version esperada….
$AppBinFileVersion = “6.0.30.5″
;El directorio de instalacion del software
$SourceDir = “\\SRVCEM1\Publico\Cerfificados\Apps\jre-6u3-windows-i586-p-s.exe”
;Archivos de encriptacion de 256 bits
$SecuritySourceDir=”\\SRVCEM1\Publico\Cerfificados\SecuritySource”

;Interface GUI
#include
$version=”2.0″
GuiCreate(“Instalador ” & $version, 300, 100, -1, -1, $WS_CAPTION+$WS_SYSMENU+$WS_DISABLED)
$BarradeProgreso = GuiCtrlCreateProgress(10, 40, 280, 20); crea la barra de progreso
$Label_2 = GuiCtrlCreateLabel(“Comprobando version de ” & $AppName, 20, 10, 310, 20) ;crea la etiqueta
$Inf = GuiCtrlCreateLabel(“Espere mientras se comprueba.” , 20, 70, 310, 20) ;crea la etiqueta
GuiSetState() ;Pinta el interfaz

;La version de java es correcta
If FileExists($AppBinFile) Then
GUICtrlSetData ($BarradeProgreso, 50); le paso un 50% a la barra de progreso
Sleep(1000) ;pausa de 2 seg para ver la barra de progreso al 50%
GUICtrlSetData($Inf,”La version es correcta.”)
GUICtrlSetData ($BarradeProgreso, 100); le paso un 100% a la barra de progreso
Sleep(2000) ;pausa de 2 seg para ver la barra de progreso al 50%
GUICtrlSetData($Inf,”Cerrando….”)
GUIDelete(“Instalador ” & $version) ; borra la ventana que se llama “Instalador 2.0″
Exit
EndIf

;la version de Java es incorrecta
GUICtrlSetData ($BarradeProgreso, 25); le paso un 50% a la barra de progreso
Sleep(2000)
GUICtrlSetData ($BarradeProgreso, 30); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”La version NO es correcta. Se actualizará.”)
Sleep(2000)
GUICtrlSetData ($BarradeProgreso, 35); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Por favor. Espere mientras se actualiza.”)
Sleep(2000)
GUICtrlSetData($Inf, @OSVersion & ” ” & @OSServicePack)
Sleep(2000)

Select
;##########################2000#############################
Case @OSVersion=”WIN_2000″
;MsgBox(0,”Tienes un…”, “DOSMIL ” & @OSServicePack & ” – ” & @OSServicePack)
$CurrentVer = FileGetVersion ( $AppBinFile )
If $CurrentVer <> $AppBinFileVersion Then
GUICtrlSetData ($BarradeProgreso, 50); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Preparando instalación……”)
Sleep(2000)

GUICtrlSetData ($BarradeProgreso, 60); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Arrancando el servicio…… 15 seg. aprox.”)
;~ Nos bajamos los archivos a un directorio temporal y arrancamos la instalacion.
DirCreate ( “c:\Temp” )
FileCopy ( “\\SRVCEM1\Publico\Cerfificados\Apps\jre1.6.0_03.msi”, “C:\Temp”, 1 )
$FileBat = FileOpen(“c:\Temp\java-1_6_0_03.bat”,1)
FileWriteLine($FileBat,”msiexec.exe /i jre1.6.0_03.msi /qn IEXPLORER=1 /log \\srvcem1\publico\informatica\logsjava\%computername%-java1.6_03.txt”)
FileClose($FileBat)
RunAsSet(“Administrador_de_la_maquina”, “DOMINIO”, “contraseña”)
Run ( “c:\temp\java-1_6_0_03.bat”,”C:\temp”,@SW_HIDE)
GUICtrlSetData ($BarradeProgreso, 65); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Preparando instalación…..”)
Sleep(10000)
GUICtrlSetData ($BarradeProgreso, 75); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Iniciando instalación…..”)
Sleep(10000)
GUICtrlSetData ($BarradeProgreso, 85); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Instalando….. Sea paciente.”)
Sleep(10000)
;Chequeamos la version despues de la instalacion
$CurrentVer = FileGetVersion ( $AppBinFile )
Else
;Cuando la version es correcta.
EndIf
GUICtrlSetData ($BarradeProgreso, 95); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Terminando instalación.”)
Sleep (10000)
;resetea los permisos de usuario
RunAsSet()
Sleep(5000)
DirRemove (@UserProfileDir & “\ Medictyon HPS”,1)
FileDelete(“C:\temp\*.bat”)
FileDelete(“C:\temp\*.msi”)
;~ ######################### XP################################
Case @OSVersion=”WIN_XP”
$CurrentVer = FileGetVersion ( $AppBinFile )
;MsgBox(0,”Control de versiones”,”Actual version: ” & $CurrentVer & ” – Versión necesitada: ” & $AppBinFileVersion)
If $CurrentVer <> $AppBinFileVersion Then
GUICtrlSetData ($BarradeProgreso, 50); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Preparando instalación……”)
Sleep(2000)
;Nos bajamos los archivos a un directorio temporal y arrancamos la instalación.
DirCreate ( “c:\Temp” )
FileCopy ( “\\SRVCEM1\Publico\Cerfificados\Apps\jre1.6.0_03.msi”, “C:\Temp”, 1 )
$FileBat = FileOpen(“c:\Temp\java-1_6_0_03.bat”,1)
FileWriteLine($FileBat,”msiexec.exe /i jre1.6.0_03.msi /qn IEXPLORER=1 /log \\srvcem1\publico\informatica\logsjava\%computername%-java1.6_03.txt”)
FileClose($FileBat)
RunAsSet(“Administrador_de_la_maquina”, “DOMINIO”, “contraseña”)
Run ( “c:\temp\java-1_6_0_03.bat”,”C:\temp”,@SW_HIDE)
GUICtrlSetData ($BarradeProgreso, 65); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Iniciando instalación…..”)
;Esperamos 20 seg tras instalar la aplicación por si las mojcas
Sleep (5000)
GUICtrlSetData ($BarradeProgreso, 85); le paso un 50% a la barra de progreso
GUICtrlSetData($Inf,”Instalando….. Sea paciente.”)
Sleep (30000)
FileDelete(“C:\temp\*.bat”)
FileDelete(“C:\temp\*.msi”)
;Chequeamos la version despues de la instalacion
$CurrentVer = FileGetVersion ( $AppBinFile )
Else
EndIf
GUICtrlSetData($Inf,”Terminando instalación.”)
Sleep (10000)
RunAsSet()
Sleep(5000)
EndSelect

GUICtrlSetData($Inf,”Creando archivos de encriptación.”)
Sleep(20000)
GUIDelete(“Instalador ” & $version) ; borra la ventana que se llama “Instalador 2.0″
;############FICHEROS DE ENCRIPTACION############################
;copio los archivos de encriptacion de 256 bits si no existen
$t = FileGetTime(“C:\Archivos de programa\Java\jre1.6.0_03\lib\security\local_policy.jar”, 0)
If Not @error then
;~ msgbox(0,”",$t[2] & “/” & $t[1] & “/” & $t[0])
$dmaaaa = $t[2] & “/” & $t[1] & “/” & $t[0]
if $dmaaaa <> “18/07/2007″ Then
$FileBat = FileOpen(“c:\Temp\j6-256.bat”,1)
FileWriteLine($FileBat,”xcopy “”\\SRVCEM1\Publico\Cerfificados\SecuritySource\*.jar”" “”C:\Archivos de programa\Java\jre1.6.0_03\lib\security\”" /Y”)
FileClose($FileBat)
Sleep(1000)
RunAsSet(“Administrador_de_la_maquina”,”DOMINIO”,”contraseña”)
RunWait(“C:\Temp\j6-256.bat”,”C:\temp”,@SW_HIDE)
RunAsSet()
Sleep(1000)
FileDelete (“c:\Temp\*.bat”)
FileDelete (“c:\Temp\*.exe”)
;~ MsgBox(0,”",”ES DISTINTO”)
Else
;~ MsgBox(0,”",”ES IGUAL”)
EndIf
Else
;~ MsgBox(0,”Error”,”Ha habido un error durante la instalación. Acepte este mensaje y continue.”)
EndIf

Vota este artículo:
Posts anterior y posterior:


Posts Relacionados:

• Instalar Java 6 y plugin para Firefox en Ubuntu 7.04.
• Extraer msi del Java Runtime Environment
• No permitir que la aplicación se ejecute más de 1 vez (Visual Basic)
• programacion.net
• htmlpoint.com