byMaPa Posted August 13, 2013 Share Posted August 13, 2013 (edited) If Not FileExists(@WindowsDir & "\System32\Drivers\a.sys") Then If @OSArch = "X86" Then ShellExecuteWait(@TempDir & "\x86.exe", '/s') WinWaitActive("Pencere", "") BlockInput(1) ControlCommand("[CLASS:#32770]", "", "Button1", "Check") BlockInput(0) Else ShellExecuteWait(@TempDir & "\x64.exe", 'add') WinWaitActive("Pencere", "") BlockInput(1) ControlCommand("[CLASS:#32770]", "", "Button1", "Check") BlockInput(0) EndIf Else MsgBox(0x00000010, "Hata", "Zaten Kurulu", 5) EndIf Bu kod script üzerinde gayet iyi çalışıyor fakat exe haline getirince controlcommanad çalışmıyor yani düğmeye basmıyor. Hatta daha doğrusu winwaitactive çalışmıyor. yani gelen pencereyi tanımıyor. ama script üzerinde deneyince pencereyi tanıyor. Edited August 13, 2013 by byMaPa Quote Link to comment Share on other sites More sharing options...
reyiz Posted August 14, 2013 Share Posted August 14, 2013 Winwaitactive değil winwait kullan. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Winwaitactive değil winwait kullan. olmadı üstad ya bunu sana canlı olarak göstermem lazım 2 yerde var aynı sorun Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Sorun bu satırda ; ShellExecuteWait(@TempDir & "\x86.exe", '/s') Olması gereken ; ShellExecute(@TempDir & "\x86.exe", '/s') Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Sorun bu satırda ; ShellExecuteWait(@TempDir & "\x86.exe", '/s') Olması gereken ; ShellExecute(@TempDir & "\x86.exe", '/s') malesef olmadı. Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Temp klasöründe dosyanın olup olmadığından emin olun. Scriptte başka sorun yok. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Temp klasöründe dosyanın olup olmadığından emin olun. Scriptte başka sorun yok. hepsi olur ama shellexecute hiç olmaz. çünkü direk kurulmasını beklemeden diğer satırlara geçiyor ve bilgisayarda deepfreeze var yani temp klasöründe aynı isimde dosya olması imkansız. Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Program kurulduktan sonra açılan pencereye mi tıklatacaksın, yoksa yükleme esnasında kurulum ekranına mı tıklatacaksın ? Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Program kurulduktan sonra açılan pencereye mi tıklatacaksın, yoksa yükleme esnasında kurulum ekranına mı tıklatacaksın ? parametre ile kuruyorum ve kurulumdan sonra kurulum tamamlandı gibisinden pencere geliyor. o pencereyi kapatmak amacım Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 O zaman ShellExecuteWait kullanamazsın, çünkü kodlar kurulum tamamlandı penceresi görünüp kapandıktan sonra devreye girer ve hiçbir anlamı olmaz. Traytip'i kapatmaya çalışıyorsun herhalde, nasıl kapanır bilemiyorum. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 O zaman ShellExecuteWait kullanamazsın, çünkü kodlar kurulum tamamlandı penceresi görünüp kapandıktan sonra devreye girer ve hiçbir anlamı olmaz. Traytip'i kapatmaya çalışıyorsun herhalde, nasıl kapanır bilemiyorum. aynen sorunu şimdi anladım. shellexecute diyip winwait yapsam pencereyi bekler mi acaba bi de öyle deniyim Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Bekler herhalde niye beklemesin, daha denemeden hiç olmaz diyorsun. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 olmadı. shellexecute diyince pencereyi beklemiyor Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Dosyayı ve kodları olduğu gibi bi ver de ona göre bakalım, böyle olacağı yok. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Dosyayı ve kodları olduğu gibi bi ver de ona göre bakalım, böyle olacağı yok. team versem özelden uyar mı? Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Uymaz. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 (edited) #RequireAdmin FileInstall("SPTDinst-x64.exe", @TempDir & "\SPTDinst-x64.exe", 1) FileInstall("SPTDinst-x86.exe", @TempDir & "\SPTDinst-x86.exe", 1) If Not FileExists(@WindowsDir & "\System32\Drivers\sptd.sys") Then If @OSArch = "X86" Then ShellExecute(@TempDir & "\SPTDinst-x86.exe", 'add') WinWait("SPTD setup V1.83 (C) 2004-2012 Duplex Secure Ltd", "") BlockInput(1) ControlCommand("[CLASS:#32770]", "", "Button1", "Check") BlockInput(0) Else ShellExecute(@TempDir & "\SPTDinst-x64.exe", 'add') WinWait("SPTD setup V1.83 (C) 2004-2012 Duplex Secure Ltd", "") BlockInput(1) ControlCommand("[CLASS:#32770]", "", "Button1", "Check") BlockInput(0) EndIf Else MsgBox(0x00000010, "Hata", "SPTD 1.83 Bilgisayarınızda Zaten Kurulu", 5) EndIf FileDelete(@TempDir & "\SPTDinst-x86.exe") FileDelete(@TempDir & "\SPTDinst-x64.exe") Exit autoit bilgim fazla yok ancak bu kadar yazabildim Edited August 14, 2013 by byMaPa Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 ShellExecute(@TempDir & "\SPTDinst-x64.exe", "open") şeklinde denesene. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 ShellExecute(@TempDir & "\SPTDinst-x64.exe", "open") şeklinde denesene. open parametresiyle kurmadı Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Sen versene o programı, bir de ben bakayım Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Sen versene o programı, bir de ben bakayım http://www.solidfiles.com/d/e7a5b12c3a/ Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Her türlü denememe rağmen bir sonuç elde edemedim, ilginç. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Her türlü denememe rağmen bir sonuç elde edemedim, ilginç. Önemli değil sağol yine de. Ben uğraşayım biraz daha. Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted August 14, 2013 Share Posted August 14, 2013 Send ile Enter da gönderdim ama nafile. Quote Link to comment Share on other sites More sharing options...
byMaPa Posted August 14, 2013 Author Share Posted August 14, 2013 Send ile Enter da gönderdim ama nafile. sorun shellexecutewait diyince alt satıra geçmiyor shellexecute diyince de winwait i atlıyor Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.