Crear Clase para CN

31/07/2004 - 00:57 por Luis | Informe spam
Hola soy nuevo en esto y quiero crear un clase que
solamente de el string de la coneccion y la clase aga el
resto. Asi esta bien?
Tengo un contructor con parametro y otro sin parametro
que se lo envio por la propidades.
Si tienen algun ejemplo que este mejor y que sea mas
rapido o estable .

Public Class ConeccionDB
Private strConnectionString As String
Private Con As OleDbConnection

Public Sub New()
Con = New OleDbConnection
(strConnectionString)
End Sub

Public Sub New(ByVal strConnectionString As
String)
Con = New OleDbConnection
(strConnectionString)
End Sub

Public Property cnOleDb() As OleDbConnection
Get
Return Con


End Get
Set(ByVal Value As OleDbConnection)

strConnectionString =
Value.ConnectionString
End Set
End Property
End Class


End Namespace
 

Leer las respuestas

#1 act
01/08/2004 - 00:43 | Informe spam
En la pagina de nuestro amigo El Guille tienes un artículo sobre como
generar una clase para manejar todo el acceso a datos en una aplicación.
Si te conectas a la pagina www.elguille.info, en la pagina principal, verás
en el dia 14 un artículo que se llama "Generar clases para acceder a las
tablas de una base de datos" dónde te explica como implementarla.

Act

"Luis" escribió en el mensaje
news:789601c47688$8e741aa0$
Hola soy nuevo en esto y quiero crear un clase que
solamente de el string de la coneccion y la clase aga el
resto. Asi esta bien?
Tengo un contructor con parametro y otro sin parametro
que se lo envio por la propidades.
Si tienen algun ejemplo que este mejor y que sea mas
rapido o estable .

Public Class ConeccionDB
Private strConnectionString As String
Private Con As OleDbConnection

Public Sub New()
Con = New OleDbConnection
(strConnectionString)
End Sub

Public Sub New(ByVal strConnectionString As
String)
Con = New OleDbConnection
(strConnectionString)
End Sub

Public Property cnOleDb() As OleDbConnection
Get
Return Con


End Get
Set(ByVal Value As OleDbConnection)

strConnectionString > Value.ConnectionString
End Set
End Property
End Class


End Namespace

Preguntas similares