注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

糊涂小妹

一个矫情到不行的文艺小青年

 
 
 

日志

 
 

【转载】VB访问数据库  

2014-05-31 09:17:57|  分类: 数据库 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
本文转载自李平 《VB访问数据库》
VB提供了多种方式访问数据库(1)使用ADO对象通过编写代码访问数据库(2)使用ADO Data控件快速创建数据库链接(3)使用数据环境设计器
一,使用ADO对象
1.创建ODBC数据源

2、建立ADO引用

为了能够在程序中使用ADO对象编程,在连接数据库前,需要在Visual Basic 6.0菜单 “工程”—“引用”中选 Microsoft ActiveX Data Objects 2.5 Library组件。

3、代码

1)创建一组ADO对象用于设置打开连接和产生结果集:

Dim objCnn As  ADODB.Connection

Dim objRs As  ADODB.Recordset

Dim objCmd As ADODB.Command

2)创建ADO对象实例

Set objcnn =New ADODB.Connection

Set objRs =New ADODB.Recordset

Set objCmd = New ADODB.Command

3)设置Connection对象实例的ConnectionString属性(注:ConnectionString为可读写string类型,指定一个连接字符串,告诉ADO如何连接数据库。),以便连接到数据库。objCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;" & "data source=" & App.Path & "\实例1.mdb"

4)设置好连接属性后,就可以打开连接对象:

objCnn.Open

 (5)关闭数据库

                     objCn.Close

                  Set objRs = Nothing

                 Set objCn = Nothing

 二、使用ADO Data控件

1,在控件选项卡上,选择Microsoft ADO data Control6.0 (sp6) (OLEDB)控件

2.右击控件,选择AODOC属性

VB访问数据库 - 李平  - 李平 廊坊师范学院信息技术提高班 11期
 

在接下来的对话框中选择Microsoft Jet 4.0 OLE DB probider,单击下一步(此处少一个对话框,没有添加)

VB访问数据库 - 李平  - 李平 廊坊师范学院信息技术提高班 11期

 

在记录源选项卡中。1,命令类型改为2。2,修改表或储存过程名称

设置Datafield datasource属性

代码

     Adodc1.Caption = "当前记录:" & Adodc1.Recordset.AbsolutePosition & "/" & Adodc1.Recordset.RecordCount
  评论这张
 
阅读(24)| 评论(7)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017