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客户端与服务器端交互这个内容点上,需要参考网上一些文章,但是遗憾的是发现大部分文章都断断续续的非系统性的,不能给读者此交互流程的整体把握.所以这里我 ...
随机推荐
- 更换光纤后路由器端口映射 -VPN相关
之前一直是ADSL的线路,使用路由器后,很简单就可以实现端口映射了!外网也可以随意连接,可是最近升级宽带更换了光纤后,发现怎么都不能正常工作了!在光纤猫里显示的IP居然是:10.0.*.*,查询到的外 ...
- 真正意义上的spring环境中的单元测试方案spring-test与mokito完美结合
真正意义上的spring环境中的单元测试方案spring-test与mokito完美结合 博客分类: java 测试 单元测试SpringCC++C# 一.要解决的问题: spring环境中 ...
- mysql 常用配置
1. 帐号不允许从远程登陆,只能在localhost 这个时候只要在localhost的那台电脑,登入mysql后,更改 “mysql” 数据库里的 “user” 表里的 “host” 项,从“loc ...
- Mysql --分区(3)range分区
3.分区类型 RANGE分区 按照range分区的表是利用取值范围将数据分成分区,区间要连续并且不能互相重叠,使用values less than操作符进行分区定义 CREATE TABLE tnp ...
- iOS 设置tableview头部不可以向下拉动..
- (void)scrollViewDidScroll:(UIScrollView *)scrollView { CGPoint point = scrollView.contentOffset; i ...
- rename() 是原子的么
对一个文件做修改, 通常认为 直接 open-seek-write-write-close 不是原子的. 1. write 本身 不一定是原子的: https://blogs.msdn.microso ...
- Oracle EBS的BIP报表中显示特殊字体
http://oracleseeker.com/2009/08/25/font_mapping_setup_for_special_character_print_in_oracle_ebs_bip/ ...
- java编程规范
一.规范存在的意义 应用编码规范对于软件本身和软件开发人员而言尤为重要,有以下几个原因: 1.好的编码规范可以尽可能的减少一个软件的维护成本 , 并且几乎没有任何一个软件,在其整个生命周期中,均由最初 ...
- 【Python自动化运维之路Day6】
1.递归思考题,阶乘 使用递归方式(函数)计算: 1*2*3*4*5*6*7*8*9*10的值 def func(num): if num==1: return 1 return num*func(n ...
- 入门级:怎么使用C#进行套接字编程(二)
入门级:怎么使用C#进行套接字编程(一) 原文地址如下: C# Server Socket program C# Client Socket program 代码环境:VS2010+Win8.1企业评 ...