1
Bases de Datos / Recuperar datos de Procedimiento Almacenado con parametros
« en: Agosto 11, 2017, 12:18:14 pm »
Hola tengo un Procedimiento Almacenado en MySQL muy sencillo solo es un Select, como puedo recuperar en un recodrset para poder mostrar en una grilla.
Mi Procedimiento en el MySQL es esta :
La forma común de recuperar datos en un recordset uso este código.
Mi Procedimiento en el MySQL es esta :
Código: (SQL) [Seleccionar]
CREATE PROCEDURE mCedulas(IN prm INTEGER)
SELECT cedula FROM clientes WHERE cedula=prm
La forma común de recuperar datos en un recordset uso este código.
Código: (VB) [Seleccionar]
Private Sub Command1_Click()
Dim cnADO As ADODB.Connection
Dim rsADO As ADODB.Recordset
Set cnADO = New ADODB.Connection
Set rsADO = New ADODB.Recordset
rsADO.CursorLocation = adUseClient
cnADO.ConnectionString = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Database=cobranzas; User=root;Password=;Option=3;"
cnADO.Open
strSQL = "SELECT cedula FROM clientes WHERE cedula='3230148'"
rsADO.Open strSQL, cnADO, adOpenStatic, adLockOptimistic, adCmdText
Do Until rsADO.EOF
With rsADO
Text1.Text = .Fields("cedula")
rsADO.MoveNext
End With
Loop
End Sub