vb 2010 년에 메일을 보내지 못했습니다.

나에게 이메일을 보내는 매우 기본적인 프로그램을 얻으려고합니다. 3 개의 텍스트 상자가 있습니다.vb 2010 년에 메일을 보내지 못했습니다.

TextBox1에는

그리고 버튼 말한다 (Button1을이)가 여기

"보내기" TextBox3는 메시지입니다 TextBox2를은 "이메일"입니다 거기에 내 이메일이있는 읽기 전용 텍스트 상자입니다 내 전체 프로젝트의 코드입니다. 보안상의 이유로이 질문에서 이메일과 비밀번호를 삭제했습니다.

나는이 프로그램을 실행하고 TextBox3하고 보내기를 누릅니다에 TextBox2를에서 "[email protected]"와 "TestEmail1234"를 입력하면, 그것은 코드 페이지로 다시 저를 취하고는 "SmtpException가 처리되지 않은 이었다 말했다. 실패가 전송 메일은 "

Imports System.Net.Mail 

Public Class Form1 

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
     Dim smtpServer As New SmtpClient() 
     Dim mail As New MailMessage() 

     smtpServer.Credentials = New Net.NetworkCredential("[email protected]", "mypassword") 
     'using Gmail 
     smtpServer.Port = 587 
     smtpServer.Host = "smtp.gmail.com" 
     smtpServer.EnableSsl = True 

     mail = New MailMessage() 
     mail.From = New MailAddress("my [email protected]", TextBox1.Text) 
     mail.To.Add(TextBox1.Text) 
     mail.Subject = TextBox2.Text 
     mail.Body = TextBox3.Text 

     smtpServer.Send(mail) 

    End Sub 
End Class

출처

2012-11-17 KevinWolf228

당신이 중단 점을 설정하고있는이 잘못 라인 말할 수 당신에게 작업 스크립트를주지? –

@ValentijnSpruyt 무엇? Visual Studio 2010을 처음 사용했습니다. – KevinWolf228

Button1_click 하위 줄의 시작 줄을 마우스 오른쪽 단추로 클릭하고 '중단 점 추가'를 선택하십시오. 그런 다음 코드를 실행하면 중단 점에서 중지됩니다. 그런 다음 최상위 메뉴에서 DEBUG> step into/over ...를 선택하고 코드 줄을 한 줄씩 살펴볼 수 있습니다. 특정 순간에 코드가 중단됩니다. 코드가 끊어지는 라인을 제공해 주시겠습니까? 건배. –

몇 가지 문제가있다, 나는 단지

Imports System.Net.Mail 
Public Class Form1 
Dim message As New MailMessage 
Dim smtp As New SmtpClient 
Dim instance As IDisposable 


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 

    Dim Mail As New MailMessage 
    Mail.Subject = "test email" 
    Mail.To.Add("[email protected]") 
    Mail.From = New MailAddress("[email protected]") 
    Mail.Body = "This is an email!" 
    Dim SMTP As New SmtpClient("smtp.gmail.com") 
    SMTP.EnableSsl = True 
    SMTP.Credentials = New System.Net.NetworkCredential("[email protected]", "password") 
    SMTP.Port = 587 
    SMTP.Send(Mail) 
    MsgBox("Sent Successfully") 

End Sub 
End Class

출처

2012-12-06 00:10:13 user1797443

vb 2010 년에 메일을 보내지 못했습니다.

답변

관련 문제