Clase para conectar

16/08/2006 - 00:36 por mikicazares | Informe spam
Compañeros.
tengo una duda

EStoy haciendo una clase para conectar a la base de datos, esta es la
clase
Imports System.Data.Odbc
Public Class Conexion
Dim value As String = ""
Dim valueCheq As String = ""
Dim MyConnection As New OdbcConnection(value)
Dim MyconnectionCheq As New OdbcConnection(valueCheq)
Public Function ConectarNovanet()
MyConnection.Open()
End Function
Public Function ConectarNovaCheq()
MyconnectionCheq.Open()
Return MyconnectionCheq
End Function
Public Function DesconectarNovanet()
MyConnection.Close()
Return MyConnection
End Function
Public Function DesconectarNovaCheq()
MyconnectionCheq.Close()
End Function
End Class

Son dos tipos de conection, una para diferente base de datos, cuando
quiero conectarme y dar la conexion al odbccommand me marco que no
puede ser convertido a "2"
Dim Connect As New Conexion
Connect.ConectarNovaCheq()
com.Connection = Connect <- aqui me marca el error
com.CommandText = sql
odatareader = com.ExecuteReader

Gracias
Nacho
 

Leer las respuestas

#1 Eduardo A. Morcillo [MS MVP VB]
16/08/2006 - 04:38 | Informe spam
La clase Conexion no es del tipo OdbcConnection y por lo tanto no puedes
asignarsela a una propiedad que espera un OdbcConnection. Es objeto te lo
devuelven las funciones asi que deberias hacer asi:

com.Connection = Connect.ConectarNovaCheq()

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo
http://mvp.support.microsoft.com/pr...4EF5A4191C

Preguntas similares