通过代码在表中添加数据

xemcluobiq

dim conn as adodb.connection
dim rs as adodb.recordset
dim sql as string
set conn = currentproject.connection
sql="select * from 表名"
set rs=new adodb.recordset
rs.open sql,conn,
rs.addnew
rs.field("")=""

rs.update
set rs=nothing

laiguiyou

这是用ADO来实现

tmtony

也可使用sql 语句

xemcluobiq

可以告诉我用sql怎样写吗

tz-chf

rs.open sql,conn,      conn后多了一个“,”，而且默认是只读的，要增加记录还需要参数。既然打开一个表，直接写表名好了，不必select.....
rs.addnew
rs.field("")=""

rs.update
set rs=nothing     此句前加rs.close

[ 本帖最后由 tz-chf 于 2008-4-11 22:19 编辑 ]