[浏览完整版]
标题：[技巧]把代码保存到文本文件中执行
1楼
reachtone 发表于：2009/9/22 10:19:00 本人在实际应用中碰到了这样的问题：客户的报表可能半年或一年调整一次，并希望这些固定格式的报表能够一次性全部生成。这个需求用代码当然是可以轻松实现的。但问题是，如果他的报表格式调整了，难道就只能修改项目文件重新给他升级吗？
经过摸索，我发现可以把用户经常变化的功能需求代码写到文本文件里，然后在项目中执行。也就是说，对于定制报表之类的灵活需求，只要把代码写到文本文件里、然后给客户提交这个文本文件就行，而无需再修改项目！
例子在这里，有需求的朋友可以参考一下：
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目3.rar |
其实也很简单，事件核心代码只有5行（要先设置好file文件名）：
Dim Code as String = FileSys.ReadAllText(File,System.Text.Encoding.Default) ‘读文本文件
Functions.Add("Zdy",Code) '添加到自定义函数
Functions.Complie() '编译
Functions.Execute("Zdy") '执行
Functions.Remove("Zdy") '代码执行完毕即删除函数
[此贴子已经被作者于2009-9-22 12:01:29编辑过]
2楼
狐狸爸爸 发表于：2009/9/22 10:39:00呵呵,好主意
3楼
mr725 发表于：2009/9/22 11:07:00真好啊
4楼
yangming 发表于：2009/9/22 11:34:00先收藏再研究学习!谢谢楼主
5楼
exonjee 发表于：2009/9/22 11:36:00打开时，提示编译错误，public sub complic(0001001 as boolean),
继续打开后，点击按钮没反应
6楼
kylin 发表于：2009/9/22 11:48:00以下是引用exonjee在2009-9-22 11:36:00的发言：
打开时，提示编译错误，public sub complic(0001001 as boolean),
继续打开后，点击按钮没反应
同此
7楼
reachtone 发表于：2009/9/22 11:49:00以下是引用exonjee在2009-9-22 11:36:00的发言：
打开时，提示编译错误，public sub complic(0001001 as boolean),
继续打开后，点击按钮没反应
可能foxtable的版本不一样 
事件代码已经贴在一楼了。
[此贴子已经被作者于2009-9-22 11:58:42编辑过]
8楼
czy 发表于：2009/9/22 12:31:00我也不行。
应该是老六的问题了。
老六，来看看Functions.Complie()为什么不行了？
应该是老六的问题了。
老六，来看看Functions.Complie()为什么不行了？
9楼
狐狸爸爸 发表于：2009/9/22 12:47:00大家这样:
Functions.Complie(True)
Functions.Complie(True)
10楼
czy 发表于：2009/9/22 12:48:00以下是引用狐狸爸爸在2009-9-22 12:47:00的发言：
大家这样:
Functions.Complie(True)
大家这样:
Functions.Complie(True)
nnd，你又变规则了