以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://www.weistock.com/bbs/index.asp) -- 高级功能研发区 (http://www.weistock.com/bbs/list.asp?boardid=5) ---- 老大,数据库问题,录入数据库,没反应呢?为啥呀? (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=2574) |
-- 作者:msedu -- 发布时间:2010/8/23 16:27:18 -- 老大,数据库问题,录入数据库,没反应呢?为啥呀? Variable:x=0; //监控输出 DebugOut(\'当前的买一价是:%2.f\',Dynainfo(28)); DebugOut(\'当前的卖一是:%2.f\',Dynainfo(28)); DebugOut(\'当前的收盘价是:%2.f\',Close); //录入数据库 If x<5 Then Begin DataBase(\'Provider=MicroSoft.Jet.OLDEB.4.0;Data Source=F:\\Db1.Mdb\'); DBTable(\'Select * From Test_1 Order By StockDate\'); DBExecute(\'Insert Into Test_1(Price) Values(\'&NumToStr(Close,2)&\')\'); X=X+1; End [此贴子已经被作者于2010-8-23 16:27:49编辑过]
|
-- 作者:wattwei -- 发布时间:2010/8/23 17:53:37 -- 能否描述下表结构? |
-- 作者:admin -- 发布时间:2010/8/23 18:16:04 -- 请问你的程序遇到了什么问题? |
-- 作者:msedu -- 发布时间:2010/8/23 18:33:46 -- 我遇到的问题是,数据库,里没有记录,不知道是咋回事,呢? |
-- 作者:admin -- 发布时间:2010/8/23 18:37:58 -- 吧If x<5 Then Begin这个去掉试试 |
-- 作者:wattwei -- 发布时间:2010/8/23 18:48:26 -- Variable:x=0; //监控输出 DebugOut(\'当前的买一价是:%2.f\',Dynainfo(28)); DebugOut(\'当前的卖一是:%2.f\',Dynainfo(28)); DebugOut(\'当前的收盘价是:%2.f\',Close); //录入数据库 If x<5 Then Begin DataBase(\'Provider=MicroSoft.Jet.OLDEB.4.0;Data Source=F:\\Db1.Mdb\'); DBTable(\'Select * From Test_1 Order By StockDate\'); DBExecute(\'Insert Into Test_1(Price) Values(\'&NumToStr(Close,2)&\')\'); X=X+1; End 标红处是否为 X:=X+1; |
-- 作者:wattwei -- 发布时间:2010/8/23 18:59:31 -- 另,应该是OLEDB,非OLDEB。 建议在图表模式下调试通过,再改到后台 |
-- 作者:wattwei -- 发布时间:2010/8/23 19:18:38 -- 写入数据库的sample语句: DATABASE(\'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\\Test.mdb\'); DBTABLE2(\'Select * From RB\'); DBEXECUTE(\'insert into RB(stockclose) values(\'&NUMTOSTR(close,2)&\')\'); 样本数据库test.mdb |
-- 作者:msedu -- 发布时间:2010/8/23 22:35:27 -- 非常好的版主,诚意邀请你,做我的QQ群管理员,其实,有时候写来写去,自己都写糊涂了,调试是最头疼的,希望大家能一起交流,一起提高。。。
QQ群:121087743 |
-- 作者:wattwei -- 发布时间:2010/8/23 22:52:12 -- 谢谢楼上的邀请,其实论坛交流效果也不错滴,很多问题在老贴里可以找到答案 |