新客网WWW.XKER.COM:致力做中国最专业的网络学院!
学院: 操作系统 - 网络应用 - 服务器 - 网络安全 - 工具软件 - 办公软件 - Web开发 - 数据库 - 网页设计 - 图形图像 - 媒体动画 - 硬件学堂 - 存储频道 - QQ专区
您的位置:首页 > 软件开发 > .Net开发 > Asp.net教程 > 正文:ADO.NET 基础教程(一)

ADO.NET 基础教程(一)

新客网 XKER.COM 2005-05-17 来源: 收藏本文

网络上的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


收藏】 【评论】 【推荐】 【投稿】 【打印】 【关闭
发表评论
要记得去论坛讨论,点击注册新会员匿名评论
评论内容:不能超过250字,需审核后才会公布,请自觉遵守互联网相关政策法规。
阅读排行
随机推荐
实用信息推荐