johannes Posted December 6, 2006 Share Posted December 6, 2006 Hello. I´m trying hard to install 3DMark06 version 1.1.0. All is working pretty well, except one thing: The Installation of the Open AL Installer. This is a kind of sounddriver included in the 3DMark Installer PAckage. It seems my Script doesn´t recognize the installerwindow that opens. The odd thing is that the script works when it runs as standalone Programm. Does anybody know more about this? Thank you and excuse my miserable english. expandcollapse popupOpt("WinWaitDelay",100) Opt("WinTitleMatchMode",4) Opt("WinDetectHiddenText",1) Opt("MouseCoordMode",0) ;---Start!! Run("3DMark06_v110_installer.exe") WinWait("3DMark06 - InstallShield Wizard","The InstallShield Wi") If Not WinActive("3DMark06 - InstallShield Wizard","The InstallShield Wi") Then WinActivate("3DMark06 - InstallShield Wizard","The InstallShield Wi") WinWaitActive("3DMark06 - InstallShield Wizard","The InstallShield Wi") Send("{TAB}{TAB}{ENTER}") WinWait("3DMark06 - InstallShield Wizard","I &accept the terms ") If Not WinActive("3DMark06 - InstallShield Wizard","I &accept the terms ") Then WinActivate("3DMark06 - InstallShield Wizard","I &accept the terms ") WinWaitActive("3DMark06 - InstallShield Wizard","I &accept the terms ") Send("{UP}{TAB}{TAB}{ENTER}") WinWait("3DMark06 - InstallShield Wizard","Choose Destination L") If Not WinActive("3DMark06 - InstallShield Wizard","Choose Destination L") Then WinActivate("3DMark06 - InstallShield Wizard","Choose Destination L") WinWaitActive("3DMark06 - InstallShield Wizard","Choose Destination L") Send("{ENTER}") WinWait("3DMark06 - InstallShield Wizard","Ready to Install the") If Not WinActive("3DMark06 - InstallShield Wizard","Ready to Install the") Then WinActivate("3DMark06 - InstallShield Wizard","Ready to Install the") WinWaitActive("3DMark06 - InstallShield Wizard","Ready to Install the") Send("{ENTER}") ;---DIRECT X Opt("WinTitleMatchMode",1) winwait("Question") if not winactive("Question") then winactivate("Question") Winwaitactive("Question") Send("{ENTER}") winwaitactive("Installing Microsoft(R) DirectX(R)") Send("{TAB}{TAB}{TAB}{ENTER}") winwaitactive("Installing Microsoft(R) DirectX(R)") Send("{ENTER}") sleep(5000) winwaitactive("Installing Microsoft(R) DirectX(R)") Send("{ENTER}") sleep(2000) ;--- PROBLEMZONE - This Doesn´t work Opt("WinTitleMatchMode",4) WinWait("OpenAL Installer","Cancel") If Not WinActive("OpenAL Installer","Cancel") Then WinActivate("OpenAL Installer","Cancel") WinWaitActive("OpenAL Installer","Cancel") ControlClick("OpenAL Installer", "Cancel", 2) Sleep(1000) WinWait("OpenAL Installer Message","Installation complet") If Not WinActive("OpenAL Installer Message","Installation complet") Then WinActivate("OpenAL Installer Message","Installation complet") WinWaitActive("OpenAL Installer Message","Installation complet") Send("{TAB}{ENTER}") ;--- End Problemzone ;---Registrierungscode Proto WinWait("3DMark06 - InstallShield Wizard","Futuremark Registrat") If Not WinActive("3DMark06 - InstallShield Wizard","Futuremark Registrat") Then WinActivate("3DMark06 - InstallShield Wizard","Futuremark Registrat") WinWaitActive("3DMark06 - InstallShield Wizard","Futuremark Registrat") Send("{TAB}xxxxx-xxxxx-xxxxx-xxxxx-xxxxx{TAB}{ENTER}") ;---Finalize! WinWait("3DMark06 - InstallShield Wizard","Create Desktop Short") If Not WinActive("3DMark06 - InstallShield Wizard","Create Desktop Short") Then WinActivate("3DMark06 - InstallShield Wizard","Create Desktop Short") WinWaitActive("3DMark06 - InstallShield Wizard","Create Desktop Short") Send("{SPACE}{TAB}{ENTER}") Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now