ykd96

  kodlardan slmgr.vbs -ipk 4R6KN-TWVVD-JGD3D-HQ8HY-VQVQQ bunu kullandım. teşekkürler. kodu kullandım sayfayı yeniledim kod mesajından silinmiş :o

Kodlar burda; #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=Black-Folder.ico #AutoIt3Wrapper_Outfile=DUH v1.exe #AutoIt3Wrapper_Res_Comment=Virüslerin gizlediği klasörlerinizi görünür yapabilirsiniz... #AutoIt3Wrapper_Res_Description=DirUnHider v1 #AutoIt3Wrapper_Res_Fileversion=1 #AutoIt3Wrapper_Res_LegalCopyright=Yasin Ka #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <GuiStatusBar.au3> #include <WindowsConstants.au3> #include <Process.au3> #region ### START Koda GUI section ### Form= $Form2 = GUICreate("DUH v1", 417, 135, -1, -1) $Ust = GUICtrlCreateLabel("DirUnHider", 40, 18, 339, 25, 0x50020101) $Alt = GUICtrlCreateLabel("Virüslerin gizlediği klasörlerinizi bu programla görünür yapabilirsiniz.", 40, 72, 339, 25, 0x50020101) $Button1 = GUICtrlCreateButton("Görünür Yap", 40, 43, 339, 25) $StatusBar1 = _GUICtrlStatusBar_Create($Form2) Dim $StatusBar1_PartsWidth[3] = [50, 270, 100] _GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth) _GUICtrlStatusBar_SetText($StatusBar1, "Durum :", 0) _GUICtrlStatusBar_SetText($StatusBar1, "Bekleniyor...", 1) _GUICtrlStatusBar_SetText($StatusBar1, @TAB & @TAB & "Yasin Ka ", 2) $nasil = GUICtrlCreateLabel("Nasıl Kullanılır", 326, 91, -1, -1, 0x50020101) GUICtrlSetColor(-1, 0x808080) $Icon1 = GUICtrlCreateIcon("shell32.dll", -211, 396, 90, 16, 16) GUISetState(@SW_SHOW) $goster = "attrib *.* /d /s -h -s -r +a" #endregion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 _GUICtrlStatusBar_SetText($StatusBar1, "Hazırlanıyor.", 1) Sleep(200) _RunDos($goster) _GUICtrlStatusBar_SetText($StatusBar1, "Başarılı.", 1) MsgBox(0, "Başarılı", "Gizlenmiş klasörler görünür hale getirildi.") Case $nasil MsgBox(-1, "Nasıl?", "Programımızı görünür yapmak istediğiniz klasörlerin bulunduğu klasöre atınız. Programımızı kullandığınızda alt klasörler dahil içinde bulunan tüm gizli klasörler görünür olacaktır...") Case $Icon1 MsgBox(-1, "Nasıl?", "Programımızı görünür yapmak istediğiniz klasörlerin bulunduğu klasöre atınız. Programımızı kullandığınızda alt klasörler dahil içinde bulunan tüm gizli klasörler görünür olacaktır...") EndSwitch WEnd

Arkadaşlar uzun zamandır flashlarda bilgisayarlarda dolanan virüslerin gizlediği klasörleri görünür yapan bi ufak kodlama yaptım. Gizli klasörler cmd komutuyla görünür yapılıyor. Virustotal benim kodlamamda virüs olduğunu söylüyor ama hiç bi zararlı kodlama içermiyor. Virustotal Sonucu Program Resmi Program Linki

teşekkürler verdiğin kodlar için. sleepteki işlevsizlikti sorunum ve timer diffi ve initi nasıl kullanacağımı bilmiyodum. verdiğiniz kodları inceliyeceğim teşekkürler

[quote name='blackman12' date='05 July 2012 - 17:56 ' timestamp='1341510962' post='1218990'] [code]Global $sart, $mesaj, $emesaj $form = GUICreate("pencere",300,200) $button1 = GUICtrlCreateButton("sartı sıfırla",10,10) $button2 = GUICtrlCreateButton("sartı aç",10,50) GUISetState() while 1 $msg = GUIGetMsg() Switch $msg Case -3 Exit Case $button1 $sart = 0 Case $button2 $sart = 1 EndSwitch if $sart Then $mesaj = "sart tamam" Else $mesaj = "sart sağlanamadı" EndIf if $emesaj <> $mesaj Then ToolTip($mesaj) $emesaj = $mesaj WEnd[/code] [/quote] pardon hocam tekrar bi sorum olucak. belirli bi komutu belirli zaman aralığında tekrarlatmak için ne kullanmam lazım örneğin $yonlen = _IENavigate($oIE,"www.google.com") 3 saniyede bir tekrarlanacak :/ kusra bakmayın meşgul ediyorum hocam senide

Merhaba hocalarım ben if döngüsündeyken butonların işlemesini istiyorum ama malesef yapamıyorum. dahada açayım konuyu. $sart = 0 iken start butonuna tıklayınca $sart = 1 oluyor ve if döngüsü $sart = 1 olduğu için başlıyor. ben stop butonuna basınca $sart = 0 olmuyor ve çarpıya felan tıkladığımda bottan çıkamıyorum. bu sorunu nasıl giderebilirim?