Principales respuestas
Tomar valores de un sp de sql server en vb 6.0

Pregunta
-
Buenos días expertos.
Estoy ejecutando un sp de sql server 2008r2, a través de VB 6.0. El inconveniente que tengo es que no se como obtener los datos de esa consulta para poder pasárselos a un ListView.
Aquí les dejo parte de mi código donde realizo la consulta y me debe de traer los datos.
Gracias...!!!
'Cargar el ListView con los datos de sp de sql con.Provider = "SQLOLEDB" strconnect = "Data Source=" & gs_data_sourc & ",1433;Network Library=DBMSSOCN;Initial Catalog=" & gs_nomb_bd & ";User ID=" & gs_user_id & ";Password=" & gs_user_pwd & ";Connect Timeout=3600" con.Open strconnect Set objCmd = New ADODB.Command objCmd.CommandType = adCmdStoredProc objCmd.CommandText = "sp_rptsddn_0001" Set objCmd.ActiveConnection = con objCmd.Parameters.Append objCmd.CreateParameter("@FCHINI", adDBDate, adParamInput, , DTPickerFI.Value) objCmd.Parameters.Append objCmd.CreateParameter("@FCHFIN", adDBDate, adParamInput, , DTPickerFF.Value) objCmd.Execute con.Close Set objCmd = Nothing Set con = Nothing
Gerson Requena
Respuestas
-
Hola,
es tan sencillo como hacer
Dim rs As ADODB.Recordset
Set rs = objCmd.Execute
Si se solucionó tu consulta no olvides marcar la respuesta. Si te ayudó, vótala como útil. Saludos
- Propuesto como respuesta Sergio Parra miércoles, 10 de junio de 2015 15:39
- Marcado como respuesta Gerson Requena jueves, 25 de junio de 2015 18:31
Todas las respuestas
-
Hola,
es tan sencillo como hacer
Dim rs As ADODB.Recordset
Set rs = objCmd.Execute
Si se solucionó tu consulta no olvides marcar la respuesta. Si te ayudó, vótala como útil. Saludos
- Propuesto como respuesta Sergio Parra miércoles, 10 de junio de 2015 15:39
- Marcado como respuesta Gerson Requena jueves, 25 de junio de 2015 18:31
-