anlamadım açık anlatırmısın? String fLn çok anlamıyorumbana Gönderirsen Keylogger 'I senin şifreni çalarım. OllyDBG ile bak gözükür stringler.
anlamadım açık anlatırmısın? String fLn çok anlamıyorumbana Gönderirsen Keylogger 'I senin şifreni çalarım. OllyDBG ile bak gözükür stringler.
bakın arkadaşlar şu kodları uygun şekilde doldurup kodlara eklerseniz pc her açıldığında çalışabilir ancak programın yeri değiştiğinde kod pasif olabilir..
PHP:Dim reg As Object reg = CreateObject("wscript.shell") reg.RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN\" & ("Program ismi"), Application.StartupPath & "Programın bulunduğu yer" & ("programın ismi") & ".exe") End Sub
abi ben bunu denıedım bı yerinde hata veriyo kızmızı cıkıyor..
nerde hata alıyorsun kardeşim.
eg.RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN\" & ("Program ismi"), Application.StartupPath & "Programın bulunduğu yer" & ("programın ismi") & ".exe")
End Sub
burdan abi
Kod:
Forma CheckBox Ekleyin.
Kodları Formun Kod Penceresine Yazın..
Private Sub Check1_Click()
Dim KayitDefteri As Object
Set KayitDefteri = CreateObject("wscript.shell")
If Check1.Value = 0 Then
KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, "" & "" & "" & ""
End If
If Check1.Value = 1 Then
KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
End If
End Sub
PHP:[COLOR="Lime"]Kod: Forma CheckBox Ekleyin. Kodları Formun Kod Penceresine Yazın.. Private Sub Check1_Click() Dim KayitDefteri As Object Set KayitDefteri = CreateObject("wscript.shell") If Check1.Value = 0 Then KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, "" & "" & "" & "" End If If Check1.Value = 1 Then KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe" End If End Sub[/COLOR]
Pc Açılınca Proğramın Çalışması İçin Böyle bir kod buldm netten işe yararmı aceba
Kardeş Bu Timer Ayarlama Olayını Kesin denedinmi Çalışıyormu.Bende Sürekli Hata Veriyor nedense
nerde hata alıyorsun bir de interval ayarlarını iyi hesapla
Timer 3 interval Değeri 0 Olarak değiştiriyozmu yoksa 60000 olarak kalıyormu
aynısını bende bulmustum ama olmadıPHP:Kod:
PHP:[COLOR="Lime"]Forma CheckBox Ekleyin.[/COLOR] [COLOR="Lime"]Kodları Formun Kod Penceresine Yazın..[/COLOR] [COLOR="Lime"]Private Sub Check1_Click()[/COLOR] [COLOR="Lime"]Dim KayitDefteri As Object[/COLOR] [COLOR="Lime"]Set KayitDefteri = CreateObject("wscript.shell")[/COLOR] [COLOR="Lime"]If Check1.Value = 0 Then[/COLOR] [COLOR="Lime"]KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, "" & "" & "" & ""[/COLOR] [COLOR="Lime"]End If[/COLOR] [COLOR="Lime"]If Check1.Value = 1 Then[/COLOR] [COLOR="Lime"]KayitDefteri.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS \CUR RENTVERSION\RUN\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"[/COLOR] [COLOR="Lime"]End If[/COLOR] [COLOR="Lime"]End Sub[/COLOR]
Pc Açılınca Proğramın Çalışması İçin Böyle bir kod buldm netten işe yararmı aceba
arkadaşlar bakın logların süresini arttırmanız tavsiyem çünkü gmail.com hesaplarına dakikada bir gelen loglar sisteme zara veriyor mail adresiniz kitlenebiilir v.s sonra programın hiç bir önemi kalmaz eğer değiştirmek istemiyor iseniz gelen logları kontrol ettikten sonra silmeniz iyi olucaktır.unutmayın ki bu intervalla program bir nevi mail bomber gibi onun için interval değerlerini arttırın konu güncel ordan takip edin..
arkadaşlar bakın logların süresini arttırmanız tavsiyem çünkü gmail.com hesaplarına dakikada bir gelen loglar sisteme zara veriyor mail adresiniz kitlenebiilir v.s sonra programın hiç bir önemi kalmaz eğer değiştirmek istemiyor iseniz gelen logları kontrol ettikten sonra silmeniz iyi olucaktır.unutmayın ki bu intervalla program bir nevi mail bomber gibi onun için interval değerlerini arttırın konu güncel ordan takip edin..
Arkadaşlar Crazy3131 arkadaşımın sorununu teamwiever ile çözdüm.Pazartesi gününden sonra daha çok yardımcı olurum sizlere(elimden geldiği kadar).Herkese Kolay Gelsin.Belki gene girerim pazartesine kadar ama o kadar çok ilgilenemeyebilirim.Kusuruma bakmayın.
Size gelince söyledikleriniz doğru.Ben ekledim zaten konuya,Anlattım 30 dkda bir veya saatte bir istiyorsanız diye.İlginizden Dolayı Teşekkür ederim
Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.