进销存系统导入excel文件时提示[ODBC Microsoft EXCEL 驱动程序] 保留错误（-5016）没有这种错误的消息

由于微软在2017-10-10左右更新了安全补丁（KB4041678，KB4041681）

从而更新了Microsoft JET Database Engine导致asp、asp.net等无法读取Excel。

出错提示1：Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC Excel 驱动程序] 保留错误 (-5016)； 没有这种错误的消息。

出错提示2：导入或者查询excel 提示：外部数据库驱动程序中(1)的意外错误

一直正常，没有修改过配置，只是更新了补丁就查询不了了，所以基本上是补丁问题。

百度到的方法大都是卸载补丁

解决方案：在控制面板>程序>程序和功能>已安装更新中，找到对应的两个补丁，进行卸载。

本人也收到多位asp+excel通用查询系统忠实用户的反馈。

其中一位用户提供了解决方法，本人亲测可用，故予以分享。

实现原理：使用旧版msexcl40.dll即可解决。

第一步：下载旧版 msexcl40.dll

打补丁后异常的新版：337KB版本4.0.9801.1

我们得下载最新旧版：332KB版本4.0.9801.0

或更早版本：比如：4.0.9502.0

第二步：更名后复制到相同位置

文件名更改msexcl40.dll为msexcl40_aiyaha.dll

复制到C:\Windows\SysWOW64\下

新复制的旧版位置：C:\Windows\SysWOW64\msexcl40_aiyaha.dll

第三步：修改注册表对应的位置参数

运行-->regedit 进入注册表并搜索msexcl40.dll

得到注册表位置：（如图）

双击修改名称win32值为：C:\Windows\SysWOW64\msexcl40_aiyaha.dll

第四步：Win2008 64位环境下亲测，无需重启已经正常

当在Tableau中连接MySQL数据库时出现“无法连接服务器，检查服务器是否正在运行以及您是否有权访问”等错误提示时，可能是以下原因之一：

1.MySQL服务器没有运行：请确认MySQL数据库服务器是否已经启动。可以检查MySQL的状态或者重启MySQL服务，看是否能够正常连接。

2.MySQL数据库没有正确配置端口：请确保已经正确设置MySQL数据库的端口号，并在Tableau中正确输入该端口号。默认情况下，MySQL使用3306端口。

3.防火墙阻止了连接：如果您的计算机中安装了防火墙，可能会阻止Tableau与MySQL数据库的连接。请检查您的防火墙设置，确保Tableau可以访问MySQL端口。

4.数据库权限问题：请确保您在连接MySQL数据库时使用的用户名和密码具有足够的权限来访问该数据库。可以在MySQL服务器上检查用户的权限设置，或者使用管理员账号登录MySql进行授权 *** 作。

5.MySQL驱动程序问题：如果您安装的MySQL驱动程序版本较老，可能会导致连接失败。建议升级到最新版本的MySQL驱动程序，并重新尝试连接。

6.检查MySQL服务器是否正在运行。您可以打开命令行终端并输入“netstat -an”来检查服务器是否在运行。

7.确认您的MySQL用户名和密码是否正确。这些都是在MySQL服务器上配置的，因此请确保您在Tableau中使用的用户名和密码与服务器上的相同。

8.确认MySQL服务器是否开放了需要的端口。默认情况下，MySQL服务器端口是3306，如果您的MySQL服务器使用了不同的端口，则需要更新Tableau中的端口配置。您可以在Tableau“连接到数据”窗口中的MySQL连接设置中更改端口。

9.确认您的计算机是否允许访问MySQL服务器。在某些情况下，您的计算机本身的安全设置可能会阻止访问MySQL服务器。您可以检查防火墙设置，以确保Tableau具有访问MySQL服务器的权限。

总的来说，当在Tableau中连接MySQL数据库时出现连接失败的错误提示，需要仔细检查以上几个问题，找出原因并解决，才可以成功连接到MySQL数据库。

ActiveServerPages,ASP0126(0x80004005)-->找不到包含文件

MicrosoftOLEDBProviderforODBCDrivers(0x80040E21)-->sql语句出错(数据类型不匹配或表名(字段名)错误或表处于编辑状态，或表不存在于conn打开的数据库中)

MicrosoftOLEDBProviderforODBCDrivers(0x80040E14)-->sql语句出错(字段名错误,或数据类型不匹配)

MicrosoftOLEDBProviderforODBCDrivers(0x80040E07)-->sql语句出错(要插入或更新的字段的类型与变量数据类型不匹配)

MicrosoftOLEDBProviderforODBCDrivers(0x80040E57)-->sql语句出错(要插入或更新的数据溢出)

MicrosoftOLEDBProviderforODBCDrivers(0x80040E10)-->sql语句出错(update字段名或要更新的数据类型错误)

MicrosoftOLEDBProviderforODBCDrivers(0x80004005)-->sql语句出错(要插入或更新的字段的数值不能为空值)

MicrosoftOLEDBProviderforODBCDrivers(0x80004005) -->打开数据库出错，没有在指定目录发现数据库

MicrosoftOLEDBProviderforODBCDrivers(0x80040E37)-->没有发现表

MicrosoftVBscript运行时错误(0x800A000D)-->错误引用rs变量(rs对像已关闭或未定义)

MicrosoftVBscript运行时错误(0x800A01C2)-->vbscript脚本错误(vbscript语句出错)

MicrosoftVBscript运行时错误(0x800A0006)-->vbscript脚本错误(溢出错误)

MicrosoftVBscript编译器错误(0x800A040E)-->缺少loop

MicrosoftVBscript编译器错误(0x800A03EA)-->缺少if或endif

MicrosoftVBscript编译器错误(0x800A03EE)-->语句未结束(缺少")")

MicrosoftVBscript编译器错误(0x800A03F6)-->if语句出错(缺少endif)

MicrosoftVBscript运行时错误(0x800A005B)-->缺少set

MicrosoftVBscript运行时错误(0x800A0005)-->变量未定义

MicrosoftVBscript编译器错误(0x800A03F9)-->if语句缺少then

MicrosoftVBscript编译器错误(0x800A0411)-->dim语句定义错误

MicrosoftVBscript编译器错误(0x800A0408)-->sql语句错误（?????????????????)

Microsoft VBScript 运行时错误 (0x800A01B6)错误原因：set rs=server.create......你少了 set

ADODB.Recordset(0x800A0BB9)-->sql语句出错(sql语句或conn语句未定义或对一个rs属性进行赋值时发生错误)

ADODB.Recordset(0x800A0CC1)-->rs对像出错(rs对像本身不存在或错误地引用了一个不存在的字段名)

ADODB.Recordset(0x800A0BCD)-->rs对像出错(记录集中没有记录却对记录集进行 *** 作)

ADODB.Recordset(0x800A0E78)-->rs对像出错(记录集不存在,缺少rs.open语句)

ADODB.Recordset(0x800A0CC1) -->rs对像出错(引用了一个不存在的字段名)

ADODB.Recordset(0x800A0E7D)-->conn定义错误

ADODB.Recordset(0x800A0CB3)-->数据库以只读方式打开，无法更新数据

如果 VBScript 语句结构违反了一个或多个 VBScript 脚本语言语法规则，就会产生 VBScript 语法错误。

错误通常在执行程序前，编译程序时产生。 以下是53个语法错误：

错误编号 描述

十进制 十六进制 说明

1001 800A03E9 内存不足

1002 800A03EA 语法错误

1003 800A03EB 缺少“：”

1005 800A03ED 需要 '('

1006 800A03EE 需要 ')'

1007 800A03EF 缺少“]”

1010 800A03F2 需要标识符

1011 800A03F3 需要 '='

1012 800A03F4 需要 'If'

1013 800A03F5 需要 'To'

1014 800A03F6 需要 'End'

1015 800A03F7 需要 'Function'

1016 800A03F8 需要 'Sub'

1017 800A03F9 需要 'Then'

1018 800A03FA 需要 'Wend'

1019 800A03FB 需要 'Loop'

1020 800A03FC 需要 'Next'

1021 800A03FD 需要 'Case'

1022 800A03FE 需要 'Select'

1023 800A03FF 需要表达式

1024 800A0400 需要语句

1025 800A0401 需要语句的结束

1026 800A0402 需要整数常数

1027 800A0403 需要 'While' 或 'Until'

1028 800A0404 需要 'While,'、 'Until,' 或语句未结束

1029 800A0405 需要 'With'

1030 800A0406 标识符太长

1031 800A0407 无效的数

1032 800A0408 无效的字符

1033 800A0409 未结束的串常量

1034 800A040A 未结束的注释

1037 800A040D 无效使用关键字 'Me'

1038 800A040E 'loop' 没有 'do'

1039 800A040F 无效 'exit' 语句

1040 800A0410 无效 'for' 循环控制变量

1041 800A0411 名称重定义

1042 800A0412 必须为行的第一个语句

1043 800A0413 不能赋给非Byval参数

1044 800A0414 调用 Sub 时不能使用圆括号

1045 800A0415 需要文字常数

1046 800A0416 需要 'In'

1047 800A0417 需要 'Class'

1048 800A0418 必须在一个类的内部定义

1049 800A0419 在属性声明中需要 Let , Set 或 Get

1050 800A041A 需要 'Property'

1051 800A041B 参数数目必须与属性说明一致

1052 800A041C 在类中不能有多个缺省的属性/方法

1053 800A041D 类初始化或终止不能带参数

1054 800A041E Property Let 或 Set 至少应该有一个参数

1055 800A041F 不需要的 'Next'

1056 800A0420 只能在 ‘Property’ 或 ’Function’ 或 ’Sub’ 上指定 ’Default’

1057 800A0421 说明 'Default' 必须同时说明 'Public' "

1058 800A0422 只能在 Property Get 中指定 'Default'

VBScript 运行时错误

如果 VBScript 脚本执行系统无法实施的 *** 作，则会产生 VBScript 运行时错误。只有在运行脚本、为变量表达式赋值或

分配内存时，才会产生 VBScript 运行时错误。 以下是65个运行时错误：

错误编号 描述

十进制 十六进制 说明

5 800A0005 无效过程调用或参数

6 800A0006 溢出

7 800A0007 内存不足

9 800A0009 下标越界

10 800A000A 该数组为定长的或临时被锁定

11 800A000B 被零除

13 800A000D 类型不匹配

14 800A000E 字符串空间溢出

17 800A0011 无法执行请求的 *** 作

28 800A001C 堆栈溢出

35 800A0023 未定义 Sub 或 Function

48 800A0030 加载 DLL 错误

51 800A0033 内部错误

52 800A0034 坏文件名或数

53 800A0035 文件未找到

54 800A0036 坏文件模式

55 800A0037 文件已经打开

57 800A0039 设备I/O错误

58 800A003A 文件已经存在

61 800A003D 磁盘空间已满

62 800A003E 输入超出文件尾

67 800A0043 文件太多

68 800A0044 设备不可用

70 800A0046 权限禁用

71 800A0047 磁盘未准备好

74 800A004A 不能用不同的驱动器重新命名

75 800A004B 路径/文件访问错误

76 800A004C 路径未找到

91 800A005B 未设置对象变量

92 800A005C For 循环未初始化

94 800A005E 非法使用 Null

322 800A0142 不能建立所需临时文件

424 800A01A8 需要对象

429 800A01AD ActiveX 部件无法创建对象

430 800A01AE 类不支持自动化

432 800A01B0 在自动化 *** 作中未找到文件名或类名

438 800A01B6 对象不支持该属性或方法

440 800A01B8 Automation错误

445 800A01BD 对象不支持此 *** 作

446 800A01BE 对象不支持指定的参数

447 800A01BF 对象不支持当前的区域设置

448 800A01C0 未找到命名参数

449 800A01C1 参数不可选

450 800A01C2 错误的参数个数或无效的参数属性值

451 800A01C3 对象不是一个集合

453 800A01C5 指定的dll函数未找到

455 800A01C7 代码源锁错误

457 800A01C9 这个键已经是本集合的一个元素关联

458 800A01CA 变量使用了一个 VBScript 中不支持的自动化（Automation）类型

462 800A01CE 远程服务器不存在或不能访问

481 800A01E1 无效图片

500 800A01F4 变量未定义

501 800A01F5 违法的分配

502 800A01F6 脚本对象不安全

503 800A01F7 对象不能安全初始化

504 800A01F8 对象不能安全创建

505 800A01F9 无效的或不合格的引用

506 800A01FA 类未被定义

507 800A01FB 发生异常

5016 800A1398 需要正则表达式对象

5017 800A1399 正则表达式中的语法错误

5018 800A139A 错误的数量词

5019 800A139B 在正则表达式中需要 ']'

5020 800A139C 在正则表达式中需要 ')'

5021 800A139D 字符集越界

32811 800A802B 元素未找到

---