古老的未来

DOMINO中公式的 或符号 “｜”

@Random获取两个数之间的随机数( y - x )*@Random + x

Dim   tmpDoc   As   NotesDocument Call   tmpDoc.PutInFolder( "folder ",True)

Ctrl+break

@Command ([ToolsRunMacro]; "Cleanup")

item.AppendToTextList( "王小珍" )

Sub Querymodechange(Source As Notesuidocument, Continue As Variant)if Source.document.状态域(0)= "已完成 " then Continue=FalseEnd Sub

不能把SSL打勾

@setfield( "saveoptions "; "1 ");

@TEXT(@Round(137.605;0.01)) LS中：Round

路径两端加[]，例：[/studyform.nsf]

@DbLookup("":"NoCache";"":path; "AllUsersList";@Name([CN];@UserName);3);@DbLookup( class : cache ; server : database ; view ; key ; fieldName ; keywords )@DbLookup( class : cache ; server : databa

'   Display   the   contents   of   c:\config.sys   a   line   at   a   time. Dim   text   As   String,   fileNum   As   Integer fileNum%   =   Freefile() Open   "e:\bai.txt "   For   Input   As

Dim Session as New NotesSessionDim DB as NotesDatabaseset DB = Session.GetDatabase("","names.nsf")//这里换成你的数据库地址，注意路径

Dim sess As New NotesSessionDim db As NotesDatabaseDim path As String Dim filePath As StringSet db = sess.CurrentDatabasepath = sess.GetEnvironmentString("Directory",True)filePath = path

@Begins@Contains(针对多值域)@Ends@Left@LeftBack@MiddleBack@Right@RightBack

假如我们有category1变量为下列值：“AA”:”BB”:”CC”:”DD”又有category2变量为下列值：“DD”:”CC”:”BB”:”AA”则category1+category2+”ZZ”的结果是：“AADDZZ”:”BBCCZZ”:”CCBBZZ”:”DDAAZZ”

Set item = aadoc.ReplaceItemValue("FullName","王小珍/ldbzj" )

LoutsScript中的不等号

InStr函数

1、替换RTF域中的回车换行符Replace(Replace(funrtf.GetUnformattedText,Chr(13),""),Chr(10),"")2、RTF用法Dim rtfReader As VariantSet rtfReader = doc.GetFirstItem("ReadersID")If Instr(rtfReader.Text,user.ID)=0

Dim session As New notessession     Dim db As notesdatabase     Dim docTmp As NotesDocument     Dim GetServerDate as String     Dim dateTime As New NotesDateTime( "" )         Set db = ses

@UrlQueryString("bai")

"/"+@ReplaceSubstring(@Subset(@DbName; -1); "\\"; "/")+"/SendOver.jpg"@WebDbName 例：programs/modules/khgl/ClientManage.nsf

This agent prints the number of document entries in a view.import lotus.domino.*;public class JavaAgent extends AgentBase {  public void NotesMain() {    try {      Session session = getSess

判断文档不存在If doc Is Nothing ThenMessagebox "bai"End If

列公式为： “”+@text(@DocumentUniqueID)+ “>”。  HTML: 允许    不允许

@IsMember( textValue ; textListValue ) @IsMember( textListValue1 ; textListValue2 )1. This example returns 1. @IsMember("computer";"printer":"computer":"monitor")  2. This example returns 0. 

Form :这是表单名SendTo:发件人Subject:发件主题SaveOptions:如果是0则文档不保存,默认是1MailOptions：如果是1，则文档关闭时要被邮寄，默认是0$$Return: 这是WEB下提交页面的返回内容$$HTMLHead:这是4。6版本用的，表示页面HEAD的内容，$$HTMLBody:这是4。6版本用的，表示页面Body的属性$A

This agent displays the elements of the Categories field one at a time.n := 1;@While(n @Prompt([OK]; "Category " + @Text(n); Categories[n]);n := n + 1)

Sub InitializeOn Error Goto errhandlerexit suberrhandler:Msgbox "TextFile_Save 出错： " & Error$ & " on line " & Cstr(Erl)Resume NextEnd Sub

（1）、将字符串格式的日期转为日期格式@TextToTime  例：@TextToTime("1987－05－18") （2）、查询日期假如被搜索文档中没有日期域。用@Created. searchStr =searchStr+ { &  @Created   （3）、公式中日期的比较@Date(@Today)>@Date(@Adjust(Created;0;0

thisdb:=@ReplaceSubstring(@Subset(@DbName;-1);"\\";"/");@Command([FileSave]);@URLOpen("/"+thisdb+"/all/"+@Text(@DocumentUniqueID)+"?editdocument")

Set note = session.DocumentContext