ykd96
-
Posts
9 -
Joined
-
Last visited
Content Type
Profiles
Forums
Calendar
Posts posted by ykd96
-
-
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
https://www.virustotal.com/file/a8ed214466971a28928782a6e0143c0cbd3e5225fe8c061d61166aee2103bef2/analysis/1356862419/
Program Resmi
Program Linki
http://i-doserforum.com/file/DUH_v1.rar
-
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?
Win8-8.1 Aktivasyon Araçları / Telefon & Kms & Wmc
in Windows 8
Posted
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