Hiç Yapılmamış - Mantıklı Program [İSTEK - ANLATIM]

A

Alcatraztc

Katılımcı Üye
6 Ocak 2013
900
0
Aklımdaki Program
----------------------------

- Bir txt dosyası oluşturacağım , belirli şifreler gireceğim.

ÖRN: 123456789

------

Facebook Kullanıcı Adı veya E-posta'yı yazıp , şifre listesini seçip şifreyi teker teker deneteceğim.

Doğru Olduğunda İse Mesaj Verecek.

-------


Program bilgim bunu yapmaya yetmiyor.

Yapabilen arkadaşlar source veya normal olarak paylaşırlarsa sevinirim.​
 
Son düzenleme:
Tarihe göre sırala Oylara göre sırala
C

CMLYKL

Uzman üye
7 Nis 2012
1,329
0
Şuan aklıma geldi. Daha önceden bi videoda izlemiştim. Biri vb6 da bi program yazıyor.
Kullanıcı adı ve şifre için 2 tane textbox koyuyor. ve 1 tanede giriş butonu.
Kodlarını hazırlıyor ve kullanıcı adı ve şifreyi yazıyor ve ardından butona basıldımı faceye giriyor.
Bu şekilde bir programlar şifre kısmını txt dosyasına bağlayarak yapabilirz heralde ben kodlara bakıcam şimdi bulursam atarım.
 
Oyla 0 Downvote
Unauthorized

Unauthorized

Kıdemli Üye
14 Eki 2011
2,602
3
C:\
Aslında byubTR bize yardım edebilir doğru hatırlıyorsama onun evren attack'ında giriş yerlerini kodla gösteriyorduk aynı işlemi facebook için yapabiliriz ondan mantığı alsak devamı gelir :)
 
Oyla 0 Downvote
A

Alcatraztc

Katılımcı Üye
6 Ocak 2013
900
0
CMLYKL' Alıntı:
Şuan aklıma geldi. Daha önceden bi videoda izlemiştim. Biri vb6 da bi program yazıyor.
Kullanıcı adı ve şifre için 2 tane textbox koyuyor. ve 1 tanede giriş butonu.
Kodlarını hazırlıyor ve kullanıcı adı ve şifreyi yazıyor ve ardından butona basıldımı faceye giriyor.
Bu şekilde bir programlar şifre kısmını txt dosyasına bağlayarak yapabilirz heralde ben kodlara bakıcam şimdi bulursam atarım.
Genişletmek için tıkla ...

Bencede öyle ​
 
Oyla 0 Downvote
Star-Turk

Star-Turk

Kıdemli Üye
2 Kas 2012
3,516
7
Dediğin Brute Force Programı :D
Mantıklı Ama Facebook Bunun İçin Önlemleri Var.
2,3 Denemeden Sonra Giriş Panelinden Facebook Bulma Sayfasına Yönlendiriyor.
Yani İmkansız Gibi Birşey.
Söle Olabilir.
Her 4 Denemede Bir İp Değiştiripte Deneme Yapan BİR Program Olması Lazım Anca :D
Bunuda İleri Düzey Yazılım Kodlama Bilmeden Yapamassın :D
 
Oyla 0 Downvote
C

CMLYKL

Uzman üye
7 Nis 2012
1,329
0
Forma 2 text box 1 buton ekle.
ctrl + t ye basıp microsoft internet controls u seç.
sonra kod bölümüne gelip bunları yapıştır.

Kod: 
Option Explicit

 Private Sub Command1_Click()
 WebBrowser1.********.All.Item("email").Value = Text1.Text
 WebBrowser1.********.All.Item("pass").Value = Text2.Text
 WebBrowser1.********.All.Item("login").Click
 End Sub

 Private Sub Form_Load()
  WebBrowser1.Navigate "https://www.facebook.com/login.php"
 WebBrowser1.Silent = True
 End Sub

 Private Sub Form_Unload(Cancel As Integer)
 End
 End Sub

Benim fikrimce text2.text yazan yere şifrelerin olduğu txt dosyasını göstermek ama onu nasıl yaparız bilmiyorum. O kadar kodlama bilgim yok.

NOT: *'lı Yerlerde D o c u m e n t yazıyor. Boşlukları silip yapıştırın.
 
Son düzenleme:
Oyla 0 Downvote
C

CMLYKL

Uzman üye
7 Nis 2012
1,329
0
Star-Turk' Alıntı:
Dediğin Brute Force Programı :D
Mantıklı Ama Facebook Bunun İçin Önlemleri Var.
2,3 Denemeden Sonra Giriş Panelinden Facebook Bulma Sayfasına Yönlendiriyor.
Yani İmkansız Gibi Birşey.
Söle Olabilir.
Her 4 Denemede Bir İp Değiştiripte Deneme Yapan BİR Program Olması Lazım Anca :D
Bunuda İleri Düzey Yazılım Kodlama Bilmeden Yapamassın :D
Genişletmek için tıkla ...

Bende denedim ilk denemeden sonra başka bi sayfaya atıyo. Onun için bi program yazsak ve sayfa değişince yine aynı sayfaya gelse. İlk şifre yanlış girilince. Facebook başka bir sayfaya atıyo. Kullanıcı ismi girilmiş bir şekilde kullanıcı adı kısmı olmadığı içinde program hata veriyor bunu için başka bi kod girmeliyiz. Ama ne bilmiyom ? :D
 
Son düzenleme:
Oyla 0 Downvote
A

Alcatraztc

Katılımcı Üye
6 Ocak 2013
900
0
CMLYKL' Alıntı:
Forma 2 text box 1 buton ekle.
ctrl + t ye basıp microsoft internet controls u seç.
sonra kod bölümüne gelip bunları yapıştır.

Kod: 
Option Explicit

 Private Sub Command1_Click()
 WebBrowser1.********.All.Item("email").Value = Text1.Text
 WebBrowser1.********.All.Item("pass").Value = Text2.Text
 WebBrowser1.********.All.Item("login").Click
 End Sub

 Private Sub Form_Load()
  WebBrowser1.Navigate "https://www.facebook.com/login.php"
 WebBrowser1.Silent = True
 End Sub

 Private Sub Form_Unload(Cancel As Integer)
 End
 End Sub

Benim fikrimce text2.text yazan yere şifrelerin olduğu txt dosyasını göstermek ama onu nasıl yaparız bilmiyorum. O kadar kodlama bilgim yok.

NOT: *'lı Yerlerde D o c u m e n t yazıyor. Boşlukları silip yapıştırın.
Genişletmek için tıkla ...


Bu kodun devamını getirebilecek biri var mı ?

++ Güncell​
 
Oyla 0 Downvote
A

Alcatraztc

Katılımcı Üye
6 Ocak 2013
900
0
CMLYKL' Alıntı:
Bende denedim ilk denemeden sonra başka bi sayfaya atıyo. Onun için bi program yazsak ve sayfa değişince yine aynı sayfaya gelse. İlk şifre yanlış girilince. Facebook başka bir sayfaya atıyo. Kullanıcı ismi girilmiş bir şekilde kullanıcı adı kısmı olmadığı içinde program hata veriyor bunu için başka bi kod girmeliyiz. Ama ne bilmiyom ? :D
Genişletmek için tıkla ...

Yanlış girdikten sonra attığı sayfa bu.


Programda atınca bu sayfaya gitmesini sağlayamaz mısınız ?​
 
Oyla 0 Downvote
A

Alcatraztc

Katılımcı Üye
6 Ocak 2013
900
0
CMLYKL' Alıntı:
İşte öle bi kod yazılacak ki o sayfaya gidildimi tekrar facebook anasayfasına atıcak. Yok mu o kadar bilgisi olan. Ben araştırıcam yine bakalım bulabilicez mi?
Genişletmek için tıkla ...

Kardeşim senin kodları denedim , sadece facebook girişi yapıyor.

Önemli olan programa şifrelerin olduğu metin ekleyebilmek ve şifreleri otomatik denemesini sağlamak.​
 
Oyla 0 Downvote
A

Alcatraztc

Katılımcı Üye
6 Ocak 2013
900
0
AliKoklu0' Alıntı:

Programa saçma demiyorum.Ama o programı yapan niye bedava versin diyorum ?Ayrıca Facebook sizce öyle bir program için bile önlem almış olamaz mı ?
Genişletmek için tıkla ...

Kardeşim program sandığın kadar kolay şifre kıracak bir program değil.

Örneğin arkadaşının şifresini tahmin edebiliyorsun gibi.

Onun şifrelerini notepad'a yazarsın 10 - 15 tane.

Programda onu dener.

Yanlış yada doğru.

Bunun için aldığı tek önlem başka sayfaya atmak , onun çözümüde zor olduğunu sanmıyorum.​
 
Oyla 0 Downvote
Üst

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.