怎么会出现这种问题呢？？

[refuly]

我用ADO建立了一个连接
Set ADOCON = New ADODB.Connection
ADOCON.Provider = "Microsoft.Jet.OLEDB.4.0"
ADOCON.ConnectionString = App.Path & "\演示数据库.mdb"
ADOCON.CursorLocation = adUseServer
ADOCON.Open '打开数据源

然后打开了第一个记录集
source_sql = "select * from 演示表 order by 学号 " 'SQL查询字符串
Set Source_RS = New ADODB.Recordset
Set Source_RS.ActiveConnection = ADOCON
Source_RS.CursorLocation = adUseServer
Source_RS.Open source_sql, ADOCON, adOpenStatic, adLockOptimistic

没有问题
可是我打开第二个的时候（第一个没关）
query_sql="select * from 演示表 where 学号=2"
Set Query_RS = New ADODB.Recordset
Set Query_RS.ActiveConnection = ADOCON
Query_RS.CursorLocation = adUseServer
Query_RS.Open query_sql, ADOCON, adOpenStatic, adLockOptimistic

提示：至少有一个参数没有被指定值！！！！怎么办？？？？

[饮水需思源]

query_sql="select * from 演示表 where 学号=2"
Set Query_RS = New ADODB.Recordset
Set Query_RS.ActiveConnection = ADOCON
Query_RS.CursorLocation = adUseServer
if query_rs.state=adstateopen then query_rs.close '加上这句
Query_RS.Open query_sql, ADOCON, adOpenStatic, adLockOptimistic

[Daniel0318]

看不出来
出错时调试一下，看看在那行出的错，再具体分析一下

[refuly]

出错在最后一句！！
Query_RS.Open query_sql, ADOCON, adOpenStatic, adLockOptimistic

[refuly]

顺便问一下：
如果对于一个连接，同时打开两个记录集，应该注意什么？？？谢谢

[胖河马]

最好不要使用中文名
改成这样试试
query_sql="select * from [演示表] where [学号]=2"

学好如果是文本类型的需要用单引号括起来

[refuly]

还是不行啊！

[refuly]

对不起大家了，我把查询字符串的内容弄错了才导致出现了这个问题！