0

私はVBフォームの初心者ですが、これが可能かどうかについてアドバイスが必要です. フォーム フィールドを 1 行のパイプで区切られたテキスト ファイルの添付ファイルとして電子メールで送信したいと考えています。送信されたメールを開くと、*.txt ファイルが添付されており、1 行目は次のようになります。

textbox1_value|textbox2_value|textbox3_value

ここに私のメールコードがあります：

Imports System.Net.Mail

Public Class Form1

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Using message As New MailMessage()
            'set to the from, to and subject fields
            message.From = New MailAddress(TextBox2.Text.ToString())
            message.[To].Add(New MailAddress("steve@steve.com"))
            message.Subject = "Certificate alert"
            'code the message body
            Dim MsgBody As String
            MsgBody = TextBox2.Text.ToString() & vbCr & _
                      TextBox3.Text.ToString() & vbCr & _
                      TextBox4.Text.ToString()
            message.Body = MsgBody
            Dim client As New SmtpClient()
            client.Host = "mailhost"
            client.Send(message)
        End Using
        'display submitted box
        MessageBox.Show("Your Incident has been submitted!", "Congratulations!")
        'close form
        Me.Close()
    End Sub
End Class

どんなアイデアでも大歓迎です

ありがとう！

4

2 に答える 2

1

添付ファイルに属するテキストをテキストファイルに保存してから、次の操作を実行できます。

message.Attachments.Add(New Attachment("filename"))
system.io.file.delete("filename") ' delete the file
于 2013-01-17T16:44:23.140 に答える
0

ディスク上にファイルを作成する

Dim filename as String = "C:\Somefile.txt"
My.Computer.FileSystem.WriteAllText(filename, "value1|value2|value3")

次に、メール メッセージに添付します。

Dim att as New System.Net.Mail.Attachment(filename)
message.Attachments.Add(att)

後でファイルを削除することを忘れないでください

于 2013-01-17T16:40:28.680 に答える