Makale numarası: 314378 - Son Gözden Geçirme: 29 Kasım 2007 Perşembe - Gözden geçirme: 2.3

Nasıl yapılır: Visual Basic. NET'te CDOEX kitaplığı ve ExOLEDB sağlayıcısı kullanarak nesnenin tüm alanlar sıralanamıyor.

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ı.
Dikkat ADO ve ADO MD tam olarak bir Microsoft .NET Framework ortamında sınanmamıştır. Özellikle de hizmet tabanlı veya çok iş parçacıklı uygulamalarda zaman zaman sorunlara neden olabilirler. Bu makalede açıklanan teknikler ADO.NET'e geçiş sırasında yalnızca geçici bir önlem olarak kullanılmalıdır. Bu teknikler, yalnızca hiçbir uyumluluk sorunları olduğundan emin olmak için tam sınama gerçekleştirip sonra kullanmalısınız. ADO veya ADO MD bu şekilde kullanımından kaynaklanan sorunlar desteklenmez. Daha fazla bilgi için, aşağıdaki Microsoft Bilgi Bankası makalesine bakın:
840667   (http://support.microsoft.com/kb/840667/ ) Bir .NET Framework uygulamasında ADO ve ADO MD kullanırken beklenmedik bir hata alıyorsunuz
Bu makalenin Microsoft Visual C# .NET sürümü için bkz: 310203  (http://support.microsoft.com/kb/310203/ ) .

Bu Sayfada

Hepsini aç | Hepsini kapa

Giriş

Bu makalede, Microsoft birlikte çalışma veri nesneleri (CDO) the Microsoft Exchange 2000 Server kitaplığı (CDOEX) için Microsoft Visual Basic. NET'te bir nesnenin tüm alanları numaralandırmak için nasıl kullanılacağı açıklanır.

Not Kod doğru çalıştığından emin olmak için Exchange Server'daki kod çalıştırmalısınız.

Daha fazla bilgi

Gereksinimler

Bu makalede, aşağıdaki konularda bilgi sahibi olduğunuz varsayılmaktadır:
  • Microsoft Exchange OLE DB (ExOLEDB) sağlayıcısı
  • ActiveX Data Objects kitaplığı ile programlama

Aşağıdaki listede, gereksinim duyacağınız donanım, yazılım, ağ altyapısı ve hizmet paketleri önerilmektedir:
  • Microsoft Visual Studio. NET'i
  • Microsoft Exchange 2000 Server
Bir nesnenin tüm alanları listeleyen bir örnek oluşturmak için aşağıdaki adımları izleyin:
  1. Visual Studio .NET'i başlatın.
  2. Dosya menüsünden Yeni ' yi tıklatın ve sonra Project ' i tıklatın.
  3. Visual Basic Projects türleri altında Console Application ' ı tıklatın.

    Varsayılan olarak, Module1.vb oluşturulur.
  4. Microsoft CDO for Exchange 2000 Library başvuru ekleyin. Bunu yapmak için şu adımları izleyin:
    1. Proje) menüsünde Add Reference ' ı tıklatın.
    2. COM sekmesinde, Microsoft CDO for Exchange 2000 Library'ı tıklatın ve sonra da <a2>Seç</a2>'i tıklatın.
    3. Başvuru Ekle iletişim kutusuna seçimlerinizi kabul etmek için Tamam ' ı tıklatın.
    4. Seçtiğiniz kitaplıklar için sar?c?lar? oluşturmak için bir ileti aldığınızda, Evet ' i tıklatın.
  5. Microsoft ActiveX Data Objects 2.5 kitaplığı için bir başvuru eklemek için yukarıdaki adımları yineleyin.
  6. Kod penceresinde kodu aşağıdaki kodla değiştirin:
    Module Module1
    
        Sub Main()
            Dim oCn As ADODB.Connection = New ADODB.Connection()
            Dim oRc As ADODB.Record = New ADODB.Record()
    
            Dim oFields As ADODB.Fields
            Dim oField As ADODB.Field
    
            ' TODO: Replace with your object URL (folder or item).
            Dim sFdUrl As String
            sFdUrl = "http://<ExchServer>/Exchange/<UserAlias>/Inbox"
    
            oCn.Provider = "exoledb.datasource"
            oCn.Open(sFdUrl, "", "", -1)  
    
            If oCn.State = 1 Then
                Console.WriteLine("Good Connection")
            Else
                Console.WriteLine("Bad Connection")
                Return
            End If
    
            oRc.Open(sFdUrl, oCn, _
             ADODB.ConnectModeEnum.adModeReadWrite, _
             ADODB.RecordCreateOptionsEnum.adFailIfNotExists, _
             ADODB.RecordOpenOptionsEnum.adOpenSource, _
             "", "")
    
            If oRc.State = ADODB.ObjectStateEnum.adStateOpen Then
                Console.WriteLine("Record Open Success")
            Else
                Console.WriteLine("Record Open Fails")
                Return
            End If
    
            ' List all the fields.
            oFields = oRc.Fields
            Dim i As Integer
            For i = 0 To oFields.Count - 1
                oField = oFields.Item(i)
                Console.WriteLine("{0} : {1}", oField.Name, oField.Value)
            Next
    
            oRc.Close()
            oCn.Close()
    
            oCn = Nothing
            oRc = Nothing
            oFields = Nothing
            oField = Nothing
        End Sub
    
    End Module
    					
  7. Kod YAPıLACAK ile başlayan satırı değiştirin.
  8. Oluşturmaya ve programı çalıştırmak için F5 tuşuna basın.
  9. Belirtilen nesne alanları numaralandırılır doğrulayın.

Referanslar

ExOLEDB hakkında ek bilgi için aşağıdaki Microsoft Developer Network (MSDN) Web sitesini ziyaret edin:
http://msdn.microsoft.com/en-us/library/ms876455.aspx (http://msdn.microsoft.com/en-us/library/ms876455.aspx)
Birlikte çalışma hakkında ek bilgi için Data Objects Yol Haritası'nı, aşağıdaki MSDN Web sitesini ziyaret edin:
http://msdn.microsoft.com/en-us/library/ms978698.aspx (http://msdn.microsoft.com/en-us/library/ms978698.aspx)

CDOEX hakkında ek bilgi için aşağıdaki MSDN Web sitesini ziyaret edin:
http://msdn.microsoft.com/en-us/library/ms877946.aspx (http://msdn.microsoft.com/en-us/library/ms877946.aspx)


Bu makaledeki bilginin uygulandığı durum:
  • Microsoft Visual Basic .NET 2002 Standard Edition
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Exchange 2000 Server Standard Edition
  • Collaboration Data Objects for Exchange 2000
  • Microsoft ActiveX Data Objects 2.5
  • Microsoft ActiveX Data Objects 2.6
  • Microsoft ActiveX Data Objects 2.7
Anahtar Kelimeler: 
kbmt kbhowto KB314378 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:314378  (http://support.microsoft.com/kb/314378/en-us/ )