求救：VB循环ACCESS字段，并赋值，，，
rsr.Open "select * from sky_user", Conn2, 1, 3
Do While Not rsr.EOF
rsr("CK") = "？"
rsr.MoveNext
Loop
rsr.Update
rsr.Close
这样不行哦，，
怎么解决呢？
VB code:
Do While Not rsr.EOF
rsr("CK") = "？"
rsr.Update
rsr.MoveNext
Loop
rsr.Close
rsr.Open "select * from sky_user", Conn2, 1, 3 ‘这行出错了，提示“实时错误'3709';连接无法用于执行此操作，在此上下文中它可能已被关闭或无效。”
急救，谢谢~！
Set Connr = New Connection
mystr = App.Path
If Right(mystr, 1) <> "\" Then mystr = mystr & "\" 'Provider=Microsoft.Jet.OlEDB.4.0;
Connr.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=admin.mdb;Persist Security Info=False;Jet OLEDB:Database Password=gp8586"
Connr.Open
Set rsr = New Recordset
If rsr.State <> adStateClosed Then rsr.Close
rsr.Open "select * from sky_user", Conn2, 1, 3
Do While Not rsr.EOF
rsr("CK") = "？"
rsr.Update
rsr.MoveNext
Loop
rsr.Close
这是我的代码，请指点一下，谢谢
1、路径写法有问题
2、前后连�
相关问答：
我用Access数据库做了一个图书数据库，里面有一个字段是ISBN，就是ISBN号，但是只的一总分图书写的ISBN号，有的没写，写的那一部分有的ISBN是重复的，能否用SQL语言把重复的过滤掉，但没写ISBN号的图书不能过滤掉，� ......
ACCESS数据库中有一个tablename表，设计如下
编号,书名,作者,出版时间,出版社,ISBN,目录,简介
其中除“编号”为自动编号外，其它都为“备注”
其中"编号"维一，在“ISBN”中有的为空值， ......
问题１
我用ADO连接设了用户名密码的数据库
但是我发现我不输入 用户名和密码 都可以连接成功 而且还能把数据读出来
剪了一个名为test数据库 建了一个名为people的表
见了一个 用户名1234 密码1234 的 ......
各位高手好，麻烦帮我看下这个数据库连接问题：
做了一个BBS但是数据库就是连接不上。错误代码如下
HTTP Status 500 -
------------------------------------------------------------------------------- ......
