BlogJava-Java天地-随笔分类-Domino开发知识库http://www.blogjava.net/wangkai40/category/40951.html学习探讨Javazh-cnMon, 20 Jul 2009 09:48:14 GMTMon, 20 Jul 2009 09:48:14 GMT60代理怎样修改用户密码http://www.blogjava.net/wangkai40/archive/2009/07/20/287481.html安阳安阳Mon, 20 Jul 2009 08:18:00 GMThttp://www.blogjava.net/wangkai40/archive/2009/07/20/287481.htmlhttp://www.blogjava.net/wangkai40/comments/287481.htmlhttp://www.blogjava.net/wangkai40/archive/2009/07/20/287481.html#Feedback0http://www.blogjava.net/wangkai40/comments/commentRss/287481.htmlhttp://www.blogjava.net/wangkai40/services/trackbacks/287481.html  Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim view As NotesView
 Dim doc As NotesDocument
 
 Set db=session.CurrentDatabase
 Set view=db.GetView("People")
 Set doc=view.GetFirstDocument()
 While Not doc Is Nothing
  doc.HttpPassword="(F95B1AC3434063FE7CBA363FB171D492)"
  Call doc.Save(True,False)
  Set doc=view.GetNextDocument(doc)
 Wend
End Sub

安阳 2009-07-20 16:18 发表评论
]]>