/ Snippet Library - View Code

Snippet details

ID: 310

Viewed: 1338

Added: 2002-08-19

Version:

Snippets in this catagory
Show Printable Version

Connects to a Access database using DAO

General Details

Snippet uploaded by: snippet

Email : webmaster@snippetlibrary.com

Snippet By: Clint LaFever

Snippet By:	Clint LaFever
Declarations
Highlight All'------------------------------------------------------------ ' Author: Clint LaFever [lafeverc@usa.net] ' Purpose: Used to connect to a database using DAO. Most commonly used with Access Databases. ' Parameters: ' Example: '------------------------------------------------------------ Option Explicit Public DataBaseName As String Public UserName As String Public Password As String Public db As Database 'DAO Database variable for Local Access Connections
Code
Highlight AllPublic Function ConnectLocal() As Boolean On Error GoTo ConnectLocal_Error Set db = OpenDatabase(Me.DataBaseName) ConnectLocal = True ConnectLocal_Exit: Exit Function ConnectLocal_Error: ConnectLocal = False Resume ConnectLocal_Exit End Function

No Reviews to show