vb 连数据库的问题

[xinxinworm]

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


代码如上 麻烦各位看看 是哪里错了 谢谢

[xinxinworm]

请问 那个
rs.Open 表名或SQL
一句后面的表名是怎么写呢

[rexyudl]

Dim rs As new ADODB.Recordset

[ydlchina]

兄弟你联数据表了

[abiao_521]

你的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

[abiao_521]

你的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