Passar stored procedure para Recordset

[FabianoSouza 5]

Pessoal, preciso passar os dados retornados de um procedimento armazenado para um recordset.

Essa é a SP

set cmd1 = Server.CreateObject("ADODB.Command")
cmd1.ActiveConnection = conexao
cmd1.CommandText = "dbo.minhaSP"
cmd1.Parameters.Append cmd1.CreateParameter("@RETURN_VALUE", 3, 4)
cmd1.Parameters.Append cmd1.CreateParameter("@cod", 3, 1, 16, cod)'int
cmd1.CommandType = adUseClient
cmd1.CommandTimeout = 0
cmd1.Prepared = true
cmd1.Execute

Não sei nem por onde começar heheh

 

Obrigado desde já!

[FabianoSouza 5]

Isso funcionou.

Mas queria contar com a ajuda dos colegas para saber se fiz da forma correta.

Não manjo muito daquela história de cursores (uns são mais performaticos que outros, uns bloqueiam os registros, outros são paenas para leitura e por aí vai...).

Set cmd1 = Server.CreateObject("ADODB.Command")
Set rs = Server.CreateObject("ADODB.Recordset")

cmd1.ActiveConnection = conexao
cmd1.CommandText = "dbo.minhaSP"
cmd1.Parameters.Append cmd1.CreateParameter("@RETURN_VALUE", 3, 4)
cmd1.Parameters.Append cmd1.CreateParameter("@cod", 3, 1, 16, cod)'int
cmd1.CommandType = adUseClient
cmd1.CommandTimeout = 0
cmd1.Prepared = true

Set rs.Source = cmd1
rs.CursorLocation = 3 
rs.Open

[FabianoSouza 5]

Apesar de trazer os registros há um problema.

 response.Write(rs.PageCount)

Isso retorna o valor "-1".

Qual o erro??

[FabianoSouza 5]

Estava faltando isso

cmd1.Execute

Funfou.

[xanburzum 169]

vc pode usar método Open do objeto recordset para executar sua string SQL, assim não precisa criar o objeto command

[FabianoSouza 5]

Mas dessa forma consigo ler o procedimento armazenado?

Ficaria algo como

sql = "dbo.minhaSP"
rs.Open sql

??