main.prg

EXCEL、dbf、word文件互转.rar VFP环境下文件转换原码

_Screen.Visible=.F.
Set Talk Off                  &&关闭命令显示
Set Escape Off                &&禁止运行的程序在按 Esc 键后被中断
Set Exclusive Off             &&数据库表以共享方式打开
Set Deleted On                &&过滤掉已带删除标记的记录
Set Help On                   &&当按下 F1 键后，显示帮助窗口
**Set Help To Help.chm        &&指定帮助文件
Set Console Off               &&不将结果输出到活动的用户自定义窗口中
Set Date Ansi                 &&设定日期的年份为 4 位数
Set Century On                &&指定日期表达式的显示格式为YY.MM.DD
Set Safety Off                &&指定在改写已有的文件时不显示对话框
Set Optimize On
Set ENGINEBEHAVIOR 70
PUBLIC pcFile
pcFile=''
pcSys_Dir=Sys(5)+Sys(2003)
SET DEFAULT TO (pcSys_Dir)
Do Form pcSys_Dir+'\drexcel.scx'
Read Events