How to close global database objects

[Perceptus]

Greetings,



I am using a Workspace for transaction rollbacks. When I set the variable on Launch of the database. it prevents the database from closing. Here are my two Functions, for starting and exiting. This code does not let me exit the database if I uncomment the set lines in initializedatabase. What is the proper way to unset these values so the database can exit gracefully?

Global gdb As dao.Database
Global gws As dao.Workspace     

Public Function InitializeDatabase()
'Set gdb = CurrentDb
'Set gws = DBEngine.Workspaces(0)
DoCmd.OpenForm "frmMain"


End Function


Public Function ExitDatabase()
Set gdb = Nothing
Set gws = Nothing
DoCmd.Quit acQuitSaveNone


End Function

Thank you in advance

[CJ_London]

if you are closing the db, there is no need to set your variable to nothing - closing the db will do the cleanup and free the memory