步骤如下:
在铜陵等地区,都构建了全面的区域性战略布局,加强发展的系统性、市场前瞻性、产品创新能力,以专注、极致的服务理念,为客户提供网站制作、做网站 网站设计制作按需网站策划,公司网站建设,企业网站建设,品牌网站建设,全网营销推广,外贸营销网站建设,铜陵网站建设费用合理。
1. 先到C:\WINDOWS\system32目录下看看你的系统里是否已经有了MSADODC.ocx和MSDATGRD.ocx这两个文件(多半是没有的),要是有了就直接看第2步吧。
然后放到C:\WINDOWS\system32目录下。
2. 在VS 2005中注册MSADODC.ocx和MSDATGRD.ocx这两个控件。在VS 2005中点击"Tools" -- "Visual Studio 2005 Command Prompt",输入如下命令即可:
regsvr32 msadodc.ocx
regsvr32 msdatgrd.ocx
我的理解是这样的,当你设置了 ADODC1.CONNECTIONSTRING 属性和 RECORDSOURCE属性时,这个时候ADODC1 并没有连接到数据库,并向数据库提出数据放到 其 RECORDSET 对象中,所以此时 RECORDSET 对象没有被建立和初始化,因此你尝试访问这个对象时就弹出错误了。
你当加入 Set Text1.DataSource = Adodc1 (意为将 TEXT1 绑定到 ADODC1)时,程序运行到这里,ADODC1会自动的连接数据库,并向数据库提取数据记录。因此此时RECORDSET 也就被建立被初始化了,你也就可以访问它了。
还有,你可以用 ADODC1.REFRESH 代替 Set Text1.DataSource = Adodc1 。作用如上。
; 在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