Visual Basic - Crear conexion a base de datos acces 97

Hola, alguien me puede decir com creo una conexion con una base de datos acces 97 mediante codigo. El problema que tengo es que en una paso de mi aplicacion desconecto la base de datos y necesito volver a conectarla, como utilizo controles data para manejar la base de datos al iniciar la aplicacion automaticamente se crear la conexion, pero una vez la desconecto no se como volver a conectarla sin tener que salir de la aplicacion.
Gracias por la ayuda que podais proporcionar.

Antes debes declarar la coneccion (si no esta hecho) asi
Dim cn as ADODB.connection

Public Sub Conectar()
Set cn = New ADODB.Connection
Dim proveedor As String
Dim BASE As String
On Error Resume Next

proveedor = "Microsoft.jet.OLEDB.4.0" 'Para access 2000
'proveedor = "Microsoft.jet.OLEDB.3.51" 'Para access 97

'Sin no usas un DSN (ODBC) le pasas la ruta de la base
BASE = App.Path + "\TuDB.mdb"

'Con DSN
cn.ConnectionString = "DSN=NombreDsn;UID=Admin;PWD=PassWord"

'Sin DSN
'cn.ConnectionString = "Provider=" + proveedor + ";Data Source=" + BASE

cn.Open
If (Err.Number <> 0) Then
MsgBox "Error: " + Err.Description
End
End If
End Sub

Espero que te sirva