简单的问题，只要能解决，高分相送！

[tonyathome]

我想调用一个自制的函数，该函数查找数据库，希望该函数能把匹配的记录返回到主程序中，如何实现，能否用dll完成？

[of123]

当然可以通过Dll实现。不过这样做意义不大。
因为返回记录至少需要自定义类型，而这样的类型只能适用于特定的数据库。
此外，你还需要传递数据库类型、数据库路径、连接字符串、记录集查询定义、制定的字段列表、匹配码列表，有这工夫在调用者中也早就查询出来了。

[Laney]

写一个activeX DLL，不是很难，但是我不明白，你这样用有什么好处么？
尤其是在返回数据的时候会比较困难

[antshome]

dll里返回记录集就可以了,

类模块里
public function SearchData(xxx as xxx) as Recordset
dim rs as new recordset
dim szSQL as string

szSQL="select * .........."
rs.open szsql,"driver={sql server},............"

set SearchData=rs '返回记录集至调用者

set rs=nothing

end public


调用者用
dim rs as Recordset

set rs=xxx.SearchData(xxx)

这样就取得了记录集，

[tonyathome]

谢谢（星星我来了）。我对dll不熟悉，所以提的问题可能有些奇怪。我在模块中自定义了type的数据类型，并引用它，也可以实现结果，不知采用dll会有哪方面的优点呢？