无法从Access 2010代码创建Access 2013帐户

时间:2019-02-18 22:36:27

标签: access-vba

我在Access 2010 64位中创建了一个应用程序。从那以后,我在同一台PC上将Access 2010 64位替换为Access 2013 32位。该应用程序在两种版本的Access中都可以作为accdb文件正常工作,但是当我尝试创建accde文件时,我收到一条错误消息“访问无法创建accde文件”-在Access 2010 accde版本中没有发生。

我计划使用Access 2013运行时分发该应用程序。在一种情况下,我认为问题可能与后期绑定有关,但是我认为这是不合逻辑的。

在下面的代码中,编译在“ Dim fldr as Office.FileDialogue”处停止,并显示消息“未定义用户定义的类型”(其他地方也存在类似的错误)。

 Public Function GetFolderName(Optional OpenAt As String) As String

 Dim lCount As Long
 Dim fldr As Office.FileDialog
 Set fldr = Application.FileDialog(msoFileDialogFolderPicker)
 GetFolderName = vbNullString

With fldr

.InitialFileName = OpenAt
.Show
For lCount = 1 To .SelectedItems.Count
    GetFolderName = .SelectedItems(lCount)
Next lCount
End With
End Function

1 个答案:

答案 0 :(得分:0)

尝试一下

<div_1>
  <p>
    <i_1></i_1> Comment devenir Obèse en 1O leçons
    <i_1></i_1>
    <p>
</div_1>

有关MsoFileDialogType枚举的信息,请参见以下链接:https://docs.microsoft.com/en-us/office/vba/api/office.msofiledialogtype