Office中国论坛/Access中国论坛

标题: 如何才能才能在ACCESS窗体下调用下面这些代码 [打印本页]

---

作者: tanlangkun    时间: 2005-5-24 16:25
标题: 如何才能才能在ACCESS窗体下调用下面这些代码
Dim JRO As JRO.JetEngine

Set JRO = New JRO.JetEngine



JRO.CompactDatabase "rovider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\db1.mdb;User ID=Admin;" & _

"Jet OLEDBatabase Password=123456;", "rovider=Microsoft.Jet.OLEDB.4.0;" & _

"Data Source=d:\databak.mdb;User ID=Admin;" & _

"Jet OLEDBatabase Password=123456;Jet OLEDB:Encrypt Database=True"

---

作者: 海狸先生    时间: 2005-5-24 23:51
在事件代码中写

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3