请问VB5使用ADO连接数据库，如何使用自定义函数实现SQL查询

[chenxixian]

在Access中的查询可以使用自定义函数，例如把一个字段作为参数放到自定义函数去算，其结果又可以作为一个新字段返回。
请问VB5使用ADO连接数据库，如何同理使用自定义函数实现SQL查询？

[xxdino]

select id as id2 from datatable
^^^^^^
是问这个吗?

[chenxixian]

select MyFuction(id) as Mydata from datatable
^^^^^^^^^
其中MyFuction是一个自定义函数,放在access的模块里
fuction MyFuction(ss as string) as string
select case ss
case = "case1"
......
MyFuction=....

case = "case2"
......
MyFuction=....

case = "case2"
....
MyFuction=....
end select
end function



如果在vb中用
select MyFuction(id) as Mydata from datatable则不行,

我不知道应该如何定义MyFuction?

[cqq_chen]

不会吧！有必要做的那么烦吗？

[ciml]

数据库是什么？如果是sql server，在sql server里写自定义函数吧。
自定义函数查询方式要慎用！
可以换换其他方法

[ouyangke]

应该可以啊，你用New ADODB.Recordset
在Recordset的Open里select MyFuction(id) as Mydata from datatable
不行吗？

[ciml]

自定义函数查询？不太明白什么意思
直接发sql或用存储过程都可以

[chenxixian]

因为只能在access使用自定义函数查询方式,用ado连接access数据库后却不能用。
所以我只好绕了一个弯路，在vb中引用access对象，使用docmd来完成access中的自定义函数查询。

[cqq_chen]

不行的，我试过这种做法。在ACCESS中自定义函数可以在SQL语句中使用，但到VB中调用时出错，只能用别的办法解决了。

[ttyp]

做个函数生成SQL语句不好吗？

[ouyangke]

到底是什么地方不行呢？