Undokumentierte @Formeln/LotusScript im Lotus Notes Client/Server
- Erstellung von Replik-IDs mittels @Text-Funktion
@Text( @Now; "*" )
Source - NoPersist option in SetProfileField/GetProfileField:
@SetProfileField([NoPersist];"Value to store";@Username)This is a neat flag used to set variables in a virtual profile document - it doesn't really exist. It's kind of like an environment variable, except instead of writing to Notes.ini, you're writing to a temporary client session cache. This only works in the UI between windows in the same database for the life of the current session. Each database has its own NoPersist cache on the Notes client, so unlike environment variables, this will only work in the same database.
Source - Undocumented DOM LotusScript Inventory:
Here's an inventory of LotusScript COM/OLE classes holding undocumented properties and methods. I compiled it using Notes/Domino release 7 type library. OMT notation is used for brevity... - Befehl, um die Namen über den Browser aus dem Adreßbuch zu holen:
@DbCommand("Domino";["LoadAddressListByIndex" | "LoadAddressListByName"];"names.nsf"; txtTargetField; strMax; [strIndex | strKey]) - the LoadAddressListbyIndex command to work was the ($PeopleGroupsFlat) view to be included in my database
- Stellt Informationen aus der aktuellen Arbeitsumgebung bereit:
@LocationGetInfo([HomeServer])
@LocationGetInfo([CatalogServer])
@LocationGetInfo([SametimeServer])
@LocationGetInfo([NamePreference])
@LocationGetInfo([MailProtocol])
@LocationGetInfo([WebRetriever])
@LocationGetInfo([BookmarksFileName])
@LocationGetInfo([InternetMailAddress])
@LocationGetInfo([AreaCode])
@LocationGetInfo([**Feldname***]) Einfach mal andere Feldnamen probieren... ;-) - Codiert eine URL, so dass auch Sonderzeichen/Umlaute/reservierte Zeichen genutzt werden können, siehe auch escape()-Funktion in JavaScript:
@URLEncode - Stellt Einträge aus der Registry zur Verfügung:
@RegQueryValue("HKEY_LOCAL_MACHINE"; "SOFTWARE\\Network Associates\\TVD\\Shared Components\\VirusScan Engine\\4.0.xx\\"; "szDatVersion") - Zeigt den Dialog zum Öffnen einer Datenbank: Quelle
@Prompt([ChooseDatabase]; ""; ""; ""; "")
Rückgabe-Liste: ServerName : FileName/Path : DatabaseTitle - Zeigt den Dialog zum Öffnen einer Datenbank in LotusScript: Quelle
variant = notesUIWorkspace.Prompt( type%, title$, prompt$ [, default ] [, values ] )
type% = 13 benutzen
Rückgabe-Liste: s.o. - Zeigt den Dialog zum Öffnen einer Datei:
@Prompt([LOCALBROWSE]; "Title"; "Text") - Undocumented LotusScript from DominoUpdate Journal:
Dim s As New NotesSession
Dim db As NotesDatabase
Set db = s.CurrentDatabase
If (db Is Nothing) Then
Exit Sub
End If
Dim flds As Variant, x As Integer, fldList As String
flds = db.GetFields(False)
For x = 0 To Ubound(flds)
fldList = fldList + flds(x) + Chr(13)
Next x
Msgbox fldList, 0, db.Title + " fields"
db.RetrievePOP3MAIL("server address",port,"username","password",(True/False to retain mail), (True/False to use SSL))
Db.CreateNewsGroup("group name")
Dim s As New NotesSession
Dim db As NotesDatabase
Set db = s.CurrentDatabase
If (db Is Nothing) Then
Exit Sub
End If
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument, gid As String, html As String
Set dc = db.AllDocuments
For x = 1 To dc.Count
Set doc = dc.GetNthDocument(x)
gid = doc.GenerateMessageID
html = doc.GenerateHTMLString
Next x
Dim s As New NotesSession
Dim idom As String, ihost As String, win As Variant, cr As String
cr = Chr(13)
idom = "Internet Domain: " + s.InternetDomainName
ihost = "Internet Host: " + s.InternetHostName
Set win = s.GetWin32Domain
Msgbox idom + cr + ihost + cr + "Win32 Domain: " + win.ServerName, 0, "Example 3"
Call s.Close()
Dim uiw As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = uiw.CurrentDocument
Print uidoc.ParentViewName
Dim uiw As New NotesUIWorkspace
Call uiw.AddDatabaseToPortfolio()
Call uiw.AddBookmark("Example 5")
Dim s As New NotesSession
Dim db As NotesDatabase
Set db = s.CurrentDatabase
If (db Is Nothing) Then
Exit Sub
End If
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Dim item As NotesItem
Dim pt As Variant, html As String
Set dc = db.AllDocuments
For x = 1 To dc.Count
Set doc = dc.GetNthDocument(x)
Set item = doc.GetFirstItem("combo")
pt = item.PartialText
Next x
Dim s As New NotesSession
Dim db As NotesDatabase
Set db = s.CurrentDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument, temp As NotesDocument
Dim rt As NotesRichTextItem
Dim pt As Variant, html As String
Set dc = db.AllDocuments
Set temp = dc.GetFirstDocument
For x = 1 To dc.Count
Set doc = dc.GetNthDocument(x)
Set rt = doc.GetFirstItem("Body")
pt = rt.PartialText
Call rt.AddLinkByIDS(db.ReplicaID, "","",temp.UniversalID)
Call doc.Save(False, False)
Next x
Quelle - Es gibt in R5 und R6 einen pracktischen undokumentierten Formalsprachebefehl:
list:=@GetMembers(List;Pos[;Anzahl])
Der Befehl holt aus einer Liste ein oder mehrere Elemente ab der stelle Pos. Wenn die Anzahl weggelassen wird, wird ein Element geholt.
Quelle - Sent by Jim Fricker (10.10.2008):
- @LocationGetInfo([AbbreviatedName])
@LocationGetInfo([FullName])
@LocationGetInfo([UNID]) - @AddBusyTime(|text; text; date)
- @FindFreeTime(|text; text; date; number)
- @MailConfirmPreference
- @MailFoldersPreference
- @LocationGetOSTZ
@LocationGetTZ(|variant)
@LocationGetTZ - @CharSetInfo([Charsets])
@CharSetInfo([Encoding])
@CharSetInfo([DefaultCharset]) - @AdminPerformAction(|date; [variant])
@AdminCreateRequest(|date; [variant])
DeleteUser
DeleteGroup
DeleteServer - @URLSubmit(|number)
@URLSubmit - @NetAccount([DeleteNTUser])
@NetAccount([IsNetworkAdmin]) - @FindFreeResource(|text; text; text; text; [variant])
InGMT
InLocalTime - @DbUnreadCount(|text)
- @OpenCalendar(|date; [variant])
Group
Individual - @X509Certificates(|date; text; [variant])
DeleteX509Cert - @MailFilterAddToFolder(|text)
- @AccountGetInfo(|text; text)
- @AdminDelegateMailFile(|number; text; text; text; text; text; text; text; text; text; text; text; text; text; text; text; text)
- @BitAnd(|[number])
@BitOr(|[number])
@BitXor(|[number])
@BitNot(|number)
@BitShift(|number; number) - @GetMembers(|variant; number; number)
- @AddBookmark(
- @UpdateViewDesign(|text)
- @ExpandNameList(|text; text)
- @CRLList(|[keyword]; fieldname; start at; max return)
IssuedBy
ThisUpdate
ThisNext
RevokedDate
RevokedSerialNumber - @DbAdminServer
- @IsDbPrimaryAB
- @IsSoftDeleteEnabled
- @GetSoftDeleteExpireTime
- @SetSoftDeleteExpireTime(|number)
- @CertBlobPack(|blob item name; blob type; prefix; number)
@CertBlobUnpack(|blob item name; blob type; prefix; number) - @IsXACLEnabled
- @MailFilterStopProcessing
- @DbBuildVersion
- @CRL(|[Export]; fileName)
- @RecoverIDFile(|[keyword]; backupfilename; recoveredfilename; newpassword)
- @WhichFolders
- @ShowParentPreview
- @ManageECL(|server : database)
Habt Ihr weitere undokumentierte @Function- oder LotusScript-Formeln?
Bitte sendet sie mir zu, damit ich sie veröffentlichen kann... - @LocationGetInfo([AbbreviatedName])
Undokumentierte @Formeln/LotusScript im Lotus Notes Client/Server的更多相关文章
- 使用LotusScript操作Lotus Notes RTF域
Lotus Notes RTF域的功能也非常强大,除了支持普通的文本以外,还支持图片.表格.嵌入对象.Http 链接.Notes 链接.附件等等众多的类型.本文将介绍如何使用这些类来灵活操作富文本域. ...
- Lotus Notes 学习笔记
这是一个学习关于如何使用Lotus Notes的Agent功能来实现自动化办公的学习笔记. 一. 介绍 Lotus Notes/Domino 是一个世界领先的企业级通讯.协同工作及Internet/I ...
- Lotus Notes中编程发送邮件(二)
在编程发送各种类似通知的邮件时,时常会需要发件人显示为某个特定的帐户,比如某个部门的名称或者管理员的名字.另一种需求是,用户收到某封邮件后,回复邮件的地址不同于发件人栏显示的地址.而正常情况下,发送邮 ...
- C# Windows Service调用IBM Lotus Notes发送邮件
近日研究了下IBM Lotus Mail,这货果然是麻烦,由于公司策略,没有开放smtp,很多系统邮件都没有办法发送,于是入手google学习Lotus Mail,想做成Windows服务,提供wcf ...
- 46. Lotus Notes中编程发送邮件(一)
邮件是Lotus Notes体系的核心和基本功能,以至于Send()是NotesDocument的一个方法,任何一个文档都可以被发送出去,Notes里的一封邮件也只是一个有一些特殊字段的文档.在程序开 ...
- 52. 模版和设计元素——Lotus Notes的代码重用
不论是理论上还是实用上,代码重用都是编程的一个重要议题.可以从两个角度来讨论代码重用. 一是逻辑上代码以怎样的方式被重用.既可以通过面向对象的思想普及以来耳熟能详的继承的方式.比如先建了一个车的基类, ...
- C# 使用 Lotus notes 公共邮箱发送邮件
公司的邮件系统用的是反人类的 Lotus notes, 你敢信? 最近要实现一个功能,邮件提醒功能,就是通过自动发送提醒邮件 前前后后这个问题搞了2天,由于公司的诸多条件限制,无法直接调用到公司发送邮 ...
- [并发并行]_[线程模型]_[Pthread线程使用模型之三 客户端/服务端模型(Client/Server]
Pthread线程使用模型之三 客户端/服务端模型(Client/Server) 场景 1.在客户端/服务端模型时,客户端向服务端请求一些数据集的操作. 服务端执行执行操作独立的(多进程或跨网络)– ...
- 深入浅出 Redis client/server交互流程
综述 最近笔者阅读并研究redis源码,在redis客户端与服务器端交互这个内容点上,需要参考网上一些文章,但是遗憾的是发现大部分文章都断断续续的非系统性的,不能给读者此交互流程的整体把握.所以这里我 ...
随机推荐
- spider
from lxml import etreeimport requestsdef getHtml(html): novelcontent = requests.get(html).content re ...
- struts的DevMode模式
在实际应用开发或者是产品部署的时候,对应着两种模式:开发模式(devMode):此时 DevMode=ture: 产品模式(proMode):此时 DevMode=false: 在一些服务器或者框架 ...
- 关于CSS3的代码总结(部分)
1. 构造样式表:selector{ Property:value; Property:value; } Selector是需要更改样式的元素,property为css属性的名称,value应用的哪种 ...
- .net 泛型运用
DAL层 private DbContext MyContext; public BaseRepository(DbContext context) { MyContext = context; } ...
- umask函数
umask函数为进程设置文件模式创建屏蔽字,并返回以前的值. #include <sys/stat.h> mode_t umask( mode_t cmask); 返回值:以前的文件模式创 ...
- (并查集)~APTX4869(fzu 2233)
http://acm.fzu.edu.cn/problem.php?pid=2233 Problem Description 为了帮助柯南回到一米七四,阿笠博士夜以继日地研究APTX4869的解药.他 ...
- [原] XAF 如何基于业务规则禁用属性
How to: Disable Property Editors Based on a Business Rule // Developer Express Code Central Example: ...
- (Gym 100685G) Gadget Hackwrench(LCA在线ST)
Gadget Hackwrench time limit per test 2 seconds memory limit per test 64 megabytes input standard in ...
- Yaf零基础学习总结2-Yaf框架的安装
接着上一篇文章<Yaf零基础学习总结1-Yaf框架简介>我们对Yaf框架有那么一个大概的了解了,但是对于程序员来说,那些文字都是表面的,他们最想的就是开始敲代码了.当然这也是学习Yaf框架 ...
- C语言itoa()函数和atoi()函数详解(整数转字符C实现)
1.int/float to string/array: C语言提供了几个标准库函数,可以将任意类型(整型.长整型.浮点型等)的数字转换为字符串,下面列举了各函数的方法及其说明. ● itoa():将 ...