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

Cara mendaftar transportasi acara wastafel untuk layanan SMTP di Exchange 2000 Server

Tips SistemThis article applies to a different operating system than the one you are using. Article content that may not be relevant to you is disabled.

Pada Halaman ini

Perbesar semua | Perkecil semua

RINGKASAN

Artikel ini selangkah demi selangkah menjelaskan cara untuk memperluas layanan protokol Transport surat sederhana (SMTP) dengan cara dari transportasi acara wastafel. Microsoft Visual Basic, Scripting Edition (VBScript), kode cek masuk SMTP pesan untuk baris subjek yang mengandung kata "virus" dan untuk lampiran yang memiliki ekstensi .vbs. Dalam kedua kasus, pengiriman pesan mencurigakan diblokir.

Mendaftar acara transportasi wastafel untuk layanan SMTP

  1. Mulai Windows Explorer.
  2. Buat folder baru yang disebut EventSink di bawah direktori root C (C:\EventSink).
  3. Salin file Smtpreg.vbs dari Kit pengembang perangkat lunak valuta ke folder yang baru dibuat.
  4. Di Windows Explorer, buka C:\EventSink folder, klik kanan pada pane kiri, arahkan ke Baru, lalu klik Teks dokumen.
  5. Nama berkas Smtpmsgcheck.vbs. Jika Ubah nama kotak dialog muncul, klik Ya.
  6. Klik kanan berkas yang baru, dan kemudian klik Mengedit. Dalam editor teks (Notepad.exe), masukkan kode VBScript berikut:
    <SCRIPT LANGUAGE="VBScript"> 
    
    Sub IEventIsCacheable_IsCacheable() 
    	'To implement the interface, and return S_OK implicitly 
    End Sub
    
    Sub ISMTPOnArrival_OnArrival(ByVal Msg, EventStatus) 
    	Dim envFlds 
    	Dim colAttachs 
    	Dim iFound 
    	Set envFlds = Msg.EnvelopeFields 
    
    	If Msg.Subject = "" Or Len(Msg.Subject) < 5 Then 
    		iFound = 0 
    	Else 
    		iFound = Instr(1, Msg.Subject, "VIRUS", 1) ' First position of the word VIRUS 
    	End If
     
    	'Check whether the message contains a VBS attachment 
    	Set colAttachs = Msg.Attachments 
    	For Each oAttach in colAttachs 
    		If InStrRev(oAttach.FileName, ".vbs",-1, 1) = (Len(oAttach.FileName)-3) Then
    			iFound = 1 
    		End If
    	Next
    
    	If iFound > 0 Then 
    		'Do not deliver, place message in the Badmail directory. 
    		envFlds ("http://schemas.microsoft.com/cdo/smtpenvelope/messagestatus") = 3 
    		envFlds.Update  'Commit the changes of the message status 'Skip remain event sinks 
    		EventStatus = 1
    	End If 
    End Sub 
    
    </SCRIPT>
  7. Simpan perubahan, dan kemudian tutup Notepad.
  8. Membuat file teks yang lain, nama berkas Instsink.bat, klik kanan berkas, dan kemudian klik Mengedit. Pada Notepad, masukkan baris berikut:
    @Echo Off
    
    REM*********** The following 2 lines install the Event Sink to log SMTP Messages ***********
    Cscript smtpreg.vbs /add 1 onarrival SMTPMessageCheck CDO.SS_SMTPOnArrivalSink "mail from=*"
    Cscript smtpreg.vbs /setprop 1 onarrival SMTPMessageCheck Sink ScriptName "C:\EventSink\SMTPMsgCheck.vbs"
    
    REM ***** Remove the 'REM' tag from the following line *****
    REM ***** If you want to deinstall the Event Sink again *****
    REM cscript smtpreg.vbs /remove 1 onarrival SMTPMessageCheck
    					
  9. Simpan perubahan, dan kemudian tutup Notepad.
  10. Klik Mulai, klik Menjalankan, jenis cmd, lalu klik Oke untuk memulai prompt perintah Windows 2000. Jenis CD \EventSink untuk mengubah ke C:\EventSink folder.
  11. Jenis instsink.bat, kemudian tekan ENTER untuk Jalankan batch file dan daftar sampel EventSink untuk log pesan. Memverifikasi bahwa wastafel acara terdaftar dengan benar, dan kemudian ketik exit dan tekan ENTER untuk keluar dari prompt perintah.
  12. Klik Mulai, klik Program, klik Microsoft Exchange, lalu klik Manajer sistem.
  13. Klik Server, memperluas server Anda, klik SMTP, dan kemudian restart Default SMTP Virtual Server.
  14. Menguji transportasi acara wastafel dengan menggunakan Telnet.

Berlaku bagi:
  • Microsoft Exchange Server 2003 Enterprise Edition
  • Microsoft Exchange Server 2003 Standard Edition
  • Microsoft Exchange 2000 Server Standard Edition
  • Microsoft Windows Small Business Server 2003 Premium Edition
  • Microsoft Windows Small Business Server 2003 Standard Edition
Kata kunci: 
kbhowtomaster kbmt KB313404 KbMtid
Penerjemahan MesinPenerjemahan 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:313404  (http://support.microsoft.com/kb/313404/en-us/ )