投稿者 富士山  (その他) 投稿日時 2012/11/23 21:46:12
とあるサイトに書いてあった メールを送るコードをVB2010で試したところ

sc.Send(msg)がハンドルされませんでした

使ってるPCはWindows XPです

どうすれば良いのか教えて下さい  

下がそのコードです

        'MailMessageの作成 
        Dim msg As New System.Net.Mail.MailMessage()
        '送信者 
        msg.From = New System.Net.Mail.MailAddress("xxxxxx@xxxx.xxxx")
        '宛先 
        msg.To.Add(New System.Net.Mail.MailAddress("xxxxxx@xxxx.xxxx"))
        'あて先をもう一人追加 
        msg.To.Add(New System.Net.Mail.MailAddress("xxxxxx@xxxx.xxxx"))
        'CC 
        msg.CC.Add(New System.Net.Mail.MailAddress("xxxxxx@xxxx.xxxx"))
        'BCC 
        msg.Bcc.Add(New System.Net.Mail.MailAddress("xxxxxx@xxxx.xxxx"))
        'ReplyTo 
        msg.ReplyTo = New System.Net.Mail.MailAddress("xxxxxx@xxxx.xxxx")
        'Sender 
        msg.Sender = New System.Net.Mail.MailAddress("xxxxxx@xxxx.xxxx")

        '件名 
        msg.Subject = "こんにちは"
        '本文 
        msg.Body = "こんにちは。" + vbCrLf + vbCrLf + "それではまた。"

        '優先順位を「重要」にする 
        msg.Priority = System.Net.Mail.MailPriority.High
        'メールの配達が遅れたとき、失敗したとき、正常に配達されたときに通知する 
        msg.DeliveryNotificationOptions = _
            System.Net.Mail.DeliveryNotificationOptions.Delay Or _
            System.Net.Mail.DeliveryNotificationOptions.OnFailure Or _
            System.Net.Mail.DeliveryNotificationOptions.OnSuccess


        Dim sc As New System.Net.Mail.SmtpClient()

        'SMTPサーバーを指定する 
        sc.Host = "localhost"
        'メッセージを送信する 
        sc.Send(msg)

        '後始末 
        msg.Dispose()





何度もVBの質問をしてすいません・・・