网站建设资讯

NEWS

网站建设资讯

vb使用ado点虐 的简单介绍

vb。net中如何利用ADO.NET动态链接excel文件?

可以

创新互联10多年企业网站制作服务;为您提供网站建设,网站制作,网页设计及高端网站定制服务,企业网站制作及推广,对成都会所设计等多个行业拥有丰富的网站营销经验的网站建设公司。

Application.StartupPath

表示根目录,就是程序所在的目录,与vb6的app.path是一样的。你就要这样

".....Data

Source

="

Application.StartupPath

"\xx.xls"

".....Data

Source

=

D:\xx.xls"也可以表示指定位置。

“.....”表示数据库连接的形式,使用的代码省略部分哈。

但是一般做小程序就用Application.StartupPath

,方便些哈,

vb点虐 使用ado点虐 有没像vb6.0使用Recordset的方法

没有这样的,你要适应新的事物。

DataReader跟Recordset有点像,但是它是不可编辑的。

ado点虐 中有 DataTable ,你可以了解一下它。

VB.NET中ADO.NET的问题

一般设计数据库的时候自动编号是自增的,所以新插入的编号是最大的编号

你可以用

select max(id) from table

来获取这个编号

ADO在vb点虐 中的使用(与datagrid结合)

;    在VB 在 ADO是大家在数据库编程中用得较多的 而在新的中 虽然也可以用它来查询数据库 但在与新的datagrid的绑定中 不能像以前那样使用 datagrid 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 = To adoRS Fields Count    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 = To adoRS Fields Count    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 为表名    DataGrid DataSource = dts DefaultView lishixinzhi/Article/program/net/201311/13855


标题名称:vb使用ado点虐 的简单介绍
地址分享:http://njwzjz.com/article/ddjgpee.html