Bases de Datos - procedimientos almacenados en Oracle

 
Vista:

procedimientos almacenados en Oracle

Publicado por diana (1 intervención) el 19/09/2001 13:13:40
Hola!!
Estoy trabajando con un componente de Visual Basic y necesito ejecutar un procedimiento almacenado de Oracle, el problema es que no se como hay que hacer para poder ejecutarlo.

Muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:procedimientos almacenados en Oracle

Publicado por pablo (1 intervención) el 07/06/2007 21:44:55
Espero que te sirva el siguiente codigo
Dim cadena As String
cadena = "Provider=OraOLEDB.Oracle.1;Persist Security Info=False;User ID=impmprod;Data Source=EMPRESAL;user=PMAR;password=IACC"
Dim oConexion As New ADODB.Connection
Dim oCommand As New ADODB.Command

oConexion.Open (cadena)
oCommand.ActiveConnection = oConexion
oCommand.CommandType = adCmdStoredProc
oCommand.CommandText = "NOMBRE_PROCEDIMIENTO"
''new
Dim oParameter As New ADODB.Parameter
oParameter.Name = "codigo"
oParameter.Type = adInteger
oParameter.Direction = adParamInput
oParameter.Value = 86
oCommand.Parameters.Append oParameter

Dim oParameter2 As New ADODB.Parameter
oParameter2.Name = "v"
oParameter2.Type = adInteger
oParameter2.Direction = adParamOutput
oCommand.Parameters.Append oParameter2
Dim rdo As Variant
oCommand.Execute
MsgBox "se ejecuta con exito"
rdo = oCommand.Parameters("v").Value
'lngENTC_PESADA = .Parameters("p_ENTC_PESADA").Value
MsgBox rdo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar