Visual Basic - No me funciona la conexion ODBC

Tengo estas instrucciones pero no me funciona en
la creación de la conexión ODBC de mi base de datos.

' En el módulo no me reconoce workspace
global Area as workspace
global conexion as database

' En el formulario
set Area = createworkspace("workspacejet","admin"," ", dbuseodbc)
set conexion = Area.opendatabase("ODBC de Empleados")

¿Cómo hago?...

gl_conexion = "ODBC;Server=" & GL_Server & ";DSN=" & GL_DSN_BD & ";UID=" & Gl_Usuario & ";PWD=" & GL_Pass & ";DATABASE=" & GL_Base_BD
Set Workspace = DBEngine.CreateWorkspace("", "admin", "", dbUseODBC)
Set bdatc = Workspace.OpenDatabase(dbnombre, False, False, gl_conexion)

Gracias amiga, adapté las instrucciones y ahora si me funciona...
¡Qué alivio!.