[SOLUCIONADO] conexion aplicacion web vb.net con ODBC de base de datos de oracle

[maialenlopez]

Hola;
He creado una conexion conn para conectarme al ODBC, como se puede observar en el código de abajo pero me aparecen los siguientes errores.

Código vb.net:

Protected Sub TxtOrdenLG__TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TxtOrdenLG.TextChanged
        Dim conn As New Odbc.OdbcConnection("Driver={Microsoft ODBC for Oracle};DSN=INP;uid=bbdd1;pwd=adm1")
        'Dim conn As New Odbc.OdbcConnection("DSN=SAPINP;uid=bbdd1;pwd=ssiiadm1")
        Dim sql As String
        Dim contador As Integer
 
        sql = " SELECT COUNT(*) INTO TABLE aufk WHERE aufnr=" & TxtOrdenLG.Text
 
        Dim comm1 As New Odbc.OdbcCommand(sql, conn)
        Dim reader1 As Odbc.OdbcDataReader
 
        Try
            Using conn
                conn.Open()
                With comm1
                    reader1 = .ExecuteReader()
                    While reader1.Read()
                        contador = reader1.GetValue(0)
                    End While
                    .Dispose()
                    reader1.Close()
                End With
            End Using
 
        Catch ex As Exception
 
            MsgBox("Error en BD" & Chr(13) & Chr(13) & ex.Message)
            'mensaje("Error en BD" & Chr(13) & Chr(13) & ex.Message)
        Finally
 
            conn.Close()
            conn.Dispose()
        End Try
    End Sub
 

estos son los errores que me muestra:
Conexion no abierta.
[IM001]Error de SQLSetConnectAttr del controlador
[01000]El controlador no admite una version de ODBC distinta de la que necesita la
aplicacion (ver SQLSetEnvAttr)

¿Como puedo solucionar esto?

[maialenlopez]

Iniciado por maialenlopez

Hola;
He creado una conexion conn para conectarme al ODBC, como se puede observar en el código de abajo pero me aparecen los siguientes errores.

Código vb.net:

Protected Sub TxtOrdenLG__TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TxtOrdenLG.TextChanged
        Dim conn As New Odbc.OdbcConnection("Driver={Microsoft ODBC for Oracle};DSN=INP;uid=bbdd1;pwd=adm1")
        'Dim conn As New Odbc.OdbcConnection("DSN=SAPINP;uid=bbdd1;pwd=ssiiadm1")
        Dim sql As String
        Dim contador As Integer
 
        sql = " SELECT COUNT(*) INTO TABLE aufk WHERE aufnr=" & TxtOrdenLG.Text
 
        Dim comm1 As New Odbc.OdbcCommand(sql, conn)
        Dim reader1 As Odbc.OdbcDataReader
 
        Try
            Using conn
                conn.Open()
                With comm1
                    reader1 = .ExecuteReader()
                    While reader1.Read()
                        contador = reader1.GetValue(0)
                    End While
                    .Dispose()
                    reader1.Close()
                End With
            End Using
 
        Catch ex As Exception
 
            MsgBox("Error en BD" & Chr(13) & Chr(13) & ex.Message)
            'mensaje("Error en BD" & Chr(13) & Chr(13) & ex.Message)
        Finally
 
            conn.Close()
            conn.Dispose()
        End Try
    End Sub
 

estos son los errores que me muestra:
Conexion no abierta.
[IM001]Error de SQLSetConnectAttr del controlador
[01000]El controlador no admite una version de ODBC distinta de la que necesita la
aplicacion (ver SQLSetEnvAttr)

¿Como puedo solucionar esto?

Ya esta solucionado, al final en vez de utilizar el ODBC e llamado directamente a lo del tnsnames.ora creando la conexion en el web.config