vfp中写入文本文件_将vfp中的数据写入到wps文档中

WPS2009免费版可以将WPS数据存为Microsoft Office格式,以至在Microsoft Office中打开并操作,又保以操作Microsoft Office文件,所以在考虑放弃Microsoft Office

下面是一些简单的导出到WPS表格的代码

LOCAL num,nFldCount,LX,Exl,ZLK,ZLS,ZJZ,Lerr_pd

Lerr_pd=.F.

IF VARTYPE(BM)&lt&gt'C' OR EMPTY(BM)

BM=DBF()

IF EMPTY(BM)

=MESSAGEBOX("没有数据！", 16, "提示")

RETURN

ENDI

ENDIF

IF VARTYPE(BT)&lt&gt'C' OR EMPTY(BT)

BT='WPS文档'

ENDIF

IF VARTYPE(FX)&lt&gt'N' OR BETWEEN(FX,1,2)

FX=1

ENDIF

IF !USED(BM)

=MESSAGEBOX("没有打开表！"+BM, 16, "提示")

RETURN

ENDIF

SELECT &BM

num=RECCOUNT()

IF NUM=0

=MESSAGEBOX("没有数据！", 16, "提示")

RETURN

ENDI

THIS.J