如何取得服务器的日期时间?(C/S)

[KevinLiou]

如何从客户端用LS或者公式取得服务器的日期时间呢?
我的Domino版本为5.02C

[xiajiatou]

脚本：doc.Created.示例：
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim createDate As Variant
Set db = session.CurrentDatabase
Set view = db.GetView( "Main View" )
Set doc = view.GetLastDocument
createDate = doc.Created
Messagebox( createDate )
公式：
@Now,@Today可以取当前时间

[KevinLiou]

谢谢死去活来。不过我要取得的是当前的Server时间。
比如说现在有一个文件需要签核，为了保证签核日期显示的正确(也就是防止用户以修改客户端的日期时间以变更签核日期)，需要抓取Server的日期时间。

[noregretslf]

http://expert.csdn.net/Expert/FAQ/FAQ_Index.asp?id=4221

[sacrefies]

可以考虑使用“文档创建时间”来模拟服务器时间啊~
dim db as new notesdatabase (session.currentdatatbase)
dim doc as notesdocument
dim docid as string
dim servertime as string

set doc = db.createdocument
servertime = cstr(doc.created)
docid = doc.unversalid
db.deletedocument(docid)

servertime就是你要的时间

[KevinLiou]

好像没有db.deletedocument()
而且没有这句，好像也没有新生成文件。