Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vyhľadajte kód , ktorý vytvorí objekt čítačka dát . V aplikácii Visual Basic , kód vyzerá niečo ako toto :
 01 : Dim conn Ako SqlConnection = Nothing 
 
 02 : Dim cmd ako SqlCommand 
 
 03 : Dim RDR ako SqlDataReader = nič 
 
 04 : Dim pole1 , pole2 As String 
 
 05 : 
 
 06 : Skúste 
 
 07 : conn = CreateConnection ( ) 
 
 08 : cmd = nový SqlCommand ( " ProcName " , prip ) 
 
 09 : cmd.CommandType = CommandType.StoredProcedure 
 
 10 : 
 
 11 : RDR = cmd.ExecuteReader 
 
 12 : Kým rdr.Read 
 
 13 : pole1 = rdr.GetString ( 0 ) 
 
 14 : field2 = rdr.GetString ( 1 ) 
 
 15 : ... 
 
 16 : End While 
 
17 : Autor
 18 : Chytiť ex ako výnimka 
 
 19 : Jednorazové 
 
 20 : 
 
 21 : Konečne 
 
 22 : rdr.Close ( ) 
 
 23 : Conn.Close ( ) 
 
 24 : End Try 
 
 Všimnite si , že v tomto príklade je použitá SQL verzia DataReader . Rovnaký kód funguje pre OLEDB a iných triedach DataReader 
 2 
 Vymeňte vyhlásenie o DataReader v súlade 3. s novým vyhlásením pre DataSet ds názvom : . 
 
 01 : Dim conn ako SqlConnection = Nothing 
 
 02 : Dim cmd ako SqlCommand 
 
 03 > Dim ds ako nový DataSet 
 
 04 : Dim pole1 , pole2 As String 
 
 05 : 
 3 
 Vymeňte odkazy na DataReader v riadkoch 11 až 16 s novým kódom , ktorý vytvára a nastavuje DataAdapter : 
 
 06 : Skúste 
 
 07 : conn = CreateConnection ( ) 
 
 08 : cmd = nový SqlCommand ( " ProcName " , prip ) 
 
 09 : cmd.CommandType = CommandType.StoredProcedure 
 
 10 : 
 
 11 > Dim je riešená ako nový SqlDataAdapter 
 
 12 > dap.SelectCommand = cmd 
 
 SqlDataAdapter je pomocník objekt slúži k presunu dát tam a späť z DataSet . Potom, čo objekt dostane vytvorený , SelectCommand vlastnosť je nastavená na rovnaký príkaz objekt použitý na vytvorenie DataReader 
 4 
 použite DataAdapter metódu Fill naplniť DataSet : . 
 
 13 > dap.Fill ( ds ) 
 5 
 ukončiť pripojenie pred spracovaním dát , pretože DataSet teraz obsahuje všetky dáta vrátená DataAdapter , ukončenie spojenie je dobré praxe . Tiež si pamätám , odstrániť riadok , ktorý zavrie objekt čítačka dát ( riadok 22 ) : 
 
 18 : Chytiť ex ako výnimka 
 
 19 : Hoďte 
 
 20 : 
 
 21 : Na záver 
 
 23 : Conn.Close ( ) 
 
 24 : End Try 
 6 
 spracovanie dát , načítanie je z kolekcie radu DataSet ako takto : 
 
 25 > Pre každý riadok ako DataRow V ds.Tables ( 0 ) Riadky 
 
 26 > pole1 = riadok ( " pole1 " ) 
 
 27 > field2 = . riadok ( " Field2 " ) 
 
 28 > ... 
 
 29 > ... 
 
 30 > Ďalšia