Cara membuat aturan kustom di Outlook 2000 dengan menggunakan Visual Basic untuk aplikasi

Terjemahan Artikel Terjemahan Artikel
ID Artikel: 235852 - Melihat produk di mana artikel ini berlaku.
Untuk versi Microsoft Outlook 2002 artikel ini, Lihat 292063.
Perbesar semua | Perkecil semua

RINGKASAN

Jika Wisaya aturan Outlook tidak menyediakan fitur yang memenuhi kebutuhan Anda-perutean e-mail, Anda mungkin dapat menggunakan Outlook Visual Basic untuk Aplikasi untuk membuat aturan kustom. Artikel ini menjelaskan bagaimana untuk memulai menyiapkan aturan sederhana dan membahas beberapa pertimbangan untuk tetap pikiran ketika membuat aturan yang menggunakan Visual Basic untuk aplikasi.

INFORMASI LEBIH LANJUT

Microsoft menyediakan pemrogaman hanya untuk ilustrasi, tanpa garansi baik tersurat maupun tersirat, termasuk, namun tidak terbatas pada, jaminan tersirat mengenai keadaan yang dapat diperjualbelikan dan/atau kesesuaian untuk tujuan tertentu. Artikel ini mengasumsikan bahwa Anda sudah familiar dengan bahasa pemrograman yang ditunjukkan dan alat-alat yang digunakan untuk membuat dan memperbaiki prosedur. Profesional dukungan Microsoft dapat membantu menjelaskan fungsionalitas prosedur tertentu, tetapi mereka tidak akan mengubah contoh tersebut untuk menyediakan fungsionalitas tambahan atau membuat prosedur untuk memenuhi kebutuhan spesifik Anda.
Jika Anda memiliki terbatas pengalaman pemrograman, Anda mungkin ingin menghubungi Microsoft Certified Partner atau Microsoft Advisory Services. Untuk informasi lebih lanjut, kunjungi situs Web Microsoft ini:

Microsoft Certified Partner- https://Partner.Microsoft.com/global/30000104

Microsoft Advisory Services- http://support.Microsoft.com/GP/advisoryservice

Untuk informasi lebih lanjut tentang opsi dukungan yang tersedia dan tentang cara menghubungi Microsoft, kunjungi Website Microsoft berikut:http://support.Microsoft.com/default.aspx?scid=Fh;EN-US;CNTACTMS Langkah-langkah berikut membuat aturan secara otomatis diforward mail yang Anda terima di luar dari biasa jam kerja alamat e-mail lain, seperti alamat e-mail yang Anda gunakan di rumah, atau untuk orang lain yang bekerja shift setelah Anda.

  1. Pada Alat menu, titik Makro, klik Penyunting Visual Basic.
  2. Dalam Proyek - Project1 panel, klik dua kali Project1, lalu klik dua kali Microsoft Outlook objek.
  3. Klik dua kali ThisOutlookSession untuk membuka jendela kode.
  4. Dalam jendela kode, ketik kode berikut. Memodifikasi garis yang menentukan alamat e-mail; mengganti alamat e-mail yang Anda inginkan e-mail yang diteruskan ke:
    Public WithEvents myOlItems As Outlook.Items
    
    
    Public Sub Application_Startup()
    
       ' Reference the items in the Inbox. Because myOlItems is declared
       ' "WithEvents" the ItemAdd event will fire below.
       Set myOlItems = Outlook.Session.GetDefaultFolder(olFolderInbox).Items
    
    End Sub
    
    
    Private Sub myOlItems_ItemAdd(ByVal Item As Object)
    
       ' If it's currently not between 9:00 A.M. and 5:00 P.M.
       If Time() < #9:00:00 AM# Or Time() > #5:00:00 PM# Then
    
          ' Check to make sure it is an Outlook mail message, otherwise
          ' subsequent code will probably fail depending on what type
          ' of item it is.
          If TypeName(Item) = "MailItem" Then
    
             ' Forward the item just received
             Set myForward = Item.Forward
    
             ' Address the message
             myForward.Recipients.Add "myaddress@mydomain.com"
    
             ' Send it
             myForward.Send
    
          End If
    
       End If
    
    End Sub
    					
  5. Pada Berkas menu, klik Simpan VBAProject.otm.
  6. Tutup Editor Visual Basic.
  7. Restart Outlook sehingga kode akan berjalan.
CATATAN: Untuk informasi lebih lanjut tentang bagaimana untuk memastikan bahwa kode Anda dengan benar menangani berbagai jenis item, silakan lihat artikel berikut di Basis Pengetahuan Microsoft:
222482 OL2000: Bagaimana untuk menangani barang-barang yang tak terduga dalam koleksi
Pertimbangan berikut harus dipertimbangkan jika Anda sedang mempertimbangkan untuk menerapkan solusi aturan menggunakan Visual Basic untuk Aplikasi:
  • Outlook harus menjalankan untuk Visual Basic untuk Kode aplikasi untuk menjalankan. Ini adalah efek yang sama dengan menggunakan klien-sisi aturan di Wisaya aturan. Jika Outlook tidak berjalan pada waktu pesan diterima, aturan tidak akan bekerja.
  • Aturan kustom dapat bertentangan dengan aturan lain Anda telah mengatur dengan menggunakan Wisaya aturan. Sebagai contoh, jika Anda menggunakan Microsoft Exchange Server dan membuat aturan sisi server yang bergerak surat dari individu tertentu ke folder tertentu, mail pindah di server dan tidak pernah mencapai Kotak masuk. Oleh karena itu, ItemAdd acara tidak berjalan karena item tidak ditambahkan ke Kotak masuk.
  • Kode berjalan terlepas dari bagaimana item akan ditambahkan ke Kotak masuk. Sebagai contoh, jika Anda bekerja satu malam dan seret pesan untuk Anda Kotak masuk, pesan yang diteruskan ke account e-mail lain.
  • Outlook juga telah NewMail acara, tetapi peristiwa itu hanya berjalan ketika Anda mendapatkan email baru pemberitahuan. Jika Anda menerima pesan tiga sekaligus, acara hanya berjalan sekali. Anda dapat menggunakan NewMail acara untuk memastikan bahwa Anda Visual Basic untuk aplikasi kode hanya berjalan ketika Anda menerima pesan baru, tetapi Anda harus menambahkan tambahan logika untuk kode untuk mencari pesan yang belum dibaca sebelum. Jadi Sayangnya kedua event ini cenderung untuk memiliki efek samping yang tidak diinginkan:
    • The ItemAdd acara membuatnya mudah untuk bertindak pada semua item yang masuk, tetapi juga berfungsi pada item-item yang Anda pindah ke kotak masuk Anda.
    • The NewMail acara tidak berjalan saat Anda menarik item ke kotak masuk, tapi itu lebih sulit untuk program solusi untuk memperhitungkan bahwa ada beberapa item dalam kotak masuk yang kode Anda harus bertindak.

REFERENSI

Untuk informasi tambahan tentang sumber daya yang tersedia dan jawaban untuk pertanyaan umum tentang Microsoft Outlook 2000 solusi, Silakan lihat artikel berikut pada Basis Pengetahuan Microsoft:
146636 OL2000: Pertanyaan tentang bentuk-bentuk Custom dan Outlook solusi
Note This is a "FAST PUBLISH" article created directly from within the Microsoft support organization. The information contained herein is provided as-is in response to emerging issues. As a result of the speed in making it available, the materials may include typographical errors and may be revised at any time without notice. See Terms of Use for other considerations.

Properti

ID Artikel: 235852 - Kajian Terakhir: 20 September 2011 - Revisi: 2.0
Berlaku bagi:
  • Microsoft Outlook 2000 Standard Edition
Kata kunci: 
kbvba kbaddin kbhowto kbprogramming kbmt KB235852 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:235852

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com