Le portail francophone de la géomatique

Bonjour la liste!
Je developpe en VBa avec ArcView 8.3 et j'ai un probleme avec ce code.
Je cree une nouvelle geodatabase et je voudrais ensuite recuperer le IWorkspace correspondant (pour ensuite pouvoir realiser des Select).
Mais j'ai un probleme sur ce dernier point (a la derniere ligne).
Merci de vos reponses.
Guillaume Doukhan.
ONCFS

Code:

'Creation de la gdb
Dim espacegdb As IWorkspaceFactory
Set espacegdb = New AccessWorkspaceFactory

Dim repertoire As String
Dim nom As String

repertoire = "D:\IMPORT_SDARCVIEW" & dept
nom = D_integration & dept & _ & Year(Date) & _ & Numversion

Dim nomgdb As IWorkspaceName
Set nomgdb = espacegdb.Create(repertoire, nom, Nothing, 0)

'Recuperation du Iworkspace et plantage : automation error
Dim espace As IWorkspace
Set espace = espacegdb.Open(Nothing, 0)