FLaky Posted November 29, 2012 Share Posted November 29, 2012 mrb arkadaşlar..bazı bilgisayarlarda autoit ile hosts dosyasını editleyemiyorum...reg kaydı sildiremiyorumm..bu genellikle 64 bit sistemlerde başıma geliyor sanırım sanırım izinlerden kaynaklanıyor bunu nasıl çözebilirim? Quote Link to comment Share on other sites More sharing options...
radyofon Posted November 29, 2012 Share Posted November 29, 2012 #RequireAdmin Quote Link to comment Share on other sites More sharing options...
FLaky Posted November 29, 2012 Author Share Posted November 29, 2012 o işe yaramıyor.. Quote Link to comment Share on other sites More sharing options...
radyofon Posted November 29, 2012 Share Posted November 29, 2012 Aşağıdaki scripti uygula bakalım. Sonuç olarak ne çıkacak. [code] #AutoIt3Wrapper_res_requestedExecutionLevel = requireAdministrator ; Disabble Local User Access (LUA) $OldState = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System", "EnableLUA") $text = @LF $msgicon = 64 If $OldState Then RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System", "EnableLUA", "REG_DWORD", 0) If @error Then $text &= "Yerel kullanıcı erişimini kapatmak başarısız oldu (LUA) Kullanıcıkod: " & @error & @LF & @LF $msgicon = 48 Else $text &= "Yerel kullanıcı erişimi kapatılmış." EndIf Else $text &= "Yerel kullanıcı erişimi (LUA) kapalı zaten(LUA)." EndIf $NewState = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System", "EnableLUA") $text &= @LF & @LF & @LF & "Status: eski/yeni " & $OldState & "/" & $NewState MsgBox(4096 + 262144 + $msgicon, "DisableLUA", $text) [/code] Quote Link to comment Share on other sites More sharing options...
FLaky Posted November 29, 2012 Author Share Posted November 29, 2012 malesef işe yaramadı Quote Link to comment Share on other sites More sharing options...
radyofon Posted November 30, 2012 Share Posted November 30, 2012 (edited) Sakıncası yoksa kodları paylaşabilir misin? Bir göz atalım kodlara. Bende de host dosyası değiştirmek için bir autoit scripti vardı ama bulabilirsem karşılaştırırız. Sana UAC disable komutunu vereyim. C:\Windows\System32\cmd.exe /k %windir%\System32\reg.exe ADD HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System /v EnableLUA /t REG_DWORD /d 0 /f Edited November 30, 2012 by radyofon Quote Link to comment Share on other sites More sharing options...
SimpsoN_Bart Posted November 30, 2012 Share Posted November 30, 2012 (edited) Eğer bu kadar şey(#RequireAdmin,#AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator,kod vs) işe yaramadıysa başka bir sorun var demektir. Bir de şunu dene bakalım [codebox]; 0 = Disable UAC ; 1 = Require Password ; 2 = Permit\Deny Prompt (Default) #RequireAdmin MsgBox(0, '', _UAC_EnableDisable(0)) Func _UAC_EnableDisable($iState = 2) Local $sRegKey = 'HKEY_LOCAL_MACHINE64\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System' If @OSArch <> 'X64' Then $sRegKey = StringReplace($sRegKey, '64', '') If (@OSVersion = 'Win_Vista') Or (@OSVersion = 'Win_7') Then If RegWrite($sRegKey, 'ConsentPromptBehaviorAdmin', 'REG_DWORD', $iState) Then Return SetError(0, 0, 'İşlem Başarılı') Else Return SetError(-2, 0, 'İşlem Başarısız') EndIf Else Return SetError(-1, 0, 'Gecersiz İşletim Sistemi') EndIf EndFunc[/codebox] Ayrıca Bkz. [code]http://msdn.microsoft.com/en-us/library/cc232761.aspx[/code] [code]http://technet.microsoft.com/en-us/library/dd835564(v=WS.10).aspx[/code] Edited November 30, 2012 by SimpsoN_Bart Quote Link to comment Share on other sites More sharing options...
mesale0077 Posted November 30, 2012 Share Posted November 30, 2012 (edited) host editlemek mi tam anlayamadım Edited November 30, 2012 by mesale0077 Quote Link to comment Share on other sites More sharing options...
SimpsoN_Bart Posted November 30, 2012 Share Posted November 30, 2012 @mesale0077; Arkadaşın derdi host dosyasını editlemekten ziyade sistem üzerinde silme,ekleme vs gibi işlemleri uac denetimi duvarını aşarak yapmak.. Ayrıca host dosyasını editlemek için bu kadar koda gerek yoktu basit işlemlerle de yapılabilir ve kodlarını bu şekilde değilde bi .au3 dosyasının içine koyaydın iyiydi. Quote Link to comment Share on other sites More sharing options...
FLaky Posted November 30, 2012 Author Share Posted November 30, 2012 [CODE] #RequireAdmin #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator #AutoIt3Wrapper_Icon=x.ico #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Description=Product is By ..FLaky.. #AutoIt3Wrapper_Res_Fileversion=1.0 #AutoIt3Wrapper_Res_LegalCopyright=Product is By ..FLaky.. #AutoIt3Wrapper_Res_Language=1055 #AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker #AutoIt3Wrapper_Run_Obfuscator=y $splash = "cFosSpeed Resetleme Işlemi Tamamlandı.." ProcessClose("cfosspeed.exe") MsgBox(0, '', _UAC_EnableDisable(0)) Func _UAC_EnableDisable($iState = 2) Local $sRegKey = 'HKEY_LOCAL_MACHINE64\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System' If @OSArch <> 'X64' Then $sRegKey = StringReplace($sRegKey, '64', '') If (@OSVersion = 'Win_Vista') Or (@OSVersion = 'Win_7') Then If RegWrite($sRegKey, 'ConsentPromptBehaviorAdmin', 'REG_DWORD', $iState) Then Return SetError(0, 0, 'İşlem Başarılı') Else Return SetError(-2, 0, 'İşlem Başarısız') EndIf Else Return SetError(-1, 0, 'Gecersiz İşletim Sistemi') EndIf EndFunc RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\cFos\cFosSpeed", "Enddate") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\cFos\cFosSpeed", "regdata") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\cFos\cFosSpeed", "Enddate") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\cFos\cFosSpeed", "regdata") TrayTip($splash,"Hayallerindir Özgürlüğün..!! >>..FLaky..<<", 5, 4) Sleep(4000) Exit[/CODE] yok arkadaşlar olmuyo..silinmiyo reg kayıtlarıı Quote Link to comment Share on other sites More sharing options...
SimpsoN_Bart Posted November 30, 2012 Share Posted November 30, 2012 Oyy ben nerelere gidem, adama fonksiyonu nasıl kullanacağını biri söylesin Quote Link to comment Share on other sites More sharing options...
mesale0077 Posted November 30, 2012 Share Posted November 30, 2012 (edited) RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\cFos\cFosSpeed") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\cFos\cFosSpeed") deneyiniz yanlız anahtar varsa silme işlemi gerçekleşir Edited November 30, 2012 by mesale0077 Quote Link to comment Share on other sites More sharing options...
mesale0077 Posted November 30, 2012 Share Posted November 30, 2012 exe yaparken 64 bit olarak exe yaparak deneyin Quote Link to comment Share on other sites More sharing options...
Editor pairs Posted November 30, 2012 Editor Share Posted November 30, 2012 Host dosyasına erişimi bazen antivirüsler engelliyor. Quote Link to comment Share on other sites More sharing options...
SimpsoN_Bart Posted December 2, 2012 Share Posted December 2, 2012 (edited) Kodlarını bu şekilde değiştir ayrıca böyle ufak şeyler için bana pm atma buraya yaz daha iyi yardımcı olacak arkadaşlar cıkabilir. ;) [xml]#RequireAdmin #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator #AutoIt3Wrapper_Icon=x.ico #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Description=Product is By ..FLaky.. #AutoIt3Wrapper_Res_Fileversion=1.0 #AutoIt3Wrapper_Res_LegalCopyright=Product is By ..FLaky.. #AutoIt3Wrapper_Res_Language=1055 #AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker #AutoIt3Wrapper_Run_Obfuscator=y Global $splash = "cFosSpeed Resetleme Işlemi Tamamlandı.." ProcessClose("cfosspeed.exe") _UAC_EnableDisable(0) _RegDelete() Func _UAC_EnableDisable($iState = 2) Local $sRegKey = 'HKEY_LOCAL_MACHINE64\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System' If @OSArch <> 'X64' Then $sRegKey = StringReplace($sRegKey, '64', '') If (@OSVersion = 'Win_Vista') Or (@OSVersion = 'Win_7') Then If RegWrite($sRegKey, 'ConsentPromptBehaviorAdmin', 'REG_DWORD', $iState) Then Return SetError(0, 0, 1) Else Return SetError(-2, 0, 0) EndIf Else Return SetError(-1, 0, -1) EndIf EndFunc ;==>_UAC_EnableDisable Func _RegDelete() RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\cFos\cFosSpeed", "Enddate") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\cFos\cFosSpeed", "regdata") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\cFos\cFosSpeed", "Enddate") RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\cFos\cFosSpeed", "regdata") EndFunc ;==>_RegDelete TrayTip($splash, "Hayallerindir Özgürlüğün..!! >>..FLaky..<<", 5, 4) Sleep(4000) Exit [/xml] Edited December 3, 2012 by SimpsoN_Bart Quote Link to comment Share on other sites More sharing options...
Editor MOTUN Posted December 2, 2012 Editor Share Posted December 2, 2012 TrayTip($splash, "Hayallerindir Özgürlüğün..!! >>..FLaky..<<", 5, 4) flaky yerine bart yazılması daha doğru olur diye düşünüyorum, ne de olsa katılımsız sen hazırlamışsın :P Quote Link to comment Share on other sites More sharing options...
FLaky Posted December 2, 2012 Author Share Posted December 2, 2012 zmanla öğrenicem inş.. Quote Link to comment Share on other sites More sharing options...
mesale0077 Posted December 2, 2012 Share Posted December 2, 2012 lütfen arkadaşlar kod isteğinizi buraya yazın kod isteklerinizi paylaşılmayacak kadar çok önemli kodlarınız haricinde pm atmayınız anlaşıyınız için sağolun 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.