当前位置:软件学习 > 其它软件 >>

lotus notes客户端如何获取服务器时间

本人想在notes客户端准确地获取domino服务器时间,在正常情况下通过以下方法可以实现:
  Dim   session   As   New   notessession   
  Dim   db   As   notesdatabase   
  Dim   docTmp   As   NotesDocument   
  Dim   GetServerDate   as   String   
  Dim   dateTime   As   New   NotesDateTime(   ""   )   
    
  Set   db   =   session.CurrentDatabase   
  Set   docTmp   =   db.CreateDocument   
    
  Set   dateTime   =   New   NotesDateTime(docTmp.Created)   
  GetServerDate   =   Format(dateTime.DateOnly,"yyyy-mm-dd")

但是遇到一个问题,当更改本机时间后,获取的服务器时间就会发生错误,

该如何正常稳定地获取服务器时间呢,请高手指点! --------------------编程问答-------------------- 确认你的代码在服务器端运行,然后新建文档,取文档的创建时间,那就是服务器时间, --------------------编程问答-------------------- 试试:
Dim vntTime as variant
vntTime = Evaluate({@Now([ServerTime]:[LocalTimeOnError])})
GetServerDate = Format(vntTime(0),"yyyy-mm-dd")
--------------------编程问答-------------------- 我是通过客户端访问服务器,应用程序是在服务器,那创建的文档应是在服务器创建的 --------------------编程问答-------------------- 2楼的我试过不行,如果将本地时间改掉的话,获取的时间就会不对 --------------------编程问答--------------------
引用 1 楼 feifan2002 的回复:
确认你的代码在服务器端运行,然后新建文档,取文档的创建时间,那就是服务器时间,

---我们就是通过这种方式实现的 --------------------编程问答-------------------- 你如果更改本地时间,之后获取服务器时间也对的吗?

我的代码是在服务器上运行的,如果不更改本地时间是可以实现的,但是更改本地时间之后获取的服务器时间就不对! --------------------编程问答-------------------- 自己关注先 --------------------编程问答-------------------- 改取文档的LastAccessed属性 --------------------编程问答-------------------- 取文档建立时间比较保险 --------------------编程问答-------------------- 要不试试db.Created
--------------------编程问答-------------------- @Now( flags ; serverNames )
Note  The flags and serverNames parameters are new with Release 6.
Parameters
flags
Keyword or keyword list. Optional.
[SERVERTIME] gets the time-date from the server containing the database if serverNames is not specified or from serverNames ifserverNames is specified.
[LOCALTIMEONERROR] gets the time-date from the local computer if an error occurs getting it from a specified server.
serverNames
Text or text list. Optional. A server name or a list of server names. This parameter applies when [SERVERTIME] is specified. --------------------编程问答-------------------- 你如果更改本地时间,之后获取服务器时间就不对,那估计是Domino/Notes的Bug, 试试升级一下小版本,看是否解决,以前有同事给IBM报过这个Bug.
--------------------编程问答-------------------- 请注意版本,在R8以前,只能通过创建文档的方式去服务器当前时间;在R8以后@Now做了扩展,可以直接取服务器时间了。 --------------------编程问答-------------------- LS真是好人~~
补充:企业软件 ,  Lotus
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,