刘政道 - 应用程序框架

摘要： 将当前Excel另存为test.xlsActiveWorkbook.SaveCopyAs thisWorkbook.Path &" \test.xls"自定义函数Function youFunctionName(msg) youFunctionName = msg ‘定义函数返回值End Function显示窗体UserForm1.Show隐藏窗体UserForm1.Hide生成文本文件Private Sub CommandButton1_Click() Set fso = CreateObject("Scripting.FileSystemObject& 阅读全文

摘要： 最近在使用Richfaces，当应用rich:editor标签时，发现没有中文字体，由于rich:editor使用的Tinymce，所以只要能够将Tinymce变成支持中文字体就可以了。将richfaces的jar解压缩后搜索tinymce，终于找到richfaces-ui-3.3.3.Final.jar\org\richfaces\renderkit\html\scripts\tiny_mce\advanced文件夹下有editor_template.js和editor_template_src.js两个文件，将其中的theme_advanced_fonts : "Andale M 阅读全文