PowerShell创建Microsoft Access数据库报错，求排查方案

先还原你的代码和遇到的错误：

你的代码 #

Function Create-DataBase($Db){ 
    $application = New-Object -ComObject Access.Application 
    $application.NewCurrentDataBase($Db,10) 
    $application.CloseCurrentDataBase() 
    $application.Quit() 
} #End Create-DataBase 

#$dbname = Read-Host -Prompt 'Input your database name' 
# database file location 
$Db = 'C:\new.mdb' 
If(Test-Path $Db){ 
    Write-Host 'DB already exists' -fore green 
}else{ 
    Create-DataBase $Db 
}

报错信息 #

Exception calling "NewCurrentDataBase" with "5" argument(s): "An error occurred while trying to create the database."
At E:\Mahmood\test2.ps1:3 char:33

• $application.NewCurrentDataBase <<<< ($Db,10)
• CategoryInfo : NotSpecified: (:) [], MethodInvocationException
• FullyQualifiedErrorId : DotNetMethodException

Exception calling "CloseCurrentDataBase" with "0" argument(s): "The expression you entered refers to an object that is closed or doesn't exist."
At E:\Mahmood\test2.ps1:4 char:35

• $application.CloseCurrentDataBase <<<< ()
• CategoryInfo : NotSpecified: (:) [], MethodInvocationException
• FullyQualifiedErrorId : DotNetMethodException

问题原因及解决办法 #

我梳理了几个核心问题，按优先级排序：

1. 方法名拼写错误（最直接原因） #

你代码里调用的NewCurrentDataBase和CloseCurrentDataBase是拼写错误！正确的方法名应该是NewCurrentDatabase和CloseCurrentDatabase（最后一个字母是小写e，不是a）。这个错误直接导致PowerShell找不到对应的COM方法，触发第一个异常，进而引发后续的关闭数据库失败的错误。

2. 权限不足 #

你尝试在C:\根目录创建文件，Windows默认对系统盘根目录有严格的权限限制，普通用户没有写入权限，这也是创建失败的常见原因。

• 解决：把数据库路径改成你有写入权限的目录，比如C:\Users\你的用户名\Documents\new.mdb；或者右键PowerShell选择「以管理员身份运行」再执行脚本。

3. 文件格式与参数不匹配 #

你要创建的是.mdb格式（旧版Access数据库），但传入的参数10对应的是Access 2007+的.accdb格式，格式不匹配会导致创建失败：

• 如果要创建.mdb，参数应该用4（对应Access 2003格式）；
• 如果要创建.accdb，把文件路径后缀改成.accdb，保持参数10即可。

4. Access COM组件问题 #

如果你的系统没有安装完整的Microsoft Access，或者COM组件未正确注册，也会导致无法调用相关方法。

• 解决：确保安装了包含Access的Office套件；如果已安装，尝试重新注册组件（路径根据你的Office版本调整，以下是Office 2016的示例）：

  regsvr32.exe "C:\Program Files\Microsoft Office\root\Office16\MSACCESS.EXE"
  

修正后的完整代码 #

我把所有问题都修复了，还添加了COM对象释放的代码避免内存泄漏：

Function Create-DataBase($Db){ 
    $application = New-Object -ComObject Access.Application 
    # 修正方法名拼写，使用对应.mdb格式的参数4
    $application.NewCurrentDatabase($Db, 4) 
    $application.CloseCurrentDatabase() 
    $application.Quit() 
    # 释放COM对象，防止内存占用
    [System.Runtime.Interopservices.Marshal]::ReleaseComObject($application) | Out-Null
    Remove-Variable application
} #End Create-DataBase 

# 改成有写入权限的路径
$Db = 'C:\Users\你的用户名\Documents\new.mdb' 
If(Test-Path $Db){ 
    Write-Host 'DB already exists' -fore green 
}else{ 
    Create-DataBase $Db
    Write-Host 'Database created successfully!' -fore green
}

内容的提问来源于stack exchange，提问作者user2771557