.net2005+oracle: ExecuteReader error

[pcarvajal]

Desde un formulario en vb.net, estoy tratando de rescatar un campo desde un sp que está en oracle. El código que tengo es el siguiente:

I

Código SQL:

Imports System.DATA.OleDb 
...
 
Dim oraConn AS String = "Provider=MSDAORA; Data Source=(DESCRIPTION=" _
           + "(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=99.99.99.99)(PORT=9999)))" _
           + "(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=ORCL)));" _
           + "User Id=XXXXXX;Password=XXXXXX;"
 
            Dim conn AS NEW OleDb.OleDbConnection(oraConn)
 
            Dim SQL AS String = "SpGestionLeerXRutFecha '" & cRut & "'"
            Dim cmd AS NEW Imports System.DATA.OleDb
 
OleDb.OleDbCommand(SQL, conn)
            cmd.CommandType = CommandType.Text
 
            Dim dr AS OleDb.OleDbDataReader = cmd.ExecuteReader() ' Visual Basic
            dr.Read()
 
            MsgBox(dr.Item("NTIDGES"))
 
            conn.Close()
            conn.Dispose()
 

Pero me arroja el siguiente error:
Error: ExecuteReader requiere de una conexion abierta y disponible. El estado actual de la conexion es cerrada


Que puede ser?????????

[gnzsoloyo]

Iniciado por pcarvajal

Desde un formulario en vb.net, estoy tratando de rescatar un campo desde un sp que está en oracle. El código que tengo es el siguiente:

Código vb:

Imports System.Data.OleDb 
...
 
Dim oraConn As String = "Provider=MSDAORA; Data Source=(DESCRIPTION=" _
           + "(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=99.99.99.99)(PORT=9999)))" _
           + "(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=ORCL)));" _
           + "User Id=XXXXXX;Password=XXXXXX;"
 
            Dim conn As New OleDb.OleDbConnection(oraConn)
 
            Dim sql As String = "SpGestionLeerXRutFecha '" & cRut & "'"
            Dim cmd As New Imports System.Data.OleDb
 
OleDb.OleDbCommand(sql, conn)
            cmd.CommandType = CommandType.Text
 
            Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader() ' Visual Basic
            dr.Read()
 
            MsgBox(dr.Item("NTIDGES"))
 
            conn.Close()
            conn.Dispose()
 

Pero me arroja el siguiente error:
Error: ExecuteReader requiere de una conexion abierta y disponible. El estado actual de la conexion es cerrada


Que puede ser?????????

Y seré curioso... ¿Donde está el "conn.Open()"?... Porque yo no lo veo.

No es lo mismo crear una conexión que abrir una.


Otra cosa: ¿Por qué usas el System.Data.Ole, y no el Oracle Data Provider for .Net, que además de nativo es más potente, y con mucha documentación?

Me parece que estás desperdiciando esfuerzo.

[pcarvajal]

pues la verdad gnzsoloyo es porque soy neofito en Oracle con .Net y estoy dando palos de ciego...

mantuve la libreria que estoy mencionando (si, si sé que no es lo correcto, pero debo al menos mostrar un avance)

ahora me funciona, pero el select que puse en duro está contenido en un sp, mi pregunta es:
como llamo al sp y como le paso los parametros????

adjunto codigo actualizado:

Código SQL:

Dim oraConn AS String = "Provider=MSDAORA; Data Source=(DESCRIPTION=" _
           + "(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=99.99.99.99)(PORT=9999)))" _
           + "(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=ORCL)));" _
           + "User Id=XXXXXX;Password=XXXXXX;"
 
            Dim conn AS NEW OleDb.OleDbConnection(oraConn)
            conn.OPEN()
 
'la siguiente consulta es la que hay que cambiar ya que esta contenida dentro de un sp
Dim sql As String = "SELECT NTIDGES FROM rsfo.RNOTAGES WHERE NTLOTE = '" & cRut & "'"
--aqui deberia ir el sp "SpGestionLeerXRutFecha" y el parametro "cRut"
            Dim cmd As New OleDb.OleDbCommand(sql, conn)
            cmd.CommandType = CommandType.Text
 
            Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader() ' Visual Basic
            dr.READ()
 
            MsgBox(dr.Item("NTIDGES"))
 
            conn.Close()
            conn.Dispose()