大家帮我看看语句有什么地方不对

swxandwf 2003-03-28 08:59:28
dim conn as new adodb.connection
dim rs as new adodb.recordset
set conn = new adodb.connection
conn.CursorLocation = adUseClient
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\cj.mdb;Persist Security Info=False"
conn.Open connstr
set rs = new adodb.recordset
rs.AddNew
rs("xm") = "张三"
rs("km") = "语文"
rs("cj") = "66"
rs.Update
它说对象或提供者不对执行所需的操作
...全文
68 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
swxandwf 2003-03-28
  • 打赏
  • 举报
回复
我的QQ是:33312806
电话是:057185518541(小灵通)
我是杭州的
foreverforyou 2003-03-28
  • 打赏
  • 举报
回复
当然可以呀
swxandwf 2003-03-28
  • 打赏
  • 举报
回复
foreverforyou(为情所困) ,我想认识你,不知道可不可以?
foreverforyou 2003-03-28
  • 打赏
  • 举报
回复
如果datagrid1没有绑定到数据库上去,就不能自动刷新,你可以把新的记录集重新添加到控件中去,后面两个参数是关于游标类型及数据锁定类型的,你可以查看相关帮助
swxandwf 2003-03-28
  • 打赏
  • 举报
回复
可以了,谢谢
问题所在是:rs.open "select * from table",conn,3,3,而我用的是1,1。为什么呢

2、如果我想如果每增加一条记录,datagrid就自动多一条记录,也就是说要有刷新功能。
我用了timer控件,
Private Sub Timer1_Timer()
Timer1.Interval = 100
DataGrid1.Refresh
End Sub
可是不行,应该怎么办呢?
foreverforyou 2003-03-28
  • 打赏
  • 举报
回复
dim conn as new adodb.connection
dim rs as new adodb.recordset
set conn = new adodb.connection
conn.CursorLocation = adUseClient
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\cj.mdb;Persist Security Info=False"
conn.Open connstr
set rs = new adodb.recordset
rs.open "select * from table",conn,3,3 '打开记录集
rs.AddNew
rs("xm") = "张三"
rs("km") = "语文"
rs("cj") = "66"
rs.Update

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧