IWorkspaceFactory.Open Fails

Question

What is wrong with this code?

Dim pPropset As IPropertySet
Set pPropset = New PropertySet

Dim pFact As IWorkspaceFactory
Dim pWorkspace As IWorkspace

pPropset.SetProperty "DATABASE", "C:\New Personal Geodatabase.mdb"

Set pFact = New AccessWorkspaceFactory
Set pWorkspace = pFact.Open(pPropset, 0)

Last line gives me Automation Error -2147220952 (80040228)

Thanks for any input.

ManuelF_ · Answer

Thank you, mackayj80, I will look at it. I guess every bit helps...

JamesMacKay · Answer

BTW where one does find a list of ArcObjects automation error codes?

Error codes in ArcObjects are not unique - the meaning of an error depends on the context of the error. For example, there is an enum type in the Geodatabase library that defines the values of Geodatabase error codes known as fdoError, but there are comparable enum types for virtually every other library. In many cases the same numeric values are re-used across multiple libraries.

Here's a utility I built a while back to make life easier:
http://resources.esri.com/arcgisengine/dotnet/index.cfm?fa=codeGalleryDetails&scriptID=16621

Because there are so many error enums in ArcObjects, it uses an XML configuration file to define a subset of types that you're interested in. The default configuration file limits the errors to data access, geometry and (I believe) network errors.

RuchiraWelikala · Answer

Never mind. I just realized TOTALLY BY CHANCE that above error code means 'License not initialized'. VBA didn't recognize that error and gave me generic description of 'Automation Error'. BTW where one does find a list of ArcObjects automation error codes?

It's also good practice to have file paths without spaces.
ArcGIS tends to frown on such things. Good luck