Visual Basic. NET'te DataReader kullanarak birden çok sonuçlarý tanýtýcý nasýl kullanýlýr

Bu makale, birden çok kayýt kümeleri ve saklý yordam veya SQL deyimlerini toplu iþ yürütmesini döndürdü diðer iletileri iþlemek için kullanabileceðiniz genel bir iþlev içerir.

Tekniðin Açýklamasý

ActiveX Data Objects (ADO), beþ farklý veri türleri sunucudan alabilir:

• Recordset
• Eylem sorgusu (örneðin, INSERT, UPDATE, DELETE ve SELECT INTO) tarafýndan deðiþtirilen kayýt sayýsý
• Bilgi iletisi veya uyarý
• Hata iletisi
• Saklý yordamýn dönüþ deðerleri ve çýkýþ parametreleri

Bir SQL deyimi toplu sonuçlarýný okuduðunuzda, at the resultset sonraki sonucu DataReader konumlandýrmak için NextResult yöntemini kullanabilirsiniz.

Gereksinimler

Aþaðýdaki listede, gereksinim duyacaðýnýz donaným, yazýlým, að altyapýsý ve hizmet paketleri önerilmektedir:

• Microsoft Windows 2000 Professional, Windows 2000 Server, Windows Server veya Windows NT 4.0 Server 2000 Advanced
• Microsoft Visual Studio. NET'i
• Microsoft SQL Server 7.0 veya sonrasý

Bu makalede, aþaðýdaki konularda bilgi sahibi olduðunuz varsayýlmaktadýr:

• Visual Studio .NET
• ADO.NET temelleri ve sözdizimi

Proje oluþturmak ve kodu ekleme

Bu örnek <a0>pubs</a0> örnek veritabanýnýn Authors tablosu kullanýr.

1. Aþaðýdaki SQL Query Analyzer ' yapýþtýrýn ya da ISQL yardýmcý programý aracýný:

   CREATE PROC MyProc
   AS
       SELECT * FROM Authors
       SELECT * FROM Authors WHERE State = 'CA'
   GO 
   					

2. Visual Studio. NET'i açýn.
3. Yeni bir Visual Basic Windows Application oluþturma proje.
4. Projenizi System.Data ad boþluðuna baþvuru içerdiðinden emin olun ve yoksa, bu ad için bir baþvuru ekleyin.
5. Bir komut düðmesi Form1'ýn getirin. Name özelliði düðmenin btnTest için deðiþtirmek ve sýnama için metin özelliði deðiþtirme.
6. ýmports</a0> deyimini Sistem, System.Data.OLEDB ve System.Data.SqlClient ad kullanmayý kodunuzu daha sonra bu ad boþluklarýnda bildirimlerinde nitelemek için gerekli deðildir. Form1 genel Tanýmlamalar bölümüne aþaðýdaki kodu ekleyin:

   Imports System
   Imports System.Data.OleDb
   Imports System.Data.SqlClient
   					

7. "Windows Form Designer generated" bölge kod penceresinde aþaðýdaki kodu ekleyin.
   
   Not<username>Kullanýcý KIMLIÐINI ve parolasýný deðiþtirmek için doðru deðerler, bu kodu çalýþtýrmadan önce = < güçlü parola >. Kullanýcý KIMLIÐI'in veritabanýnda bu iþlemi gerçekleþtirmek için uygun izinlere sahip olduðundan emin olun.

       Private Sub btnTest_Click(ByVal sender As System.Object, _
       ByVal e As System.EventArgs) Handles btnTest.Click
           Dim myConnString As String = _
                   "User ID=<username>;Password=<strong password>;Initial Catalog=pubs;Data Source=myServer"
           Dim myConnection As New SqlConnection(myConnString)
           Dim myCommand As New SqlCommand()
           Dim myReader As SqlDataReader
   
           myCommand.CommandType = CommandType.StoredProcedure
           myCommand.Connection = myConnection
           myCommand.CommandText = "MyProc"
           Dim RecordCount As Integer
   
           Try
               myConnection.Open()
               myReader = myCommand.ExecuteReader
               While myReader.Read()
                   'Write logic to process data for the first result.
                   RecordCount = RecordCount + 1
               End While
               MessageBox.Show("Total number of Authors: " & RecordCount.ToString)
   
               myReader.NextResult()
               RecordCount = 0
   
               While myReader.Read()
                   'Write logic to process data for the second result.
                   RecordCount = RecordCount + 1
               End While
                MessageBox.Show("Authors from California: " & RecordCount.ToString)
           Catch ex As Exception
               MessageBox.Show(ex.ToString())
           Finally
               myConnection.Close()
           End Try
       End Sub
   					

8. Baðlantý dizesi (myConnString) ortamýnýza uygun olarak deðiþtirin.
9. Projenizi kaydetmek. Hata Ayýkla) menüsünde, projenizin çalýþtýrmak için Baþlat ' ý týklatýn.
10. Sýna ' yý týklatýn. Ileti kutularýný saklý yordamýn döndürdüðü verileri görüntülemesini dikkat edin.

Baþvurular

Saklý yordamlar arama hakkýnda daha fazla bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aþaðýdaki makale numarasýný týklatýn: Hata iþleme hakkýnda ek bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aþaðýdaki makale numarasýný týklatýn: Parametreleri ve saklý yordamlar hakkýnda ek bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aþaðýdaki makale numarasýný týklatýn: ADO.NET nesneleri ve sözdizimi hakkýnda daha fazla bilgi için aþaðýdaki Microsoft .NET Framework Software Development Kit'e (SDK için) baþvuran belgeler: