Llamar a procedimientos almacenados
Como hago para llamar a un procedimiento almacenado en sql 7.0 desde visual basic y mostrar el resultado en una grilla.
Desde ya muchas gracias
Desde ya muchas gracias
Respuesta de s4nt14g0
1
Anexa una referencia a microsoft data objects 2.1
Código
dim cm as ADOBC.Command
dim rs as ADOBC.Recordset
dim pt as ADOBC.parameter
Set cm = New ADODB.Command
cm.CommandType = adCmdStoredProc
cm.CommandText = procedimiento
' repite la sgts lineas cada vez que necesites agregar un parametro de tu procedimiento
-------
Set pt = cm.CreateParameter("X", tipo, adParamInput, tamanio, valor)
cm.Parameters.Append pt
-------
Set cm.ActiveConnection = cn
Set rs = cm.Execute
Para mostrar los datos recorre el recorset o asocialo directamente a la grilla
Código
dim cm as ADOBC.Command
dim rs as ADOBC.Recordset
dim pt as ADOBC.parameter
Set cm = New ADODB.Command
cm.CommandType = adCmdStoredProc
cm.CommandText = procedimiento
' repite la sgts lineas cada vez que necesites agregar un parametro de tu procedimiento
-------
Set pt = cm.CreateParameter("X", tipo, adParamInput, tamanio, valor)
cm.Parameters.Append pt
-------
Set cm.ActiveConnection = cn
Set rs = cm.Execute
Para mostrar los datos recorre el recorset o asocialo directamente a la grilla
