Makale numarası: 162371 - Son Gözden Geçirme: 19 Ocak 2007 Cuma - Gözden geçirme: 3.3

ACC:, MS Outlook'un Görev/anımsatıcı eklemek için Otomasyon kullanma

Sistem İpucuBu makale, kullandığınızdan farklı bir işletim sistemine yöneliktir. Sizinle ilgili olmayabilecek makale içeriği devre dışı bırakıldı.
Gelişmiş: Uzman kodlama, birlikte çalışabilirlik ve çok kullanıcılı becerileri gerektirir.

Hepsini aç | Hepsini kapa

Özet

Bu makalede, Microsoft Outlook'a bir görev veya anımsatıcı eklemek Otomasyon nasıl kullanıldığını gösterir.

Bu makalede, Visual Basic for Applications ve programlama Microsoft Access ile sağlanan araçları kullanarak Microsoft Access uygulamaları oluşturma bildiğinizi varsayar. Hakkında daha fazla bilgi için Visual Basic for Applications "Building uygulamaları ile Microsoft Access" el ile sürümü için bkz.

Program aracılığıyla bir görev veya uyarı mektubu Microsoft Access'ten Outlook'a eklemek istediğiniz zamanlar olabilir. Bu makalede, bir görev oluşturabilir ve anımsatıcı bir .wav dosyası çalmak sağlayan örnek kodu sağlanır.

Not: .ReminderSoundFile özelliği için geçerli bir ses dosyası sabit diskinizde göstermelidir.

Daha fazla bilgi

Bir görev veya uyarı mektubu Microsoft Outlook'a eklemek için aşağıdaki adımları izleyin:
  1. Microsoft Access'i başlatın ve Northwind.mdb örnek veritabanını açın.
  2. Bir modül oluşturun ve zaten orada değilse, Tanımlamalar bölümüne aşağıdaki satırı yazın:
    Option Explicit
    					
  3. Araçlar menüsünde, başvurular'ı tıklatın.
  4. Microsoft Outlook <a0>Kullanılabilir başvurular</a0> kutusunda 8.0 Nesne Kitaplığı'nı tıklatın.

    Not: Bu nesne kitaplığı başvurular) listesinde kullanılabilir durumda değilse, varsayılan olarak C:\Program Files\Microsoft Office\Office klasöründe yüklü olan Msoutl8.olb dosyayı bulmak için Gözat'ı tıklatın.
  5. Aşağıdaki yordam yazın:
          Function AddOutLookTask()
             Dim appOutLook As Outlook.Application
             Dim taskOutLook As Outlook.TaskItem
             Set appOutLook = CreateObject("Outlook.Application")
             Set taskOutLook = appOutLook.CreateItem(olTaskItem)
          With taskOutLook
              .Subject = "This is the subject of my task"
              .Body = "This is the body of my task."
              .ReminderSet = True
              .ReminderTime = DateAdd("n", 2, Now)  ' Set to remind us 2
                                                    ' minutes from now.
              .DueDate = DateAdd("n", 5, Now)       ' Set the due date to
                                                    ' 5 minutes from now.
              .ReminderPlaySound = True
               'add the path to a .wav file on your computer.
              .ReminderSoundFile = "C:\Win95\media\ding.wav"
              .Save
          End With
         End Function
    					
  6. Bu işlevi sınamak için <a0></a0>, hata ayıklama penceresinde aşağıdaki satırı yazın ve ENTER tuşuna basın:
    ?AddOutLookTask()
    						
    yeni bir görev Microsoft Outlook'a eklendiğine dikkat edin.

Referanslar

Microsoft Outlook'a randevu eklemek için Otomasyon kullanma hakkında ek bilgi için lütfen Microsoft Knowledge Base'de aşağıdaki makaleye bakın:
160502  (http://support.microsoft.com/kb/160502/EN-US/ ) ACC: Otomasyonu'nu kullanarak Microsoft Outlook'a randevu ekleme
Bulunan tüm Office 97 ürün otomatikleştirme hakkında ek bilgi için Otomasyon teorisi ve birden çok örnek, Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:
167223  (http://support.microsoft.com/kb/167223/EN-US/ ) OFF97: Microsoft Office 97 Otomasyon Yardım dosyasını kullan
Microsoft Access ile Automation'ı kullanma hakkında ek bilgi için Yardım Dizini'nde "Otomasyon için" aramak veya Microsoft Access 97 Office Yardımcısı'nı isteyin.

Bu makaledeki bilginin uygulandığı durum:
  • Microsoft Access 95 Standard Edition
  • Microsoft Access 97 Standard Edition
Anahtar Kelimeler: 
kbmt kbfaq kbinfo kbprogramming KB162371 KbMttr
Otomatik TercümeOtomatik Tercüme
ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.
Makalenin İngilizcesi aşağıdaki gibidir:162371  (http://support.microsoft.com/kb/162371/en-us/ )
Retired KB ArticleKullanım Dışı Bilgi Bankası İçeriği Yasal Uyarı
Bu makale, Microsoft'un artık destek sağlamadığı ürünler ile ilgili olarak yazılmıştır. Bu nedenle, bu makale "olduğu gibi" sağlanmıştır ve bundan sonra güncelleştirilmeyecektir.