sywh.prg

来自「vfp原程序prg」· PRG 代码 · 共 14 行

set talk off
wait window '正在维护,请等待............' nowait
use zyk
inde on zkzh tag zkzh
use jhk
inde on yxbh tag yxbh
use bmk
inde on kkh tag kkh
clos all
=messagebox("　　维护完毕！　　",0+48,"数据维护")
retu