Cleric84
Well-known member
- 03.01.2008
- 599
- 0
Всем привет.
столкнулся с траблм. есть функция с помощю которой узнаем серверное время
	
	
	
	
		
но например сегодня сотруднику возвратилось 23,11,2011..... на сервере все ок.
как быть?
				
			столкнулся с траблм. есть функция с помощю которой узнаем серверное время
		Код:
	
	Function GetNowServer() As Variant
Dim ass As New NotesSession
GetNowServer = Now
If ass.IsOnServer Then Exit Function
Dim aNow As Variant	
aNow=Evaluate({@Now([ServerTime]:[LocalTimeOnError];@Name([CN];@ServerName))})
If Isarray(aNow) Then
GetNowServer =aNow(0)
Else
GetNowServer =aNow
End If
End Functionно например сегодня сотруднику возвратилось 23,11,2011..... на сервере все ок.
как быть?
 
	 
	 
	 
	 
	 
 
		 
 
		 
 
		
 
 
		 
 
		 
 
		 
 
		 
 
		 
	