vfp 表生成html,vfp用代码生成htm

SET SAFETY OFF

SET TEXTMERGE ON

SET TEXTMERGE DELIMITERS TO "##","##"

SET TEXTMERGE TO temp.htm noshow

\

\

\

\

\

\

My First VFP-HTML

\

\

\

\

\

\

\

\

\

Description\

\

You can use \the PrintWhen expression to change the fontstyles printed based on the values being \printed. In thiscase, the detail line is printed in red for those products whose in stock is below \the reorder level. Also, any products that have been discontinued are printed in strikeout.\

\

\

\

*\

\

\

\

\

\

Product

\

In Stock

\

On Order

\

\

\

\

\

\

\

\

\

for i=1 to 10

\

\

第##i##行1列

\

第##i##行2列

\

第##i##行3列

\

第##i##行4列

\

第##i##行5列

\

endfor

\

\

\

SET TEXTMERGE OFF

SET TEXTMERGE TO

SET TEXTMERGE DELI

DECLARE INTEGER ShellExecute ;

IN SHELL32.DLL ;

INTEGER nWinHandle,;

STRING cOperation,;

STRING cFileName,;

STRING cParameters,;

STRING cDirectory,;

INTEGER nShowWindow

aa=ShellExecute(0,"Open","temp.htm","",".",1)