Ms access 使用vbscript创建指向MS Access数据库中表的链接

我想在数据访问页中运行一些vbscript代码。代码用于创建指向另一个access数据库中的表的链接

在数据访问页面中，我已经连接到当前数据库，所以希望我只需要指定外部访问数据库路径和名称，然后指定我要链接到的表，以及链接的名称。。。这将是理想的解决方案

我花了几个小时四处寻找，但我能找到的只是VBA和/或在可由窗体调用的access模块中执行此操作的代码

有办法做到这一点吗？我可以使用“新建表”向导手动创建链接，但我需要代码来完成此操作

---

提前感谢

是的，这在VBS中是可能的。您说您已经看到了一些VBA代码和模块。大多数VBA代码/模块也可以在vbs中使用，只需稍加调整

例如，假设您有一些vba代码，类似于

Set myRs=CurrentDB.OpenRecordset（“someTbl\u或sometqry”）

在VBS中，首先需要访问MicrosoftOfficeAccess应用程序对象

这取决于您是否计划在相关access数据库打开时执行vbs

如果数据库未打开，则在VBS开始时执行以下操作：

myAccessApp=CreateObject（“Access.Application”）

否则：

myAccessApp=GetObject（，“Access.Application”）

现在，您已经加载了Access.Application对象，现在几乎可以用VBA执行任何操作，唯一的区别是您将应用程序对象添加到相关VBA代码行的开头。所以现在你可以：

Set myRS=myAccessApp.CurrentDb.OpenRecordset（“SomeTbl\u或somQry”）

在VBS文件中

---

一句话：是的，一旦您的VBS能够访问access.Application对象，这是可能的。

因此，这里不是其他人为您编写代码的地方。请向我们展示您的尝试，并解释您遇到的具体问题。我的实际问题是“有没有办法做到这一点？”太棒了！谢谢你，肖恩·W。这让我对前进的道路有了很好的了解，同时也突出了我可能遇到的一些限制。。。e、 g.我的应用程序的一些用户实际上没有安装Access，而是使用MS Office Web组件。因此，至少我可以看到谁可以/不能利用我即将推出的解决方案，我可以用我的代码来满足这些需求。再次谢谢，太好了。我很高兴我能帮忙。您是否愿意单击此问题的“接受答案”按钮？