Public Class connectDB
 
    Public Shared Sub open(ByRef con)
 
    con.open()
 
    End Sub
    Public Shared Sub close(ByRef con)
        Try
        con.close()
        Catch
        End Try
    End Sub
 
End Class

connectDB.open(global.con_local)

global.con_local vom typ System.Data.OleDb.OleDbConnection

Sector Twelve, or to Infinity and Beyond, whichever comes first.!