Imports System.Windows.Forms
<System.ComponentModel.DesignerCategory("Code"), Serializable()> _
Public Class Configuracion
Public Shared CONEXION As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & path & "\db.mdb;" & _
"Jet OLEDB:Database Password=tupassword;"
Public Shared ReadOnly Property path() As String
Get
Return Application.StartupPath.ToString
End Get
End Property
End Class
Como el miembro CONEXION es Shared (static en otros lenguajes) puedes acceder directamente a ella asi:
Configuracion.CONEXION
Asi que puedes usar algo asi:
Dim oConexion As New OleDbConnection(Configuracion.CONEXION)
Cita: Function conec() As OleDbConnection
Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\Documents and Settings\jose\Mis documentos\bd2.mdb")
Return cn
End Function
No puedes hacer lo anterior...
Ya que es una funcion... Haz la forma que es he posteado.. es m'as practico