Ayuda con auto instalacion de AntiVir

Pregunta Sin Miedo no te cortes cualquier cosa para empezar - Autoit se comienza facilmente.Para Ordenes o Comandos sueltos. Ver nota como preguntar.
erickvcr
Mensajes: 4
Registrado: 13 Feb 2009, 20:14

Ayuda con auto instalacion de AntiVir

Mensaje por erickvcr »

Necesito una ayudadita, les explico:
Estoy intentando hacer un auto instalador del Antivir, puesto que la funcion /s no lo hace por completo asiq ue tuve que crear un script para las demas ventanas, solo que al final me pueden aparecer dos ventanas, segun la compu, una para ir directo a la actualizacion, U, otra que es la de reinicio, pense que con un if podria solucionarlo pero no lo hace, alguien podria checarme el codigo? aqui se los adjunto, el antivir se puede bajar de la pagina oficial ya que es gratuito, el link esta aqui de todas maneras
http://dw.com.com/redir?edId=3&siteId=4 ... 3d10322935

este es mi codigo:

Código: Seleccionar todo

#region - antivir install script - (RAR SFX)
$title = "Avira AntiVir Personal - Free Antivirus"
$title2 = "Avira AntiVir Personal - Free Antivirus license wizard"
$title3 = "Setup of Avira AntiVir Personal - Free Antivirus"
$i = 1
Run("antivir.exe /s")
WinWait($title,"")
ControlClick($title,"Accept&","Button1")

WinWait($title,"Welcome to the setup")
ControlClick($title,"Siguien&te >","Button2")

Winwait($title," is designed to protect")
ControlClick($title,"Siguien&te >","Button2")

WinWait($title,"Licence agreement Avira AntiVir")
ControlClick($title,"I &accept the terms of the license agreement","Button1")
ControlClick($title,"Siguien&te >","Button3")

WinWait($title,"Please confirm")
ControlClick($title,"I accept that Avira AntiVir Personal - Free Antivirus is for private use only and must not be used for any kind of commercial or business purpose","Button1")
ControlClick($title,"Siguien&te >","Button4")
WinWait($title,"Please select a setup type")
ControlClick($title,"Siguien&te >","Button6")

WinWait("Avira AntiVir Personal - Free Antivirus license wizard","You have the option to register with Avira")
ControlClick($title2,"Yes, I would like to register as a user of Avira AntiVir Personal - Free Antivirus","Button1")
ControlClick($title2,"Yes, I would like to subscribe to the Avira newsletter","Button2")
ControlClick($title2,"Siguien&te >","Button5")
Winwait($title,"was successful")
ControlClick($title,"Show readme.txt","Button1")


	if Not WinActive($title,"restart your computer now") Then
		ControlClick($title,"Finalizar","Button11")
		WinWait("Setup of Avira AntiVir Personal - Free Antivirus","start an update")
		ControlClick($title3,"&No","Button2")
		WinWait("Luke Filewalker","")
		WinKill("Luke Filewalker")
	Else
		WinWait($title3,"restart your computer now")
		ControlClick($title3,"&No","Button2")
	EndIf



#EndRegion
Responder