杭州交通信息网华世隆国际公寓底商:在VB中用ADO控件连接数据库
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/28 18:10:14
在VB中用ADO控件连接数据库时可否采用非绝对路径？如果可以的话又该怎么创建呢？？？
代码如下,应用程序须与数据库在同一目录夹内:
frmWzDy.Adodc3.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\cartemp.mdb;Persist Security Info=False"
frmWzDy.Adodc3.RecordSource = "select * from celweizhi"
frmWzDy.Adodc3.Refresh
连接数据库语言的建立请参考本人回答相似问题的答复,注意本答复相对路径与下面网址内的绝对路径之差异:
http://zhidao.baidu.com/question/4653180.html
Set Coon = CreateObject("ADODB.Connection")
Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DBMDB.mdb;"'DBMDB.mdb为数据库文件名字，必须放在工程文件同目录下
Coon.Open Connstr
Set rs = CreateObject("ADODB.recordset")
Sql = "select * from 表名"
rs.Open Sql, Coon, 1, 3
'下面为添加数据（新建纪录）
rs.addnew
rs("字段名")=1
…………
rs.update
rs.close
set rs=nothing