对比看了一下网上搜索到的资料,好象是日线数据。
看看是不是?
看看是不是?
程序代码:
CLEAR CREATE CURSOR DAY表 (日期 C(10), 开盘价×1000 I, 最高价×1000 I, 最低价×1000 I,; 收盘价×1000 I, 成交量(手) I, 成交金额 I, 上涨家数 I, 下跌家数 I) hf = FOPEN("C:\TEMP\Test\sh880681.day") IF hf < 0 RETURN ENDIF DO WHILE !FEOF(hf) sz = FREAD(hf, 32) IF !EMPTY(sz) INSERT INTO DAY表 VALUES (TRANSFORM(CTOBIN(LEFT(sz,4), "4RS"), "9999/99/99"),; CTOBIN(SUBSTR(sz, 5, 4), "4RS"),; CTOBIN(SUBSTR(sz, 9, 4), "4RS"),; CTOBIN(SUBSTR(sz, 13, 4), "4RS"),; CTOBIN(SUBSTR(sz, 17, 4), "4RS"),; CTOBIN(SUBSTR(sz, 21, 4), "4RS"),; CTOBIN(SUBSTR(sz, 25, 4), "4RS"),; CTOBIN(SUBSTR(sz, 29, 2), "2RS"),; CTOBIN(SUBSTR(sz, 31, 2), "2RS")) ENDIF ENDDO FCLOSE(hf) GO TOP BROWSE