Masuk

Select the product you need help with

Bagaimana menambahkan disclaimer untuk keluar SMTP pesan dalam Visual Basic script

ID Artikel: 317680 - Melihat produk di mana artikel ini berlaku.

Peringatan: artikel ini adalah terjemahan oleh mesin

Klik disini untuk menampilkan sumber Inggris dan terjemahan oleh mesin secara berdampingan

Untuk versi Microsoft Visual Basic pada artikel ini, lihat 317327

(http://support.microsoft.com/kb/317327/ )

Perbesar semua | Perkecil semua

RINGKASAN

Artikel ini menunjukkan cara menggunakan SMTP transportasi acara wastafel untuk menambahkan disclaimer untuk outgoing SMTP e-mail pesan.

Membuat acara wastafel

Untuk membuat peristiwa wastafel, paste kode berikut dalam file baru dan menyimpannya sebagai EventSinkScript.vbs.

<SCRIPT LANGUAGE="VBScript">
Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus)
   TextDisclaimer = vbCrLf & "DISCLAIMER:" & vbCrLf & "Sample Disclaimer added in a VBScript."
   HTMLDisclaimer = "<p></p><p>DISCLAIMER:<br>Sample Disclaimer added in a VBScript."

   If Msg.HTMLBody <> "" Then
      'Search for the "</body>" tag and insert our disclaimer before that tag.
      pos = InStr(1, Msg.HTMLBody, "</body>", vbTextCompare)
      szPartI = Left(Msg.HTMLBody, pos - 1)
      szPartII = Right(Msg.HTMLBody, Len(Msg.HTMLBody) - (pos - 1))
      Msg.HTMLBody = szPartI + HTMLDisclaimer + szPartII
   End If

   If Msg.TextBody <> "" Then
      Msg.TextBody = Msg.TextBody & vbCrLf & TextDisclaimer & vbCrLf
   End If
    
   'Commit the content changes to the transport ADO Stream object.
   Msg.DataSource.Save ' Commit the changes into the transport Stream

   EventStatus = cdoRunNextSink
End Sub
</SCRIPT>

Mendaftar acara wastafel

Untuk mendaftar wastafel acara Anda, menggunakan file Smtpreg.vbs, yang diinstal dengan Exchange SDK. Dari prompt perintah, browse ke ...\Exchange SDK\SDK\Support\CDO\Scripts folder dan jenis berikut (membuat yakin bahwa jalan untuk EventSinkScript.vbs benar):

Cscript smtpreg.vbs / add 1 onarrival SMTPScriptingHost CDO.SS_SMTPOnArrivalSink "from=*@your-domain-here.com surat"
Cscript smtpreg.vbs /setprop 1 onarrival SMTPScriptingHost tenggelam ScriptName "C:\EventSinkScript.vbs"

Jika perintah berhasil, Anda menerima sukses pesan yang dihasilkan oleh script.

Untuk urung-daftar acara ini, ketik berikut:

Cscript smtpreg.vbs/menghapus 1 OnArrival SMTPScriptingHost

Untuk informasi lebih lanjut tentang mendaftar acara dengan Smtpreg.VBS, lihat topik "Mengelola acara Bindings" pada Website MSDN berikut situs:

.aspx http://MSDN.Microsoft.com/en-us/library/ms526620 (EXCHG.10)

(http://msdn.microsoft.com/en-us/library/ms526620(EXCHG.10).aspx)

Untuk informasi selengkapnya, klik nomor artikel berikut untuk melihat artikel di Pangkalan Pengetahuan Microsoft:

324021

(http://support.microsoft.com/kb/324021/ )

Cara membuat kotak pesan "catchall" wastafel untuk Exchange Server

Menguji wastafel acara

Untuk menguji tenggelam, mengirim pesan e-mail ke penerima SMTP Siapakah eksternal untuk organisasi Anda. Penerima harus menerima diubah pesan berisi disclaimer ditambahkan ke akhir pesan.

Catatan Jika Anda menggunakan MAPI klien seperti Microsoft Outlook untuk mengirim e-mail dan jika kotak surat Exchange berada pada server yang sama sebagai acara mengikat, penerima tidak dapat menerima pesan diubah. Hal ini karena pesan yang dikirimkan dengan menggunakan MAPI yang tidak dalam SMTP format ketika e-mail memicu transportasi acara SMTP. Oleh karena itu, perubahan yang dibuat oleh acara kode tidak bertahan.

Kembali ke atas | Berikan Masukan

REFERENSI

Untuk informasi selengkapnya, klik nomor artikel berikut untuk melihat artikel di Pangkalan Pengetahuan Microsoft:

273233

(http://support.microsoft.com/kb/273233/ )

Anda tidak dapat mengubah pesan MAPI yang terperangkap dalam SMTP transportasi acara wastafel

Kembali ke atas | Berikan Masukan

Properti

ID Artikel: 317680 - Kajian Terakhir: 24 September 2011 - Revisi: 2.0

Berlaku bagi:

Microsoft Exchange Server 2003 Enterprise Edition
Microsoft Exchange Server 2003 Standard Edition
Microsoft Exchange 2000 Server Standard Edition

kbhowtomaster kbmt KB317680 KbMtid

Penerjemahan Mesin

PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.

Klik disini untuk melihat versi Inggris dari artikel ini:317680

(http://support.microsoft.com/kb/317680/en-us/ )

Kembali ke atas | Berikan Masukan