Question

vb6调用存储过程返回结果集

前面一堆声明的代码省略
conn.Open sqlcon
cmd.ActiveConnection = conn
cmd.CommandText = "mr_li_select"
cmd.CommandType = adCmdStoredProc
Set rs = cmd.Execute()
If rs.RecordCount > 0 Then （死这里了，rs.RecordCount始终<=0）
后面代码省略
mr_li_select 查询分析器里 执行有返回值 ——！我没连错数据库
等高人来给解答 调用存储过程返回结果集很常见的应用 应该大家都会吧

谁来帮帮俺 俺新学vb

Answer 1

Set rs = cmd.Execute
没有错误,除非你的存储过程有参数,而你没有传递参数

追问

rs.RecordCount的值是-1
这个-1就是过程返回的结果集

您知道为什么会出现-1么
理论上 1条结果集 rs.RecordCount的值应该是1啊

追答

cursortype locktype都设置为1就行了,你试一下吧

Answer 2

Set rs = cmd.Execute()
之前设置 rs.CursorLocation = adUseClient
如果还是不行，用rs.EOF来判断有没有记录