Lotus Notes
xqdak
这个作者很懒,什么都没留下…
展开
-
LotusScript获得未读邮件
Option PublicOption Explicit** Notes C-API functions used by the UnreadDocList class (these are Windows-specific** calls -- please adjust as necessary for other operating system platforms)Declare转载 2006-03-16 10:31:00 · 2174 阅读 · 1 评论 -
添加自定义按钮来修改field的值
1. 打开新建按钮窗口:Preference - Toolbar - Customize - New - Button2. 将以下代码复制到Formula编辑框中3. 点击OK按钮添加自定义按钮 ret:=@Prompt([OkCancelEdit];"Please enter a field name!";"";"");ret1:="";@If(ret!="";ret1:=@原创 2010-03-30 10:48:00 · 746 阅读 · 0 评论 -
domino升级到8.5后读者域的兼容性问题
最近发现用户的用户名列在一些文档的读者域中,他们却看不到这些文档。通过仔细分析发现,原来是domino升级后导致的兼容性问题。在早期的版本中,读者域中的用户名只需用common格式保存。而在8.5版本,其名称格式必须是canonical的格式,也就是读者域中保存的用户名的格式需要和作者域中保存的用户名的格式一样。而这一点在lotus notes的帮助确没有被提及。原创 2009-11-16 15:38:00 · 754 阅读 · 0 评论 -
ND8.5中利用Web Service Consumer来调用web service
1. 创建一个web service provider,并命名为GetMath%INCLUDE "lsxsd.lss"Class MyMath Sub new End Sub Function MyRound(numExpr As Double, places As Integer) As Double MyRound = Round(numExpr,places) End Function原创 2009-08-21 15:21:00 · 937 阅读 · 0 评论 -
How to use Regular Expression in LotusScript
declarations Dim regexp As Variant create object Set regexp = CreateObject("VBScript.RegExp") make pattern matching case insensitive regexp.IgnoreCase = True replace pattern regexp.Pattern = |原创 2008-11-21 15:34:00 · 813 阅读 · 0 评论 -
根据记录中某个域值来设定视图行的颜色
1.新建一个form命名为“fProfColor”用于编辑profiledocument,form设计如图:其中“$txtColor”域为计算域,其value为:"color0:=/"00ffffff/":/"00000000/";color6:=/""+bColor6+"/":/""+fColor6+"/";sD:=@Date(txtDueDate);eD:=@If(txtCompletedD原创 2008-03-04 13:31:00 · 608 阅读 · 0 评论 -
刷新文档的计算域
Formular: @Command([ToolsRefreshAllDocs])LotusScript: Dim s As NotesSession Dim db As NotesDatabase Dim view As NotesView Dim doc As NotesDocument Set s = New NotesSession Set db = s.CurrentDat原创 2007-09-04 13:17:00 · 618 阅读 · 0 评论 -
用lotusscript动态刷新登录页表单设计
用lotusscript动态刷新登录页表单设计1、到服务器上查找是否有domcfg.nsf库,如果没有,直接把自己设计的domcfg.nsf库考到服务器上,如果有,执行22、从服务器的domcfg.nsf库中查找登录页,如果有,先将“$$LoginUserForm”表单导成dxl,然后将form节点下属的name节点的nodevalue值改成“$$LoginUserForm”+时间,然后再把dxl原创 2006-05-20 09:36:00 · 2407 阅读 · 1 评论 -
在复选框和单选按钮的公式中输出html代码
我们在开发的过程中,经常会用到复选框和单选按钮,而当我们让它以多列显示的时候,由于每项的内容长度不一样,就会出现排列错乱的结果。为了避免这种情况,我们在写入列值的时候,可以拼写出一段html代码,并用"[]"括起来即可。例如:"[]aaaaa[]|aaaaa""[]b[]|b""[]c[]|c""[]ddd[]|ddd""[]eeeeeeeee[]|eeeeeeeee"“|”右边的值是value值原创 2006-05-16 15:22:00 · 1668 阅读 · 0 评论 -
NOtes Web编程运用ajax技术(Agent)
创建代理xmlAgentSub Initialize Dim strPost As String, strPre As String Dim i as Integer strPre = " strPost = "]]>" Print |Content-Type:text/xml;charset=gb2312| Print "" For i原创 2006-05-11 10:35:00 · 978 阅读 · 0 评论 -
Notes Web编程运用ajax技术(Page)
Notes Web编程运用ajax技术,XMLHTTP对象与page配合使用注意:把页面属性中的web访问的内容类型置为“HTML”创建页面page1.xml,在页面中输入如下代码 并把页面属性中的web访问的内容类型置为“HTML”表单上调用js代码function getRes(){ var post_xmlHttp=new ActiveXOb原创 2006-05-11 11:00:00 · 1187 阅读 · 0 评论 -
在代理中利用VBA对word直接编辑后保存
在代理中利用VBA对word附件直接编辑后保存步骤:1、获得附件,并拆分到服务器临时目录里后再删除附件2、创建word对象,并打开临时目录里的文件3、编辑附件然后保存4、将附件添加到文档中并保存Sub Initialize On Error Goto errhandle Dim session As NotesSession Dim cdb As NotesDatabase Dim col原创 2006-04-24 16:18:00 · 1599 阅读 · 0 评论 -
LotusScript获得在线用户
利用notessession的SendConsoleCommand方法向服务器控制台发送“show inetusers”命令,并返回一个结果(字符窜),用户与用户之间是回车换行符分隔,用户的相关信息用Chr(9)字符窜分隔。把返回得到的字符窜再根据这一规则,即可取得所要的内容。 Set session = New NotesSession Set cdb = session.CurrentD原创 2006-02-23 08:59:00 · 1377 阅读 · 0 评论 -
Lotusscript opens an attachment with associated application
Invokes windows API 'shell32.dll' to find associated application and opens your attachment.原创 2010-09-20 13:54:00 · 540 阅读 · 0 评论