Question

之前我已经发布了一个关于这个问题的问题，并且由于网上有更多和更多的引用，我想看看这里是否有人遇到过类似的问题。我有两台运行Windows 10和Office 365的计算机。当我运行以下代码时，我在桌面上收到错误：

Dim Colcon As ADODB.Connection
Set Colcon = CurrentProject.Connection
Dim ColRs As New ADODB.Recordset
ColRs.ActiveConnection = Colcon

Dim ColSQL As String
ColSQL = "SELECT ColTbl.LastDate, ColTbl.ColCode"
ColSQL = ColSQL + " FROM ColTbl"
ColRs.Open ColSQL, Colcon, adOpenStatic, adLockReadOnly

最后一行抛出“Class not registered”，但相同的代码在我的Surface上使用相同的环境完美运行。尝试过在网上获得的不同解决方案，而不是哪种工作。只是想知道是否有其他人在ACCESS中遇到此问题。（根据网络，当您从有问题的人那里阅读帖子时，此错误可能与任何内容相关联）

由于

Mitch'这里是Colcon的debug.print。我不知道这与这个问题有什么关系，但在这里。顺便说一下，我不知道这些东西意味着什么。

Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Data Source=U:\SSP Supervisor_Log\SSp_LogBook -Ver 11.accdb;
Mode=Share Deny None;Extended Properties="";
Jet OLEDB:System database=C:\Users\admin\AppData\Roaming\Microsoft\Access\System1.mdw;
Jet OLEDB:Registry Path=Software\Microsoft\Office\16.0\Access\Access Connectivity Engine;
Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=6;Jet OLEDB:Database Locking Mode=1;
Jet OLEDB:Global Partial Bulk Ops=2;
Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";
Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;
Jet OLEDB:Don't Copy Locale on Compact=False;
Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False;
Jet OLEDB:Support Complex Data=True;Jet OLEDB:Bypass UserInfo Validation=False;
Jet OLEDB:Limited DB Caching=False;Jet OLEDB:Bypass ChoiceField Validation=False

Answer 1

您可以通过以下方式确认它是您的安装还是数据库： 创建一个新数据库并在立即窗口中运行：

? CurrentProject.Connection

如果您在此处收到错误，则会排除相关问题特别是你的数据库。

如果返回错误，请尝试修复Office365安装

首先打开“控制面板”中的“程序和功能” 在Windows 10中，您可以通过拉出隐藏的快速访问菜单来实现（要在Windows 10中访问它，只需右键单击“开始”按钮，您将看到许多熟悉的内置实用程序的菜单您在Windows 7中使用 - 包括控制面板。
在程序列表中选择Microsoft Office 365，然后单击命令栏上的Change/Repair。
尝试第一个选项Quick Repair，这个选项要快得多并尝试没有数据连接来解决问题
如果仍无法解决问题，请返回并尝试Online Repair选项。

安装完成后，请重新启动计算机以确保并启动应用并验证问题是否已解决。

参考链接
  FMS Article
  Repairing Office 365

Answer 2

我在ADODB上遇到过这个问题。需要注册的类是连接字符串中的数据提供者。在我的案例中，需要安装的是SQL Server Native客户端。修理办公室绝对没有。但对于拥有不同数据提供者的人来说，它可能会有所帮助。

ACCESS类未注册

2 个答案: