如有必要跟大家开放更多的源程序代码于:http://www.aweboa.com.cn
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set doc = New NotesDocument ( db )
Msgbox Cstr(doc.Created)
...全文
872打赏收藏
提供大家源程序:快速得到服务器时间不需要保存文档!!!
如有必要跟大家开放更多的源程序代码于:http://www.aweboa.com.cn Dim session As New NotesSession Dim db As NotesDatabase Dim doc As NotesDocument Set db = session.CurrentDatabase Set doc = New NotesDocument ( db ) Msgbox Cstr(doc.Created)