易语言access数据库中修改表名

如题.我想用e语言修改数据库表名.而在官方资源网站中下载的例程.修改不成功.
是数据库对象.写属性 (“ActiveConnection”, "路径")....总是返回假.不成功.
请问如何修改数据库表名啊

.版本 2
.子程序 修改MDB库表名, 整数型, 公开, 返回1成功——Superren
.参数 MDB文件名, 文本型
.参数 旧表名, 文本型
.参数 新表名, 文本型
.局部变量 数据库对象, 对象
.局部变量 表集合对象, 对象
.局部变量 表对象, 对象
.局部变量 字段集合, 对象
.局部变量 字段, 对象
.局部变量 b
.局部变量 c, 文本型
.局部变量 d, 变体型
.局部变量 vv, 变体型
数据库对象.创建 (“ADOX.Catalog”, )
c ＝ “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” ＋ MDB文件名
d.置类型 (#文本型)
d.赋值 (c, )
数据库对象.写属性 (“ActiveConnection”, d)
表集合对象 ＝ 数据库对象.读对象型属性 (“Tables”, )
.如果真 (表集合对象.是否为空 () ＝ 假)
d.赋值 (旧表名, )
表对象 ＝ 表集合对象.读对象型属性 (“Item”, d)
.如果真 (表对象.是否为空 () ＝ 真)
数据库对象.清除 ()
返回 (-1)
.如果真结束
表对象.写属性 (“Name”, 新表名)
数据库对象.清除 ()
返回 (1)
.如果真结束
数据库对象.清除 ()
返回 (-2)

---

只敏凳需要一个数据库连接组件 写如下代码即可
.版本 2
.支持库 eDB

.子程序 _按钮桥历旅1_被单击

数据烂升库连接1.连接Access (“数据库路径”, “”)
数据库连接1.执行SQL (“EXEC sp_rename '要改的表的名字', '修改后的表的名字'”)

---

看看是不是变量没有正确控制造成的

---

额，这个问题好难。。我也不太明白。。。汗

---