如何查询其他数据库内的表(IN子句实例)？
问题：
如何引用其他数据库内的表？(查询外部表)
jet sql 中的 in 子句到底怎么用?在哪里用?
方法一：
select能否查询其他数据库中表的数据？
SELECT * FROM tbl_family IN other.mdb"[5556]";
方括号[]内的是其他数据库的连接字串
方法二：
SELECT *
FROM [;database=C:\db2.mdb;pwd=1].表1 AS a, 表1 AS b
WHERE a.ID=b.id
请参考：
下面是有关select语句的帮助，请注意 in
SELECT 语句
命令 Microsoft Jet数据库引擎从数据库里返回信息，作为一组记录。
语法
SELECT [predicate] { * | table.* | [table.]field1 [AS alias1] [, [table.]field2 [AS alias2] [, ...]]}
FROM tableexpression [, ...][IN外部数据库]
[WHERE...]
]
[GROUP BY...]
]
[HAVING...]
]
[ORDER BY...]
]
[WITH OWNERACCESS OPTION]
IN 子句
标识出外部数据库中的表，例如dBASE或Paradox数据库，或Microsoft Jet外部数据库，Microsoft Jet数据库引擎能够与之相连。
语法
标识目标表：
[SELECT | INSERT] INTO destination IN
{path | ["path" "type"] | ["" [type; DATABASE = path]]}
标识数据源表：
FROM tableexpression IN
{path | ["path" "type"] | ["" [type; DATABASE = path]]}
包含 IN 子句的SELECT 语句具有以下几个部分：
部分 说明
destination 外部表的名称，将数据插入表中。
tableexpression 表的名称，可从这些表中获取数据。这个变量可能是一个单独的表名，一个已存查询，或是 INNER JOIN, LEFT JOIN, 或 RIGHT JOIN.
Path 目录或文件的整个路径，而且这些目录或文件包含 table 。
type 数据库类型的名称，如果数据库不是 Microsoft Jet 数据库（例如 dBASE III、dBASE IV、Paradox 3.x或Paradox 4.x），则用此类型创建 table 。
说明
通过 IN 你一次只可以连接一个外部数据库
在某些情况中，path 参数可引用包含数据库文件的目录。例如，当使用 dBASE、FoxPro或 Paradox 数据库表时，path 参数将指定包含 .dbf 或 .db 文件的目录。由 destination 或 tableexpression 参数可得到表文件的名称。
为了指定非 Microsoft JET 数据库，可在名称之后附加分号 (;)，并用单引号 (' ') 或 (" ") 双引号将它括入。例如可用 'dBASE IV;' 或 "dBASE IV;"这两种写法。
也可使用 DATABASE 保留字指定外部数据库。例如，以下示例指定相同的表：
... FROM Table IN "" [dBASE IV; DATABASE=C:\DBASE\DATA\SALES;];
... FROM Table IN "C:\DBASE\DATA\SALES" "dBASE IV;"
注意
为改进性能并方便使用，请使用链接表而不要用 IN。
IN 子句示例
下列表显示您如何使用 IN 子句来捕获外部数据库的数据。在每一示例之中，假设客户表是保存在外部数据库之中。
外部数据库 SQL 语句
Microsoft® Jet 数据库 SELECT CustomerID
FROM Customers
IN OtherDB.mdb
WHERE CustomerID Like "A*";
dBASE III 或 IV.
捕获数据由 一 dBASE III 表，以 "dBASE III;" 替代 "dBASE IV;"。 SELECT CustomerID
FROM Customer
IN "C:\DBASE\DATA\SALES" "dBASE IV;"
WHERE CustomerID Like "A*";
dBASE III 或 IV 使用数据库语法。 SELECT CustomerID
FROM Customer
IN "" [dBASE IV; Database=C:\DBASE\DATA\SALES;]
WHERE CustomerID Like "A*";
Paradox 3.x 或 4.x.
若要由一Paradox version 3.x 表捕获数据，以 "Paradox 3.x;" 替代 "Paradox 4.x;"。 SELECT CustomerID
FROM Customer
IN "C:\PARADOX\DATA\SALES" "Paradox 4.x;"
WHERE CustomerID Like "A*";
Paradox 3.x 或 4.x 使用数据库语法. SELECT CustomerID
FROM Customer
IN "" [Paradox 4.x;Database=C:\PARADOX\DATA\SALES;]
WHERE CustomerID Like "A*";
Microsoft EXCEL工作表 SELECT CustomerID, CompanyName
FROM [Customers$]
IN "c:\documents\xldata.xls" "EXCEL 5.0;"
WHERE CustomerID Like "A*"
ORDER BY CustomerID;
在工作表之中的一个命名范围 SELECT CustomerID, CompanyName
FROM CustomersRange
IN "c:\documents\xldata.xls" "EXCEL 5.0;"
WHERE CustomerID Like "A*"
ORDER BY CustomerID;
-----------------------------------------------------------------------------------------------------
关于文本文件可以这样
select * from [Text;FMT=Delimited;HDR=Yes;DATABASE=C:\;].[aparm#txt];
关于在IN子句中查询文本文件如何写链接字串,你可以参考:
http://support.microsoft.com/default.aspx?scid=kb;en-us;234201&Product=acc
关于Excel可以这样
insert into 表 SELECT * FROM [Excel 5.0;HDR=YES;DATABASE=c:\test.xls].[sheet1$];
说明:
c:\test.xls 是excel文件名
sheet1是要导入的工作表名
其实，你要获取链接字串还有一个方便的办法，就是使用链接向导，先手工链接一个文件到你的数据库中，然后执行以下代码:
Function displayLinkStringFromLinkTable()
'先到工具菜单->引用 中引用 Microsoft ADO Ext. 2.X for DDL and Security
'引用 ADOX
Dim strTableName
strTableName = "001"
'001是链接表的名字
Dim cat As New ADOX.Catalog
Dim objTable As ADOX.table
Set cat.ActiveConnection = CurrentProject.Connection
For Each objTable In cat.Tables
If objTable.Name = strTableName Then
Debug.Print objTable.Properties("Jet OLEDB:Link Provider String").Name
Debug.Print objTable.Properties("Jet OLEDB:Link Provider String").Value
End If
Next objTable
End Function
