vb 连数据库的问题

xinxinworm 2007-12-07 11:13:13
Dim cnn As New ADODB.Connection

cnn.ConnectionString = Adodc1.ConnectionString
cnn.Open
Dim rs As ADODB.Recordset

rs.AddNew
rs.Fields("bookID").Value = 10
rs.Fields("bookName").Value = "College English"
rs.Fields("bookYear").Value = 1999
rs.Fields("bookAuthor").Value = "xinxinworm"
rs.Update
cnn.Close


代码如上 麻烦各位看看 是哪里错了 谢谢
...全文
50 点赞 收藏 5
写回复
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
abiao_521 2007-12-07
你的rs没有指定具体打开的表啊,cnn只连接数据库
Dim rs As New ADODB.Recordset

rs.ActiveConnection = cnn
rs.CursorType = adOpenDynamic '动态游标,可以看见其他用户所作的添加、更改和删除。
rs.LockType = adLockOptimistic '开放式记录锁定(逐条)。提供者使用开放式锁定,只在调用 Update 方法时锁定记录。
rs.Open 表名或SQL
rs.AddNew
rs.Fields("bookID").Value = 10
rs.Fields("bookName").Value = "College English"
rs.Fields("bookYear").Value = 1999
rs.Fields("bookAuthor").Value = "xinxinworm"
rs.Update
cnn.Close
回复
abiao_521 2007-12-07
你的rs没有指定具体打开的表啊,cnn只连接数据库
Dim rs As ADODB.Recordset

rs.ActiveConnection = cnn
rs.CursorType = adOpenDynamic '动态游标,可以看见其他用户所作的添加、更改和删除。
rs.LockType = adLockOptimistic '开放式记录锁定(逐条)。提供者使用开放式锁定,只在调用 Update 方法时锁定记录。
rs.Open 表名或SQL
rs.AddNew
rs.Fields("bookID").Value = 10
rs.Fields("bookName").Value = "College English"
rs.Fields("bookYear").Value = 1999
rs.Fields("bookAuthor").Value = "xinxinworm"
rs.Update
cnn.Close
回复
ydlchina 2007-12-07
兄弟你联数据表了
回复
rexyudl 2007-12-07
Dim rs As new ADODB.Recordset
回复
xinxinworm 2007-12-07
请问 那个
rs.Open 表名或SQL
一句后面的表名是怎么写呢
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7453

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告