企业官网建设流程全解析

手机社交网站模板,郑州网站建设 云极,河北建设工程信息网联系电话,网站规划建设与管理维护教程与实训---- 用Visual FoxPro编程#xff0c;很多时候需要将用户需要的数据有条件地转出给其他软件处理。Excel是大家熟悉的软件#xff0c;这里#xff0c;本人总结了一种转换方法#xff0c;供大家参考。 ---- 1、 转化的基本条件 ---- 对需要转出数据的主数据表#xff0c;需要…---- 用Visual FoxPro编程很多时候需要将用户需要的数据有条件地转出给其他软件处理。Excel是大家熟悉的软件这里本人总结了一种转换方法供大家参考。---- 1、 转化的基本条件---- 对需要转出数据的主数据表需要提供另外一个辅助表此表需要与主表同时打开表的结构如下在此命名为d_gwt.dbf字段名 类型 宽度 备注E_NAME 字符型 20 记录主表的字段名D_FORT 逻辑型 1 备份选择项目(可以不要)S_FORT 逻辑型 1 选择项目---- 2、 建立一个如下表单以供主表单调用以便选择输出不同的字段的内容表单的Init event:replace all d_gwt.d_fort with d_gwt.s_fort goto top Grid1的Init event: this.column2.check1.caption 取消选择符号后面的文字 取消”的click event: release thisform 全部不选”的click event: nrecnorecno() replace all d_fort with .F. goto nrecno thisform.refresh 全部选中”的click event: nrecnorecno() replace all d_fort with .T. goto nrecno thisform.refresh 确认”的click event: replace all s_fort with d_fort release thisform---- 3、 记录的筛选---- 请使用Visual FoxPro自带的过滤器选择记录当然也可以自己另外设计程序对主数据表进行筛选这里只是使用filter()的返回值。---- 4、 转化数据给Excel:---- 打开建立一个命令控件使其click event如下LOCAL i, j, xlsheet, XLApp, tmpsheet, nrecnogwtfilter, ntorf SELE gwt 在此使用gwt.dbf为主数据表 gwtfilterfilter() count to nrecno SELE D_GWT COUNT TO NTORF FOR S_fort IF NTORF0 WAIT 没有选择任何项目的数据 给Excel处理... windows Sele gwt Return ENDIF SELECT e_name from alias() where s_fort INTO ARRAY arrTestData1 SET FILTER TO s_fort.T. selectfield GOTO TOP DO WHILE .NOT. EOF() selectfieldselectfieldE_NAME, SKIP ENDDO selectfieldSUBSTR(selectfield,1,len(selectfield)-1) SET FILTER TO SELE GWT DIMENSION arrtestdata(ntorf,nrecno) IF Empty(GWTFILTER) SELECT selectfield from alias() INTO ARRAY arrTestData ELSE SELECT selectfield from alias() WHERE gwtfilter INTO ARRAY arrTestData ENDIF WAIT WINDOW Starting Excel... NOWAIT tmpsheet GetObject(,excel.sheet) XLApp tmpsheet.application XLApp.Visible .t. XLApp.WorkBooks.Add() XLSheet XLApp.ActiveSheet**转换第一行的数据也即是数据表的字段FOR I1 TO NTORF XLSheet.Cells(1,I).Value arrTestdata1(1,I) ENDFOR**转换数据内容 FOR i 1 to nrecno FOR j 1 to ntorf XLSheet.Cells(i1,j).Value arrTestData(i,j) ENDFOR ?? chr(7) ENDFORWAIT WINDOW 数据转化成功... TIMEOUT 2--------------------------------------------------------------------------------猫猫的心里话加菲猫的VFP|狐友会社群接收投稿啦加菲猫的VFP用VFP不局限VFP用VFP混合一切。无论是VFP还是JS还是C只要能混合起来都可以发表。商业模式销售技巧、需求规划、产品设计的知识通通可以发表。暂定千字50元红包优秀的文章红包更大一经发表红包到手。如何帮助使用VFP的人用VFP的人有专业的有非专业了很多人其实是小白问出的问题是小白如果问题不对我们引导他们问正确的问题。无论如何请不要嘲笑他们说帮助都不看这么简单的问题都不会嘲笑别人不行而无法提出建设性答案是很low的。我们无论工作需要还是有自己的软件都是是需要真正的知识如何让更多人学习真正的VFP知识呢只需要点赞在看能转发朋友圈就更好了。加菲猫的vfp倡导用VFP极简混合开发少写代码、快速出活用VFP但不局限于VFP各种语言混合开发。我已经带领一百多名会员成功掌到VFP的黑科技进入了移动互联网时代接下来我们要进入物联网领域。2025年狐友会社群会员继续招募中社群会员获取的权益有祺佑三层开发框架商业版猫框终身免费升级终身技术支持。开放的录播课程有微信小程序微信公众号开发H5 APP开发Extjs BS开发VFP面向对象进阶VFP中间层开发。源码类资源有支付组件源码短信源码权限组件源码一些完整系统的源码。这个可以单独出售的需要的可以联系我。会员也可以实现群内资源对接可以接分包合作等各项商业或技术业务