易语言一键读取ACCESS数据库

例程程序结合易语言高级表格支持库，实现了读取ACCESS数据库内容的功能。

本易语言例程源码是易语言论坛用户编写的教程，属于易语言数据库类教程。

.如果真 (Engine.创建 (“JRO.JetEngine”, ) ＝ 假)
返回 (1)
.如果真结束
tmp ＝ 取临时文件名 ()
Engine.方法 (“CompactDatabase”, “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” ＋ 参数_路径 ＋ 选择 (参数_密码 ＝ “”, “”, “;Jet OLEDB:Database Password=” ＋ 参数_密码), “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” ＋ tmp ＋ 选择 (参数_密码 ＝ “”, “”, “;Jet OLEDB:Database Password=” ＋ 参数_密码))
.如果真 (Engine.取错误 () ≠ “”)
返回 (2)
.如果真结束
Engine.清除 ()
.如果真 (删除文件 (参数_路径) ＝ 假)
删除文件 (tmp)
返回 (3)
.如果真结束
.如果真 (复制文件 (tmp, 参数_路径) ＝ 假)
返回 (3)
.如果真结束
返回 (选择 (删除文件 (tmp), 0, 3))