Domino面试试题及答案(15)

本文适合初中级Domino开发管理面试(内含答案)

9.在代理中写出获取当前数据库的b视图的第一篇文档的代码。（10分）

Dim ss As New NotesSession

As NotesDatabase

As NotesView

As NotesDocument

ss.CurrentDatabase

db.GetView("b")

view.GetFirstDocument Dim db Dim view Dim doc Set db = Set view = Set doc =

10.使用公式表达日期为把当前日期年推后1年,月推后2个月,天退后3天。（3分）

@Adjust(@Now;1;2;3;0;0;0)

11.如果 SalesForce 域中的列表是 "Rogers" : "Binney" : "Harris" : "Larson"，使用公式返回列表个数。（3分）

@Elements(SalesForce)

12.使用公式语言完成以下功能

a、判断该用户是否有管理员角色

b、如果有将域值status设为“open”并提示“设置成功”

c、如果没有提示“你不是管理员”（10分）

@if(@IsMember("[管理员]";@userroles);@do(@SetField("Status";"Open");@Prompt([Ok];"提示";"设置成功"));@Prompt([Ok];"提示";"你不是管理员"))