RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  57072 - COMO PASO PARAMETROS DESDE VISUAL 6 A UN STORED PROCEDURE DE
Autor:  fredy loh
Necesito saber cómo puedo pasar parametros desde mi aplicaion visual 6.0 hacia un procedimiento almacenado en Firebird.

el siguiente codigo en visual basic funciona bien pero para MS sql Server pero no logro que haga lo mismo con firebird

Private Sub Command1_Click()
Dim Comm_SQL As ADODB.Command
Dim Rec As ADODB.Recordset
Dim par1, par2 As ADODB.Parameter

Set Comm_SQL = New ADODB.Command
Set Comm_SQL.ActiveConnection = coneccion

Comm_SQL.CommandText = "PRO_INGRESAALUMNO"
Comm_SQL.CommandType = adCmdStoredProc


Comm_SQL.Parameters(1).Value = Val(TXTRUT)
Comm_SQL.Parameters(1).Value = Val(TXTNOMBRE)
Comm_SQL.Parameters(2).Value = Val(TXTDIRECCION)


Set Rec = Comm_SQL.Execute()

End Sub

El procedimiento almacenado en Firebird es el siguiente:

CREATE PROCEDURE PRO_INGRESAALUMNO(
RUTP CHAR(8) CHARACTER SET WIN1251,
NOMBREP CHAR(50) CHARACTER SET WIN1251,
DIRECCIONP CHAR(50) CHARACTER SET WIN1251)
AS
BEGIN

INSERT into ALUMNOS values(:RUTP,:NOMBREP,:DIRECCIONP);

END


Nombre
Apellidos
Correo
Comentarios