ADO.NET 基礎教程（一）

ado|基礎教程
網路上的ADO.NET教程在都不是基於VS2003的，我在此把以前初學的時候的一些代碼共用給大家，讓還在摸索階段的朋友能學得順利一點兒

一、資料查詢

1、DataReader唯讀向前的資料集
        Dim cn As New SqlClient.SqlConnection
        cn.ConnectionString = "server=develop;uid=sa;pwd=hz0222;database=crm2004"
        cn.Open()
        Dim cmd As New SqlClient.SqlCommand
        cmd.Connection = cn
        Dim i As Integer
        cmd.CommandText = "SELECT * FROM TABLE1"
        Dim dr As SqlClient.SqlDataReader
        dr = cmd.ExecuteReader
        i = 0
        Do While dr.Read()
            fp1.Sheets(0).Cells(i, 0).Text = dr("id")
            fp1.Sheets(0).Cells(i, 1).Text = dr("FName")
            fp1.Sheets(0).Cells(i, 2).Text = dr("FAge")
            fp1.Sheets(0).Cells(i, 3).Text = dr("FAdd")
            i += 1
        Loop

在這個例子中，首先申明一個SqlConnection對象，用它來串連SQL SERVER資料庫，然後再申請一個SqlCommand對象，用它來執行一個SQL查詢語句，最後申明一個SqlDataReader，用它來存放由SqlCommand對象的ExecuteReader方法返回的資料集

用DataReader聽說很快，我沒有做過測試，但網上面說得有任有據的，我也就用來查詢資料了。上面的這個例子是用來查詢一個表中所有的資料，並把它們放到一個資料控制項中去，用的是VB的代碼，C#大至差不多

2、DataSet資料集

Dataset可以管理多個記得集：DataTable，也就是ADO的RecordSet對象，請看下面這個例子：

'綁定資料
    Private Sub BindData()
        '申請一個串連串對象
        Dim cn As New SqlClient.SqlConnection
        '初始化串連串
        cn.ConnectionString = "server=localhost;uid=sa;pwd=hz0222;database=CRM2004"
        '開啟串連串
        cn.Open()

        '申明一個資料配接器
        Dim da As New SqlClient.SqlDataAdapter("SELECT * FROM t_cst_info", cn)
        '申明一個資料集(可以包含表)
        Dim ds As New DataSet
        '填充資料表
        da.Fill(ds, "t_cst_info")
        ds.Tables(0).TableName = "客戶檔案表"
        da.SelectCommand = New SqlClient.SqlCommand("SELECT * FROM T_base_zygl", cn)
        da.Fill(ds, "T_base_zygl")
        ds.Tables(1).TableName = "職員檔案表"
        da.SelectCommand = New SqlClient.SqlCommand("SELECT * FROM t_base_bmqk", cn)
        da.Fill(ds, "t_base_bmqk")
        ds.Tables(2).TableName = "部門情況表"
        '綁定到DataGrid
        Me.DataGrid1.DataSource = ds
    End Sub

這個代碼和上面的差不多，只是用了SqlDataAdapter來代替了SqlCommand執行SQL查詢，SqlDataAdapter用微軟體的話說是“資料配接器”，我現在知道的功能就是用執行Sql查詢，並填充到Dataset或DataTable對象中去。上面的例子中我們填充了三個DataTable