Katılımsız Kurulum Yardım

[technobecet]

Merhaba Arkaşadaşlar umarım yardımcı olursunuz bir sorunum var Ben Avg İnternet Security 2010(9.5) versiyonun katılımsız kurulum yapmak istiyom autoitle au3recorder programını kullanarak denedim açtıgımda hiçbirşey olmadı

Klavyeyi kullanarak kaydettim kodlar şunlar

Run('avgsetup.exe')

WinWait("AVG 9.0 kuruldu 785 (2/25/2010)","AVG Kurulum Programı")

If Not WinActive("AVG 9.0 kuruldu 785 (2/25/2010)","AVG Kurulum Programı") Then WinActivate("AVG 9.0 kuruldu 785 (2/25/2010)","AVG Kurulum Programı")

WinWaitActive("AVG 9.0 kuruldu 785 (2/25/2010)","AVG Kurulum Programı")

Send("{TAB}{ENTER}")

WinWait("AVG 9.0 kuruldu 785 (2/25/2010)","&Lisans sözleşmesini")

If Not WinActive("AVG 9.0 kuruldu 785 (2/25/2010)","&Lisans sözleşmesini") Then WinActivate("AVG 9.0 kuruldu 785 (2/25/2010)","&Lisans sözleşmesini")

WinWaitActive("AVG 9.0 kuruldu 785 (2/25/2010)","&Lisans sözleşmesini")

Send("{TAB}{SPACE}{TAB}{TAB}{ENTER}")

WinWait("AVG 9.0 kuruldu 785 (2/25/2010)","&Standart Yükleme

Ya")

If Not WinActive("AVG 9.0 kuruldu 785 (2/25/2010)","&Standart Yükleme

Ya") Then WinActivate("AVG 9.0 kuruldu 785 (2/25/2010)","&Standart Yükleme

Ya")

WinWaitActive("AVG 9.0 kuruldu 785 (2/25/2010)","&Standart Yükleme

Ya")

Send("{TAB}{TAB}{SPACE}")

WinWait("AVG 9.0 kuruldu 785 (2/25/2010)","Yazılımı çevrimiçi s")

If Not WinActive("AVG 9.0 kuruldu 785 (2/25/2010)","Yazılımı çevrimiçi s") Then WinActivate("AVG 9.0 kuruldu 785 (2/25/2010)","Yazılımı çevrimiçi s")

WinWaitActive("AVG 9.0 kuruldu 785 (2/25/2010)","Yazılımı çevrimiçi s")

Send("{TAB}{TAB}technobecet{TAB}technobecet{TAB}8meh-reja9-d2m3s-337lr-db9so-rembr-aced{TAB}{TAB}{ENTER}")

WinWait("AVG 9.0 kuruldu 785 (2/25/2010)","Başka bir güvenlik d")

If Not WinActive("AVG 9.0 kuruldu 785 (2/25/2010)","Başka bir güvenlik d") Then WinActivate("AVG 9.0 kuruldu 785 (2/25/2010)","Başka bir güvenlik d")

WinWaitActive("AVG 9.0 kuruldu 785 (2/25/2010)","Başka bir güvenlik d")

Send("{TAB}{TAB}{ENTER}")

WinWait("AVG 9.0 kuruldu 785 (2/25/2010)","Bilgisayarınızın güv")

If Not WinActive("AVG 9.0 kuruldu 785 (2/25/2010)","Bilgisayarınızın güv") Then WinActivate("AVG 9.0 kuruldu 785 (2/25/2010)","Bilgisayarınızın güv")

WinWaitActive("AVG 9.0 kuruldu 785 (2/25/2010)","Bilgisayarınızın güv")

Send("{TAB}{TAB}{SPACE}{TAB}{TAB}{ENTER}")

WinWait("AVG İlk Çalıştırma Sihirbazı","Installation results")

If Not WinActive("AVG İlk Çalıştırma Sihirbazı","Installation results") Then WinActivate("AVG İlk Çalıştırma Sihirbazı","Installation results")

WinWaitActive("AVG İlk Çalıştırma Sihirbazı","Installation results")

Send("{TAB}{ENTER}")

WinWait("Firewall Yapılandırma Sihirbazı","Doğrudan kablolu vey")

If Not WinActive("Firewall Yapılandırma Sihirbazı","Doğrudan kablolu vey") Then WinActivate("Firewall Yapılandırma Sihirbazı","Doğrudan kablolu vey")

WinWaitActive("Firewall Yapılandırma Sihirbazı","Doğrudan kablolu vey")

Send("{TAB}{TAB}{TAB}{ENTER}{TAB}{TAB}{TAB}{ENTER}")

WinWait("AVG İlk Çalıştırma Sihirbazı"," AVG kurulumu başarı")

If Not WinActive("AVG İlk Çalıştırma Sihirbazı"," AVG kurulumu başarı") Then WinActivate("AVG İlk Çalıştırma Sihirbazı"," AVG kurulumu başarı")

WinWaitActive("AVG İlk Çalıştırma Sihirbazı"," AVG kurulumu başarı")

Send("{TAB}{TAB}{TAB}{ENTER}")

WinWait("AVG İlk Çalıştırma Sihirbazı","Yapılandırmanın tama")

If Not WinActive("AVG İlk Çalıştırma Sihirbazı","Yapılandırmanın tama") Then WinActivate("AVG İlk Çalıştırma Sihirbazı","Yapılandırmanın tama")

WinWaitActive("AVG İlk Çalıştırma Sihirbazı","Yapılandırmanın tama")

Send("{TAB}{ENTER}")

#endregion --- ScriptWriter generated code End ---

Kodlarımda Hatada olmadıgını düşünüyorum hem otomatik kaydetti hemde başındaki "Run('avgsetup.exe')" olan bölüme kadar sildim.Ben hem kendi serialimi gimesini hemde otomatik yüklemesini istedigim için autoiti kullandım bunu başka yolu varsa videolu anlatımını verirseniz çok sevinirim yada burdaki hatamı düzeltirseniz şimdiden teşekkürler...