数据库访问.doc

数据库访问 访问方法 具体步骤 数据库连接 通过数据适配器向导建立数据库的连接 从工具箱拖放SqlDataAdapter控件到窗体； 数据适配器配置向导生成控件SqlConnection； SqlDataAdapter右键生成数据集DataSet； 拖放显示控件窗体，设置显示控件.datasource=dataset.表； 在代码中实现物理表到内存表的填充，SqlDataAdapter.fill(dataset,”表名”)。 通过服务器表对象的拖放建立数据库的连接 服务器资源管理器→数据库→表→拖放到窗体； 生成两个控件（SqlConnection和SqlDataAdapter），SqlDataAdapter右键生成数据集DataSet； 拖放显示控件窗体，设置显示控件.datasource=dataset.表； 在代码中实现物理表到内存表的填充，SqlDataAdapter.fill(dataset,”表名”)。 鼠标拖放方式 从工具箱拖放SqlConnection控件到窗体，属性ConnectionString，设置数据库连接； 拖放显示控件窗体，设置显示控件.datasource=dataset.表； 生成dataset,bindingsource,和tableset； 在代码中实现物理表到内存表的填充，SqlDataAdapter.fill(dataset,”表名”)。 窗口代码 Dim sqlstr As String = select * from student Dim constr As String = initial catalog = university;integrated security = SSPI; server = USER-PC\SQLEXPRESS 1．定义SqlConnection对象连接 Dim conn As New SqlConnection(constr) 2．定义SqlDataAdapter对象 Dim adapter As New SqlDataAdapter(sqlstr, conn) 3．定义DataSet对象 Dim s_dataset As New DataSet 4. 实现物理表到内存表的填充 adapter.fill(s_dataset, student) 5. 设置显示控件的数据源 DataGrid1.DataSource = s_dataset.Tables(0) 访问内容 具体步骤 数据库 绑定 浏览每条记录时，数据绑定 连接数据库，建好数据源； 显示控件→属性→DataBindings→Text→Dataset.表.字段 窗口内定义全局变量： Dim mybind As BindingManagerBase 附上数据源 mybind = me.BindingContext(DataSet, “表名”) 按钮button的动作click设置，通过mybind.position来控制显示的记录信息。 记录位置 mybind.Position 添加空白行 mybind.AddNew() 删除指定行 mybind.RemoveAt(mybind.Position) 撤销修改 mybind.EndCurrentEdit() 在窗体上直接修改，然后用该方法结束当前修改 mybind.EndCurrentEdit() SqlDataAdapter1.Update(DataSet.表) 基于SqlCommand的数据访问 产生满足一定条件的数据集 Dim sqlstr As String = select * from student,course where snum in (select snum from sc where score =90) and cnum in (select cnum from course where cname=数据库技术) Dim constr As String = server=CHUNMEILIU-PC\SQLEXPRESS;integrated security=SSPI;initial catalog=university 数据库连接： Dim conn As New SqlConnection(constr) 定义SqlConmand对象； Dim cmd As New SqlCommand cmd.Connection = conn cmd.CommandText = sqlstr 定义SqlDataAdapter对象 Dim adapter As New SqlDataAdapt