在VFP9里面怎么向数据库表添加数据
答案:1 悬赏:70 手机版
解决时间 2021-02-25 00:28
- 提问者网友：戎马万世
- 2021-02-24 12:25
在VFP9里面怎么向数据库表添加数据
最佳答案
- 五星知识达人网友：过活
- 2021-02-24 12:34
VFP9 的话可以在向数据库添加表时使用全选或多选.....
VFP6 的话不知道可不可以，但可以执行以下代码实现（改改其中三行就行）
CLEAR
LOCAL i,n
DIMENSION aF(1)
LOCAL cPath,cDbf
cPath = "D:\aaa\" && 改为你的目录（30个dbf放里面）
n = ADIR(aF, cPath+"\*.dbf", "AHS")
IF !DBUSED("数据1") && 改为你的数据库名称
OPEN DATABASE "数据1.dbc" && 改为你的数据库名称
ENDIF
FOR i = 1 TO n
IF aF[i,1] = ".." OR aF[i,1] = "."
LOOP
ENDIF
cDbf = cPath + aF[i,1]
ADD TABLE &cDbf
ENDFOR
VFP6 的话不知道可不可以，但可以执行以下代码实现（改改其中三行就行）
CLEAR
LOCAL i,n
DIMENSION aF(1)
LOCAL cPath,cDbf
cPath = "D:\aaa\" && 改为你的目录（30个dbf放里面）
n = ADIR(aF, cPath+"\*.dbf", "AHS")
IF !DBUSED("数据1") && 改为你的数据库名称
OPEN DATABASE "数据1.dbc" && 改为你的数据库名称
ENDIF
FOR i = 1 TO n
IF aF[i,1] = ".." OR aF[i,1] = "."
LOOP
ENDIF
cDbf = cPath + aF[i,1]
ADD TABLE &cDbf
ENDFOR
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯