怎样在BCB中使用ADO连接Access数据库

你必须在DW里面把网页存为ASP或者PHP才可以采用动态数据库更新数据 要把站点修改一下 然后

在dreamwave用代码或者在面板里面的数据库创建连接

ASP代码是<%%

dim conn

dim db

db="admin/database/Enterprise.mdb" //你的文件路径下面的数据库，具体你自己替换

set conn=Server.CreateObject("adodb.connection")

conn.provider="Microsoft.jet.oledb.4.0Data source=" &Server.MapPath(db)

conn.open

sub CloseConn()

conn.close

set conn=nothing

end sub

%>%>

创建好连接后创建记录集和SQL COMMAND对象就可以连接上了

<%

dim rs,sql

set rs=server.CreateObject("adodb.recordset")

sql="select * from wo where 表格里面的字段='"&indexAD_ID&"' "//我是你的数据库里德表格名称 自己在数据库里面建好

rs.open sql,conn,1,1

%>

然后你只要在那个位置输入<%indexAD_id%>就可以了 只要连接数据库成功之后 其他就很方便 不过这要有点ADO基础 你好好找找资料试验下吧

#include "objbase.h" //牵涉到COM对象，必须包含此头文件

AnsiString srcmdb="c:\\test.mdb"//原文件名(压缩之前)

AnsiString destmdb="c:\\test2.mdb"//目标文件名(压缩之后)

CoInitialize(NULL)//初始化COM对象

AnsiString src = "Provider=Microsoft.Jet.OLEDB.4.0Data Source="+srcmdb//连接字串

AnsiString dest = "Provider=Microsoft.Jet.OLEDB.4.0Data Source="+destmdb

Variant AdoObj = Variant::CreateObject("JRO.JetEngine")

AdoObj.OleProcedure("CompactDatabase",src.c_str(),dest.c_str())

AdoObj.Clear()

CoUninitialize()

DeleteFile(srcmdb) //删除原文件，如果不放心可以不删除留个备份，但需要改名

RenameFile(destmdb,srcmdb)//将压缩后的文件改成原文件名

---