Set cmd = New ADODB.Command
cmd.CommandType = adCmdStoredProc
Set cmd.ActiveConnection = Module1.conn
cmd.CommandText = "spEmergencyItemHelp"
Set prm = cmd.CreateParameter("@ID", adInteger, adParamInput, 255, 12)
cmd.Parameters.Append prm
Set prm = cmd.CreateParameter("@Type", adChar, adParamInput, 255, "A")
cmd.Parameters.Append prm
Set rst = cmd.Execute()
Do Until rst.EOF
Set Sheet1.VSFlexGrid1.DataSource = rst
rst.MoveNext
Loop
i am trying to execute a stored procedure from sql2005 from excel vba get the records in recordset & assign it to grid
but i get error
run time error 3709 application defined or object defined error
Bookmarks