Opening a Recordset via SQL Server

I'm working with VB6 into a SQL Server 7 database. I've been using this code to open recordsets:

Code:

---

            Set objCmd = New ADODB.Command
            objCmd.ActiveConnection = PROJ_DB
            objCmd.CommandType = adCmdStoredProc
            With objCmd
                .CommandText = "sel_candidate_where_candno_ordered"
                .Parameters.Refresh
                .Parameters(1) = txtSeek
                Set rsCand = .Execute
            End With
            Set objCmd = Nothing

---

The problem is, it doesn't allow for bookmarks, so populating grids, etc. are problems. There must be a way to open it as a Keyset using adOpenKeyset, such as:

Code:

---

    rsCand.CursorType = adOpenKeyset

---

Can anyone help me out?? Thanks...

You're on the right track...
Add this to the end of the execute statement
Set rsCand = .Execute(,,adOpenKeyset )

Hey Bubba:

Well, I tried it, but got the following error:

"Procedure 'sel_candidate_where_candno_ordered' expects parameter @Parm1, which was not supplied"

I think one of the commas expects parameters. Without anything there, it wipes out the Parameter(1) value. I suppose I could put a value in there, but there are other calls which require 10-20 parameters.

How 'bout this?

[code]
Set objCmd = New ADODB.Command
objCmd.ActiveConnection = PROJ_DB
objCmd.CommandType = adCmdStoredProc
With objCmd
.CommandText = "sel_candidate_where_candno_ordered"
.Parameters.Refresh
.Parameters(1) = txtSeek
.Open
End With

rsCand.Open objCmd, ,adOpenKeyset, adLockReadOnly

Set objCmd = Nothing

Hey Bubba:

Thanks for ll your help.

Open is not a valid method for the Command object.

Jeff