运行环境:vf6.0
clear memory
set safe off
set talk off
ef=CREATEOBJECT('Excel.application')
ef.Workbooks.open("K:/..../结果文件.xls")
ef.visible=.t.
ef.Worksheets("sheet1").Activate
close table
SELECT 1
USE cs.DBF
i=0
GOTO TOP
DO WHILE .not.eof()
select 1
hzsn=alltrim(hzsname)
dsn=alltrim(dsname)
tingname=alltrim(orgname)
tc1cnt=tc1
tc2cnt=tc2
tc3cnt=tc3
tc4cnt=tc4
tc5cnt=tc5
ef.cells(3+i,1).value=hzsn
ef.cells(3+i,2).value=dsn
ef.cells(3+i,3).value=tingname
ef.cells(3+i,4).value=tc1cnt
ef.cells(3+i,5).value=tc2cnt
ef.cells(3+i,6).value=tc3cnt
ef.cells(3+i,7).value=tc4cnt
ef.cells(3+i,8).value=tc5cnt
i=i+1
SKIP
*@ 2,200 say hzsnm
ENDDO
分享到:
相关推荐
vfp vf 操作excel,灰常好的资料,全攻略,保证立马上手!
将"dbf"文件转换为"xls
Vf对EXCEL的接口.pdf
vf导EXCEL实例,具体做法。对大家有帮助的!vf导EXCEL实例,具体做法。对大家有帮助的!vf导EXCEL实例,具体做法。对大家有帮助的!
Vf对EXCEL的接口[收集].pdf
如何将excel.xslx表格数据导出成Visual Fox(VF)表.zip
是个VF的企业人事管理的系统,大家可以分享一下哦! 里面有论文和报告哦1
VF程序VF程序VF程序VF程序VF程序
转:VFP全面控制EXCEL。 讲述全面,很实用,分享给大家。
AG32VF103RCT6 PtP STM32F103RCT6 AG32VF103RCT6 PtP GD32F103RCT6 AG32VF103VCT6 PtP STM32F103VCT6 AG32VF103VCT6 PtP GD32F103VCT6 AG32VF407RGT6 PtP STM32F103RGT6 STM32F205RGT6 STM32F303RCT6 AG32VF407RGT...
异步电机的VF控制c程序说明,控制原理的说明
vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全vf实例大全
vf上机系统vf上机系统vf上机系统vf上机系统vf上机系统vf上机系统vf上机系统vf上机系统vf上机系统vf上机系统vf上机系统
VF编程与软件开发若干实例
很不错的案例,具有一定的参考性VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源代码参考VF案例源...
vf考试系统vf考试系统vf考试系统vf考试系统
VF电子书 内含本人学习笔记和VF学习的电子书 VF常用命令
报表vf 报表设计报表vf 报表设计报表vf 报表设计报表vf 报表设计报表vf 报表设计报表vf 报表设计报表vf 报表设计报表vf 报表设计
数据库数据库vf指令库数据库vf指令库数据库vf指令库