当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > ADO在vb.net中的使用(与datagrid结合)

ASP.NET
asp.net ajax功能强大的UpdatePanel控件
mscorwks.dll在.Net中的地位及代码保护应用
使用.NET实现你的IP切换器
在ADO.NET中用参数化查询缩短开发时间
Login控件:用户登录失败的消息提示
如何用C#来部署数据库
.net打包自动安装数据库
数据库开发个人总结(ADO.NET小结)
ASP.NET如何进行性能优化问题(2)
ASP.NET如何进行性能优化问题(1)
用.Net实现基于CSS的AJAX开发(6)
用.Net实现基于CSS的AJAX开发(5)
用.Net实现基于CSS的AJAX开发(4)
用.Net实现基于CSS的AJAX开发(3)
用.Net实现基于CSS的AJAX开发(2)
用.Net实现基于CSS的AJAX开发(1)
C#下用P2P技术实现点对点聊天
ASP.NET服务器端异步Web方法
在asp.net中如何从视频文件中抓取一桢并生成图像文件
.NET中多线程的同步资源访问

ASP.NET 中的 ADO在vb.net中的使用(与datagrid结合)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 102 ::
收藏到网摘: n/a

在VB6 在,ADO是大家在数据库编程中用得较多的。而在新的vb.net中,虽然也可以用它来查询数据库,但在与新的datagrid的绑定中,不能像以前那样使用:“datagrid1.datasoure=rs”,而是需要一定的转化。因为新的datagrid.datasoure所对应的是 datatable或dataset,而并不是原来的Recordset。所以,在使用中,要把Recordset转换成datatable或 dataset。我们以datatable为例: 
  
以下为引用的内容:
Function RecordsetToDataTable(ByVal adoRS As ADODB.Recordset, ByVal strTable As String)
  
   adoRS.MoveFirst()
   Dim dt As DataTable
   dt = New DataTable(strTable)
   Dim i As Integer
   Dim strcolname As String
   Dim t As Type
   Dim dr As DataRow
  
   For i = 0 To adoRS.Fields.Count - 1
   strcolname = adoRS.Fields(i).Name
   t = adoRS.Fields(i).Value.GetType()
   dt.Columns.Add(strcolname, t)
   Next    
   
   While (Not adoRS.EOF)
   dr = dt.NewRow()
   For i = 0 To adoRS.Fields.Count - 1
   dr(i) = adoRS.Fields(i).Value
   Next
   dt.Rows.Add(dr)
   adoRS.MoveNext()
   End While
  
   Return dt
  
   End Function
  
以上函数是实现将Recordset转换成DataTable
  
而我们要做的,就是在窗口的load中加入对ADO中的转化后再进行引用。 
  
以下为引用的内容:
   Dim dts As DataTable
  
   dts = RecordsetToDataTable(rsuser, "login") '其中rsuser为ado.Recordset,"login"为表名
   DataGrid1.DataSource = dts.DefaultView