在VB6中使用Query使用MS Access VBA功能

I have defined a Function in MS Access database. I am using that function in Query. I saved that query as "Query1". This query runs successfully in MS Access. But, when I call the same query from VB (using ADO), it is giving me error:

我在MS Access数据库中定义了一个函数。我在Query中使用该函数。我将该查询保存为“Query1”。此查询在MS Access中成功运行。但是，当我从VB调用相同的查询（使用ADO）时，它给了我错误：

Run-time error '-2147217900 (80040e14)':

Undefined function 'Concatenate' in expression.

Below is the code I use to access "Query1":

下面是我用来访问“Query1”的代码：

rs.Open "Select * From Query1", CN1, 2, 2
If Not rs.EOF Then
'Get Data
End If
rs.Close

1 个解决方案

#1

You cannot use user defined functions (UDFs) outside of Access.

您不能在Access之外使用用户定义的函数（UDF）。