欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

关于署理,运行代表的作用

更新时间: 2014-01-05 03:00:37 责任编辑: Author_N1

 

关于代理,运行代表的作用。
我有个需求如下:
有个数据库,每天特定时间需要进行统计,然后将所有文档删除。
但是每天对此数据库中文档进行操作的用户,都没有删除文档的权限。
尝试过设置一个代理,把运行代表写成有删除权限的ID,可是运行的时候,还是没有删除权限。

问是我代理设置的问题,还是有其他方法可以实现?
--参考方法--
你应该用代码调用那个代理,并且使用agent.runOnServer方法来运行它。
如果在本地客户端运行代理(agent.run()),那个运行代表没有作用的,用的还是当前用户身份。
实测:
Sub Initialize()
Dim session As New NotesSession
  Dim agent As NotesAgent
  Dim db As NotesDatabase
  Dim doc As NotesDocument
  Dim body As NotesRichTextItem
  Set agent = session.CurrentAgent
  Set db = session.CurrentDatabase
  Set doc = New NotesDocument( db )
  doc.Form = "Memo"
  doc.SendTo = Evaluate({@UserName:"你自己的Notes ID":"}+session.EffectiveUserName+{"}) 'session.EffectiveUserName
  doc.Subject = "Owner, user, effective user, on behalf of"
  Set body = New NotesRichTextItem(doc, "Body")
  Call body.AppendText("Owner = " & agent.Owner)
  Call body.AddNewLine(1)
  Call body.AppendText("User = " & session.UserName)
  Call body.AddNewLine(1)
  Call body.AppendText("Effective user = " & _
  session.EffectiveUserName)
  Call body.AddNewLine(1)
  Call body.AppendText("OnBehalfOf = " & agent.OnBehalfOf)
  Call doc.Send( False )

End Sub
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 03:00:37
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/17195/
本文WWW.DOC100.NET DOC100.NET版权所有。