vfp使用ADO访问SQL，如何一次返回多个结果表
我用ADO访问SQL，需要返回2个结果表。但我用recordset，只能返回1个结果集，另1个不知怎样拿，请帮忙
oCmd=CREATEOBJECT( "ADODB.Command ")
ocmd.commandtext= "ostore1 "
ocmd.commandtype=4 && 存储过程
oConn=CREATEOBJECT( "ADODB.Connection ")
oConn.Open(this.conString)
oCmd.ActiveConnection=oConn
oRs=CREATEOBJECT( "ADODB.Recordset ")
oRs=oCmd.Execute()
DO WHILE NOT oRs.eof
oRs.movenext() && 拿第一个表
enddo
[解决办法]
对于象 "select * from 表1 select * from 表2 "这样的查询，
adorecordset的nextrecordset返回第二个表
如
ocon=newobject( 'adodb.connection ')
ocon.connectionstring= "连接串 "
ocon.open
ocmd=newobject( "adodb.command ")
ocmd.activeconnect=ocon
orec=newobject( "adodb.recordset ")
ocmd.commandtext= "select * from A表 select * from B表 "
orec.activecommand=ocmd
ocmd.execute()
*得到第一个表(A表)
orec1=newobject( 'adodb.recordset ')
orec1=orec.nextrecordset &&执行此方法得到第二个表(B表) ，对存储过程，道理相同
