易表在线答疑技术与交流用户社区 → “老宋易表”有感?


  共有9914人关注过本帖树形打印复制链接

主题:“老宋易表”有感?

帅哥哟,离线,有人找我吗?
浙江仔
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:36 积分:10 威望:0 精华:0 注册:2010/1/21 16:14:00
“老宋易表”有感?  发帖心情 Post By:2010/10/7 14:17:00 [显示全部帖子]

看了老宋的两个突破500行数据的公式,想到能不能使用“ExportDBFile()”代替其中的“ExportTextFile()”,导出、导入文件为Excel文件,而不是txt文件,这样容易操作表格数据,作为外挂excel文件的形式,使用易表!
本人对eval公式的理解还不够,不能理解老宋的公式,所以想请教大家!
如果行,怎么改?

附:老宋易表中的公式
1.保存退出(自动备份超过500行数据的表)
Eval("If(["+Substitute(Substitute(Substitute(Substitute(Eval(Substitute("Substitute(#|@|$|&|#,#|#,#"+Substitute(ListGrids(),"|","#)+#|#+Substitute(#|@|$|&|#,#|#,#")+"#)","#","""")),"@","!Rows]>499,ExportTextFile(DocDir+"""),"$","""+"".txt"",char(9),Char(13),"""),"&",""",2) And ClearGrid("""),"|","""),True) And If([") + """),True)") And Save() And Exit()

2.数据加载(自动加载被清空的表的数据)
Eval("If(["+Substitute(Substitute(Substitute(Substitute(Eval(Substitute("Substitute(#|@|&|#,#|#,#"+Substitute(ListGrids(),"|","#)+#|#+Substitute(#|@|&|#,#|#,#")+"#)","#","""")),"@","!Rows]<2,SpenGrid("""),"&",""") And ImportTextFile(DocDir+"""),"|","""+"".txt"",Char(9),Char(13),0),True) And If(["),"Spen","Open")+ """+"".txt"",Char(9),Char(13),0),True)")


 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:36 积分:10 威望:0 精华:0 注册:2010/1/21 16:14:00
  发帖心情 Post By:2010/10/7 20:06:00 [显示全部帖子]

这不是钱不钱的问题,我也只是业余爱好,随便玩玩,只是本人学艺不精,没有吃透EVAL的用法,我想替换ExportDBFile()也是可以的,是不是呢?

一直以来我就想使用外挂EXCEL表格的形式,易表只是做为一个处理工具,数据存储放在通用性强的EXCEL中,方便数据共享,也不容易造成数据的丢失,防止用户随意篡改基础数据。


PS:如果像2楼的想法,那你用的系统,所有软件都是正版的?全部用正版也不就是几千块么,是不是啊?!


 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:36 积分:10 威望:0 精华:0 注册:2010/1/21 16:14:00
  发帖心情 Post By:2010/10/8 12:09:00 [显示全部帖子]

6楼试用版没有使用期限的吗?
用电脑报版的毕竟够你学习了解易表的功能。如果使用易表需要商用的,建议购买正版。
像我这种随便玩玩的,个人爱好的,就不一定要购买正版了,使用电脑报版就ok了,按需选择。


 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:36 积分:10 威望:0 精华:0 注册:2010/1/21 16:14:00
  发帖心情 Post By:2010/10/9 11:20:00 [显示全部帖子]

通过学习“翻数公式生成器--gdlgh”,自己摸索了一下,终于可以实现外挂EXCEL的功能,共享出来,有谁需要就去试试!
我把外挂表格放在“F:\易表范例\外挂EXCEL”文件夹,可以自己根据需要修改。
1、系统保存
eval("if(["+eval("Substitute(""|!rows] > 499,ExportDBFile(""""f:\易表范例\外挂EXCEL\""""+""""|""""+"""".xls"""",6,""""|"""") and ClearGrid(""""|"",""|"","""+Substitute(ListGrids(),"|",""")+"""""") ,true) and if([""+Substitute(""|!rows] > 499,ExportDBFile(""""f:\易表范例\外挂EXCEL\""""+""""|""""+"""".xls"""",6,""""|"""") and ClearGrid(""""|"",""|"",""")+""")")+""") ,true) ") and Save()

2、系统加载
eval("if(["+eval("Substitute(""|!Rows]<2,OpenGrid(""""|"""") and  ImportDBFile(""""f:\易表范例\外挂EXCEL\""""+""""|""""+"""".xls"""",6,""""|"""") and DelRow(""""|"",""|"","""+Substitute(ListGrids(),"|",""")+"""""",1),true)and if([""+Substitute(""|!Rows]<2,OpenGrid(""""|"""") and  ImportDBFile(""""f:\易表范例\外挂EXCEL\""""+""""|""""+"""".xls"""",6,""""|"""") and DelRow(""""|"",""|"",""")+""")")+""",1),true)") and OpenGrid(1)

-=-=-=- 以下内容由 浙江仔2010年10月09日 11:21am 时添加 -=-=-=-
特别感谢“翻数公式生成器--gdlgh”,确实比较好用!


 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:36 积分:10 威望:0 精华:0 注册:2010/1/21 16:14:00
  发帖心情 Post By:2010/10/9 14:08:00 [显示全部帖子]

[这个贴子最后由浙江仔在 2010/10/09 02:08pm 第 1 次编辑]

本机试验成功,有需要的下载试试看RAR文件下载

 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:36 积分:10 威望:0 精华:0 注册:2010/1/21 16:14:00
  发帖心情 Post By:2010/10/9 14:14:00 [显示全部帖子]

此实例仅供测试使用,因数据导出EXCEL存在一定数据出错问题,因此希望使用者自己衡量;作为重要数据的程序处理,望购买正版易表。

 回到顶部