我用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 提示:至少有一个参数没有被指定值!!!!怎么办????

解决方案 »

  1.   

    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 
      

  2.   

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

  3.   

    最好不要使用中文名
    改成这样试试
    query_sql="select * from [演示表] where [学号]=2"学好如果是文本类型的需要用单引号括起来