excel vba ADO 如何远程连接，比如说连接局域网其它电脑上的access数据库。请给出代码

例如远程SQLSERVER

连接字符串为:

Provider=SQLOLEDB.1Password=密码Persist Security Info=TrueUser ID=用户名Initial Catalog=数据库名称Data Source=远程主机IP

材料/工具：Excel2003

1、首先启动access，执行新建-空数据库命令，输入名称保存在一个合适的位置上。

2、在数据库对话框中点击新建命令，调出新建表对话框，选择导入表选项，点击确定按钮。

3、在导入对话框中找到需要导入的数据表格，选中后点击导入按钮，出现导入数据表向导对话框。

4、接着根据向导提示点击下一步，在“请选择数据的保存位置”中勾选新表中。

5、在字段选项中采用默认即可，点击下一步，接着选择设置主键为“字段2”。

6、直到出现完成按钮，并点击完成后，在数据库中就会出现sheet1表，双击打开即可，接着可以进行必要的处理了。

---