Create Database Run Time 3001, Invalid Argument

[mrmmickle1]

I am trying to create a database and then create a few tables in the database. I am having trouble creating the database. This is what I have so far:

Sub CreatePendingLogDB()
    
  [COLOR=#0000ff]  Dim[/COLOR] TableArr [COLOR=#0000ff]As[/COLOR] Variant
  [COLOR=#0000ff]  Dim[/COLOR] accessApp [COLOR=#0000ff]As [/COLOR]Access.Application
    [COLOR=#0000ff]Dim [/COLOR]DBFileString [COLOR=#0000ff]As String[/COLOR]
    
 [COLOR=#0000ff]   Set[/COLOR] accessApp = [COLOR=#0000ff]New [/COLOR]Access.Application
    DBFileString = "C:\Users\" & Environ("UserName") & "\Desktop\PendingLog" & Format(Date, "MM.DD.YYYY") & ".accdb"
[COLOR=#008000]    'Get Stuck Here Run Time 3001 Invalid Argument[/COLOR]
[COLOR=#ff0000]    accessApp.DBEngine.CreateDatabase DBFileString, dbLangGeneral[/COLOR]

It will not run on the red line of code. Any pointers or help would be appreciated. Just starting to get into Access VBA...

 

[RoryA]

Do you have a reference set to a DAO library? If not, dbLangGeneral has no meaning and won't be a valid parameter. Also, if you do use the DAO reference, you don't need to automate Access at all:

Sub CreatePendingLogDB()
    
    Dim TableArr As Variant
    Dim DBFileString As String
    
    DBFileString = "C:\Users\" & Environ("UserName") & "\Desktop\PendingLog" & Format(Date, "MM.DD.YYYY") & ".accdb"

    DAO.DBEngine.CreateDatabase DBFileString, dbLangGeneral

 

[mrmmickle1]

RoryA,

Thanks for the help. Unfortunately I am not able to select this reference at the moment. I am at my work computer and when I try to select the reference for Microsoft DAO 3.6 Object Library it tells me Error in Loading DLL. I found the actual file in this directory on my computer:

'C:\Program Files (x86)\Common Files\Microsft Shared\DAO\DAO360.dll'

However, when I try to browse for the reference in the VBE to this location it does not let me select the file. Does this mean that I need to get my company's IT Dept. to Register this DLL file using the Registry Editor?

Is there another way to go about Creating a Database that doesn't involve DAO? Or should I just try to channel the information into an existing database (to avoid having to create a fresh one)?

 

[RoryA]

Try referencing the Microsoft Office 14.0 Access Database Engine library instead.

 

[mrmmickle1]

RoryA,

I followed your instructions and the code executes properly now! Thank you for the help. I really appreciate it

 

[RoryA]

Glad to help.