以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  编译错误450  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=10580)

--  作者:pcx123
--  发布时间:2012/3/15 11:58:40
--  编译错误450
Function gggg(Formula)

Set adoConn=CreateObject("Adodb.Connection")
adoConn.Open "Provider=MicroSoft.Jet.OLEDB.4.0;Data Source=D:\\总和\\CA 期货\\AA 数据\\xh.mdb"
strSql="select 阳线新高 from xh"
adoConn.Execute(strSql)

ok=adoConn("阳线新高")

adoConn.Close



gggg=ok



End Function





为何在自定义函数一引用就出现“编译错误450,错误的参数个数或无效的参数属性值:\'adoConn\'

到底在自定义函数里面要怎样引用数据库的数据进行计算呀????快晕了

--  作者:admin
--  发布时间:2012/3/15 12:00:54
--  
adoConn 是什么函数,没见过
--  作者:pcx123
--  发布时间:2012/3/15 12:03:41
--  
以下是引用admin在2012-3-15 12:00:54的发言:
adoConn 是什么函数,没见过


您好,谢谢您的回复,我是拷贝了论坛上的一个代码,说是可以在vba读取数据库,因为前面有个 Set adoConn=CreateObject("Adodb.Connection"),adoConn似乎为数据库对象
--  作者:pcx123
--  发布时间:2012/3/15 12:06:41
--  
 我就是需要一个最简单的在自定义函数里面读取某个数据库数据并赋值给某变量进行计算,然后用指标等调用,可是论坛上都是添加数据的例子,或者是窗体框架的代码,好像在自定义函数无法通过
--  作者:admin
--  发布时间:2012/3/15 12:34:03
--  

你数据库的查询方法不对,建议仔细看看论坛的现在有帖子

http://www.weistock.com/bbs/dispbbs.asp?BoardID=5&ID=2634&replyID=&skin=1