阅读版:
以下内容为程序代码:
1 runmode:0;
2
3 database('provider=microsoft.jet.oledb.4.0;data source=d:\dbdemo\test.mdb');
4
5 dbtable('select * from @code@ order by stockdate');
6
7 stockopen:=dbvalue('stockopen');
8 stockhigh:=dbvalue('stockhigh');
9 stocklow:=dbvalue('stocklow');
10 stockclose:=dbvalue('stockclose');
11
12 kline(stockopen,stockhigh,stocklow,stockclose,0);
拷贝版:
runmode:0;
database('provider=microsoft.jet.oledb.4.0;data source=d:\dbdemo\test.mdb');
dbtable('select * from @code@ order by stockdate');
stockopen:=dbvalue('stockopen');
stockhigh:=dbvalue('stockhigh');
stocklow:=dbvalue('stocklow');
stockclose:=dbvalue('stockclose');
kline(stockopen,stockhigh,stocklow,stockclose,0);