wolftü Visual Basic Hile Kodlama Dersi #1 2016

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Süper Üye
Katılım
6 Şub 2016
Mesajlar
987
Tepki puanı
20
Ödüller
9
Yaş
27
10 HİZMET YILI
  BUTTON 1 KODU

Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
Timer1.Start
End If
Next


     TİMER 1 KODU

If CheckBox1.Checked = True Then
Dim CheckBox1 As Integer = Label1.Text + &HPOİNT    
WriteInteger("wolftü.bin", CheckBox1, "VALUE")
End If


&HPoint Yazan Yere Hilemizin Pointini Value Yazan Yere Hilemizin Valuesini Yazıyoruz

 CHECKBOX KODU

If CheckBox1.Checked = True Then
Timer1.Start()
End If
If CheckBox1.Checked = False Then
End If
Timer1.Start()


önemli Not: NameESP Kodlarken WriteLong Şeklınde Kodlayınız.


  BUNUN İÇİN BAZI WRİTEPOİNTERİNTEGER VE WRİTELONG DOSYALARI VARDIR İNTERNETTEBN İNDİREBİLİRSİNİZ.
 
Onaylı Üye
Katılım
13 Nis 2016
Mesajlar
98
Tepki puanı
1
10 HİZMET YILI
kardeş sa ben yapıyorum ama hata veriyor labele wolftü bekleniyoz yazıyoruz ya orraya sayı gelmesi gerekiyor ama gelmiyor yardım
 
Üye
Katılım
14 Mar 2016
Mesajlar
29
Tepki puanı
1
Ödüller
8
Yaş
24
10 HİZMET YILI
hsn6447' Alıntı:
kardeş sa ben yapıyorum ama  hata veriyor labele  wolftü bekleniyoz yazıyoruz ya orraya sayı gelmesi gerekiyor ama gelmiyor  yardım

Skype Varsa Ekle Beni   AhmetDelfii > Güler
 
Uzman Üye
Katılım
3 Tem 2016
Mesajlar
203
Tepki puanı
2
9 HİZMET YILI
Bu konunun sabite alınacak bir yanı yok, etrafta durmandan c/p atan kişiler olucak ve daha hiçbir memory bilgisi olmadan..
 
Üye
Katılım
6 Tem 2016
Mesajlar
16
Tepki puanı
0
9 HİZMET YILI
Bağlantıları görmek için lütfen Giriş Yap


Button 1 Kodunu Aktif Edince Bu Hata Çıkıyor Yardımcı Olursan İyi Olur Kardeşim
 
Üye
Katılım
6 Tem 2016
Mesajlar
16
Tepki puanı
0
9 HİZMET YILI
xonivion' Alıntı:
xthewarrioR' Alıntı:
Bağlantıları görmek için lütfen Giriş Yap


Button 1 Kodunu Aktif Edince Bu Hata Çıkıyor Yardımcı Olursan İyi Olur Kardeşim

Kodu gösterirsen yardımcı olabilirim.

Buyur Kardeşim:
Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
Timer1.Start
End If
Next
 
Uzman Üye
Katılım
3 Tem 2016
Mesajlar
203
Tepki puanı
2
9 HİZMET YILI
xthewarrioR' Alıntı:
xonivion' Alıntı:
xthewarrioR' Alıntı:
Bağlantıları görmek için lütfen Giriş Yap


Button 1 Kodunu Aktif Edince Bu Hata Çıkıyor Yardımcı Olursan İyi Olur Kardeşim

Kodu gösterirsen yardımcı olabilirim.

Buyur Kardeşim:
Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
Timer1.Start
End If
Next


Proc.Count > 0
bunu if ile kullan sorun çözülebilir.
 
Üye
Katılım
6 Tem 2016
Mesajlar
16
Tepki puanı
0
9 HİZMET YILI
xonivion' Alıntı:
xthewarrioR' Alıntı:
xonivion' Alıntı:
xthewarrioR' Alıntı:
Bağlantıları görmek için lütfen Giriş Yap


Button 1 Kodunu Aktif Edince Bu Hata Çıkıyor Yardımcı Olursan İyi Olur Kardeşim

Kodu gösterirsen yardımcı olabilirim.

Buyur Kardeşim:
Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
Timer1.Start
End If
Next


Proc.Count > 0
bunu if ile kullan sorun çözülebilir.

Kardeşim olmadı da erişim engelleyen şeyi bulsam sorun çözülcekte internette bu erişim engelleyen şey hakkında bi çözüm yok ingilizce 2-3 site çıkıyor karşıma sadece onlarda bu ada benzeyen farklı hatalar...
 
Uzman Üye
Katılım
3 Tem 2016
Mesajlar
203
Tepki puanı
2
9 HİZMET YILI
xthewarrioR' Alıntı:
xonivion' Alıntı:
xthewarrioR' Alıntı:
xonivion' Alıntı:
xthewarrioR' Alıntı:
Bağlantıları görmek için lütfen Giriş Yap


Button 1 Kodunu Aktif Edince Bu Hata Çıkıyor Yardımcı Olursan İyi Olur Kardeşim

Kodu gösterirsen yardımcı olabilirim.

Buyur Kardeşim:
Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
Timer1.Start
End If
Next


Proc.Count > 0
bunu if ile kullan sorun çözülebilir.

Kardeşim olmadı da erişim engelleyen şeyi bulsam sorun çözülcekte internette bu erişim engelleyen şey hakkında bi çözüm yok ingilizce 2-3 site çıkıyor karşıma sadece onlarda bu ada benzeyen farklı hatalar...

Yönetici olarak çalıştır?
 
Üye
Katılım
6 Tem 2016
Mesajlar
16
Tepki puanı
0
9 HİZMET YILI
xonivion' Alıntı:
xthewarrioR' Alıntı:
xonivion' Alıntı:
xthewarrioR' Alıntı:
xonivion' Alıntı:
Kodu gösterirsen yardımcı olabilirim.

Buyur Kardeşim:
Dim p As Process = Process.GetProcessesByName("wolftü.bin")(0)
For Each moz As System.Diagnostics.ProcessModule In p.Modules
If moz.FileName.IndexOf("csh") <> -1 Then
Label1.Text = moz.BaseAddress.ToString
Timer1.Start
End If
Next


Proc.Count > 0
bunu if ile kullan sorun çözülebilir.

Kardeşim olmadı da erişim engelleyen şeyi bulsam sorun çözülcekte internette bu erişim engelleyen şey hakkında bi çözüm yok ingilizce 2-3 site çıkıyor karşıma sadece onlarda bu ada benzeyen farklı hatalar...

Yönetici olarak çalıştır?
Olmadı
 
Banlı Üye
Katılım
18 Eki 2016
Mesajlar
162
Tepki puanı
6
Ödüller
7
Yaş
25
9 HİZMET YILI
teşekkürler yapmayı deneyeceğim
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst