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


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

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

帅哥哟,离线,有人找我吗?
浙江仔
  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)")


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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2010/10/7 18:42:00 [只看该作者]

就400块,有必要这样费尽心思去整吗?

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2010/10/7 19:32:00 [只看该作者]

同感!

 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | 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楼的想法,那你用的系统,所有软件都是正版的?全部用正版也不就是几千块么,是不是啊?!


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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2010/10/7 21:34:00 [只看该作者]

差不多吧,只要我喜欢的现在用的都是正版的,包括操作系统。

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


加好友 发短信
等级:黑侠 帖子:731 积分:4099 威望:0 精华:0 注册:2006/8/29 23:00:00
  发帖心情 Post By:2010/10/8 9:09:00 [只看该作者]

现在正在用试用版,估计用了快4年了,也没有什么问题.正版与试用版真的有区别吗?没有感觉

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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2010/10/8 11:39:00 [只看该作者]

下面引用由hbfnmxb2010/10/08 09:09am 发表的内容:
现在正在用试用版,估计用了快4年了,也没有什么问题.正版与试用版真的有区别吗?没有感觉

正版和试用版功能本身并无区别,但楼主是在用电脑报版,电脑报版有500行的限制。


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


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

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


 回到顶部
帅哥哟,离线,有人找我吗?
浙江仔
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | 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”,确实比较好用!


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


加好友 发短信
等级:黑侠 帖子:731 积分:4099 威望:0 精华:0 注册:2006/8/29 23:00:00
  发帖心情 Post By:2010/10/9 12:06:00 [只看该作者]

能不能发一个实例上来

 回到顶部
总数 13 1 2 下一页