数据库建立连接的方式
(1)通过代码 获取 :
如:
Dim objCn as new connection ,objRs as new Recordset,strCn as String
Connection 连接对象
Recordset 结果集 用于保存结果
String 用于保存连接的地址 字符数据
如
- <span style="font-family:SimHei;font-size:18px;color:#000000;">objCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
- "Data Source=" & App.Path & "\实例1.mdb"
- objCn.Open</span>
(2) 通过ODBC数据源连接
建立数据源
然后连接
扫描二维码关注公众号,回复:
8505643 查看本文章
- <span style="font-family:SimHei;font-size:18px;color:#000000;">Set objCn=new connection
- objCn.open “DSN=实例 DSN”
- set objRs=new recordset
- </span>
(3) 采用数据绑定
控件连接
Ado data 控件 右击属性中设计 连接
可以绑定到内部控件,和一些activateX
控件
(4) 显示数据控件
DataGrid控件 显示记录集的全部数据
MSFlexGrid 控件
数据库添加方法(VB6)
定义相关量
一个结果集,用来保存结果,更新结果
第一个字符串 ,用来保存sql语句,查询位置
一个字符串,用来保存查询函数的查询状态