Option Explicit

Public CON as ADODB.Connection

Sub Main()

	Set CON = New ADODB.Connection
	CON.Provider = "Microsoft.ACE.OLEDB.12.0"
	CON.Open App.Path & "\ACCESS2007FILE.accdb","admin",""

	NextForm.show 
	'From here, you should be typing the name of the first Form to be loaded when running you program...

End sub