怎么样在VFP中用内存变量的值来建一个表?
想建多个表 比如变量A,依次赋值1,2,3,4,5,6,7,8,9每赋值一次,就建一个表,
命令怎么写?
2015.03.10
1,我是个新手,自学的不懂。
2,因为我导入的股票代码表,也是数字的。所以才会问‘
如果想在变量A后面加上个字符X建表呢 比如 A=1建AX表,也就是 建 1X 表’
我只是想我做一个:
1 导入数据
1.1从股票软件导出数据,然后把数据导入到VFP。
1.2以后每天都要导入数据
2 翻译数据
2.1在 整个数据库中依个的把导入的原数据表中有用的记录,插入到一个新建表中。就是一个代码对应建一个新表。
3,查找
3.1从整个数据库中的(新建表)中查找我想要的新建表,同时也可以查看到原表。
我现在做的第2步,从 代码字段 有多少个记录就建多少个表。
*!* OPEN DATABASE
USE dmb.dbf
GO top
DO WHILE .not.eof()
dm=代码
IF file dmx.dbf
DELETE FROM dmx
PACK
ELSE
CREATE TABLE dmx(rq d,cjhs n(10,2),rrhs n(10,2),ssqs n(10,2),xjqs n(10,2),rrhc n(10,2),cjhc n(10,2),m n(10,2))
ENDIF
SELECT dmx
DIMENSION a1(1),a2(1),b1(1),b2(1),c1(1),c2(1),d1(1),d2(1),e1(1),e2(1),m(1)
PUBLIC a1,a2,b1,b2,c1,c2,d1,d2,e1,e2,m
STORE 0 TO a2,b1,b2,c1,d1,d2,e1,e2
STORE 0.1 TO c2,a1
l=s
LOCATE FOR s>=l*1.06 OR s<=l*0.94
IF s>=l*1.06
a1=l
DO ssqs
DO WHILE .not.eof()
DO xjqs
DO ssqs
LOOP
ENDDO
ELSE
a2=l
DO xjqs
DO WHILE .not.eof()
DO ssqs
DO xjqs
LOOP
ENDDO
ENDIF
LOOP
ENDDO
CLOSE
DMX 变量走不过了。所以就问了
有没高手会做的, 500元帮我做。
自己可以手动导入数据,
翻译的那部分也大自出来了。
[ 本帖最后由 l87233203 于 2015-3-10 13:33 编辑 ]