示例代码：
Class DOMobj_Person
gdoc_Person As NotesDocument
' ** 屬性
Property Get Document
Set Document = gdoc_Person
End Property
Property Set Document
Set gdoc_Person = Document
End Property
Property Get NotesID
NotesID = gdoc_Person.GetItemValue("NotesID")(0)
End Property
Property Get No
No = gdoc_Person.GetItemValue("EmpNo")(0)
End Property
Property Get CName
CName = gdoc_Person.GetItemValue("EmpCName")(0)
End Property
Property Get EName
EName = gdoc_Person.GetItemValue("EmpName")(0)
End Property
Property Get DeptNo
DeptNo = gdoc_Person.GetItemValue("DeptNo")(0)
End Property
Property Get DeptName
DeptName = gdoc_Person.GetItemValue("DeptCName")(0)
End Property
Property Get DeptLayer
DeptLayer = gdoc_Person.GetItemValue("DeptLayer")(0)
End Property
' ** 代理資訊
Property Get AgentStatus
AgentStatus = gdoc_Person.GetItemValue("AgentStart")(0)
End Property
' ** 建構子
Sub New(pstr_SearchType As String , pstr_SearchKey As String)
Set gdoc_Person = domf_docGetPersonal(pstr_SearchType , pstr_SearchKey)
End Sub
' ** 方法
Function getPerson(pstr_SearchType As String , pstr_SearchKey As String)
Set gdoc_Person = domf_docGetPersonal(pstr_SearchType,pstr_SearchKey)
End Function
'---get First Item Value
Function getFirstItemValue(pstr_item As String) As Variant
getFirstItemValue = Me.gdoc_Person.getFirstItemValue(pstr_item)
End Function
'---get Default Deputy
Function getDefaultDeputy() As DOMobj_Person
Set getDefaultDeputy = Nothing
If (Me.AgentStatus) Then
If gdoc_Person.GetItemValue("DeputyEmpNo")(0) <> "" Then
Set getDefaultDeputy = New DOMobj_Person("NO" , gdoc_Person.GetItemValue("DeputyEmpNo")(0))
End If
End If
End Function
'---get Class Deputy
Function getDeputyByClass(pstr_Class As String)
End Function
End Class
这是一个老生常谈的老问题：
环境：Domino7.0.1 2003server.Sp1，用户mail模板Dwa7.ntf
利用Domino web access访问用户mail数据库，时常出现无法下载保存中文名称附件。
影响的Domino版本很多，IBM承认是软件bug，但一直没有解决这个问题
附件格式：
中英文混和、utf格式的文档、名称中包含+号、包含路径等的附件名称格式
心细的你可能注意到，如果你发送一个如：abc中文.txt的附件，用户收到后，附件名称就会变更为“abc 中文.txt”，中间多了一个空格！
解决：
看多了网络上关于这个方面的讨论，没有彻底的解决方法
1：修改服务器文档---internet协议---Domino web引擎中的“字符集”，使用UTF-8输出
2：如果碰到这个问题，将这个邮件转发给自己！在看看，一般而言也可以打开（这个是IBM发布的变相解决，嘿嘿）
相关配置：
当前服务器文档：
tab标签“Internet协议”——〉tab标签“Domino Web引擎”，依次找到
语言项设置：
缺省字符串资源语言：英语
其他字符串资源语言：中文（简体），中文（繁体）
字符集：
使用UTF-8输出：是
在HTML表单中使用UTF-8:是
缺省的字符集群组：简体中文
安装多语言包
比如客户端使用的是繁体中文的操作系统，domino server就必须安装繁体中文的语言包，否则此客户将无法访问中文名称（比如：上海世博.ppt）的附件。
解决方案1、附件存储在单独的一个数据库中，供业务文档来访问使用。
AttachmentDBPahtUrl :=@GetProfileField("ConfigProfile";"DBHome") + @GetProfileField("ConfigProfile";"AttachmentDBPath");
@Implode("<div align=left><IMG SRC=\"/icons/vwicn005.gif\"><A HREF=" + AttachmentDBPahtUrl + "0/"+@Text(AttachmentDocID0)+"/$FILE/"+@URLEncode("Domino";AttachmentName0)+" TARGET=_BLANK>"+AttachmentName0+"</A> </div>")
域AttachmentDocID0：存储附件所在的文档的UNID
域AttachmentName0：存储附件的名称，可能为中文、字母和相关符号的组合。
@URLEncode：对附件的名字进行编码，避免OS为繁体或其他非简体中文的操作系统因URL链接被截断而无法访问。
在Lotuscript中对汉语进行URLEncode
两种方式：
1、在ls中使用公式语言
Dim cmd As String
Dim x As Variant
cmd = {@URLEncode("Domino";"上海世博会")}
x=Evaluate(cmd)
msgbox CStr(x(0))
2、使用ls自定义的函数
http://wzdany.blog.163.com/blog/static/13383730820102106451479/?fromdm
Apache是以进程为基础的结构，进程要比线程消耗更多的系统开支，不太适合于多处理器环境，因此，在一个Apache Web站点扩容时，通常是增加服务器或扩充群集节点而不是增加处理器。
当处理静态页面时,Tomcat不如Apache迅速。Tomcat不象Apache一样可配置。Tomcat不象Apache一样强壮。Tomcat是Java程序，所以只要有JDK就可以使用,不需要考虑操作系统平台。
apache+tomcat赢得企业级的应用
1.Apache主要用来解析静态文本,如html，tomcat也有此功能，但apache能大大提高效率，对于并发数较大的企业级应用，能更好的显示apache的高效率；
2.Tomcat用来解析jsp,servlet等,所有的客户请求首先会发送到apache，如果请求是静态文本则由apache解析，并把结果返回给客户端，如果是动态的请求，如jsp，apache会把解析工作交给tomcat，由tomcat进行解析（这首先要两者现实整合），tomcat解析完成后，结果仍是通过apache返回给客户端，这样就可以达到分工合作,实现负载均衡，提高系统的性能!
解决办法：
1、查看Tomcat启动日志：jakarta_service_20100406.log(D:\Program Files\Apache Software Foundation\Tomcat 6.0\logs);
其中有以下信息：
[2010-04-06 14:05:53] [174 javajni.c] [error] 找不到指定的模块。
[2010-04-06 14:05:53] [994 prunsrv.c] [error] Failed creating java C:\Program Files\Java\jre1.6.0_07\bin\client\jvm.dll
[2010-04-06 14:05:53] [1269 prunsrv.c] [error] ServiceStart returned
2、重定向Tomcat使用的JVM.dll
重新启动Tomcat成功。