Изменить Timezone

deeeman

Well-Known Member
04.12.2007
383
0
#1
Привет всем!

есть поле, в нем значение типа DateTime:

23.05.2011 15:00:00 ZE6


нужно при сохранении сделать его таким:

23.05.2011 15:00:00 ZE3

т е просто поменять зону без изменении времяни.
Делаю:

Код:
Dim item As NotesItem
Dim dt As NotesDateTime

Set item = Source.Document.GetFirstItem("STARTDATETIME")
Set dt = item.DateTimeValue

Call dt.ConvertToZone(-3,False)

Call Source.Document.ReplaceItemValue("STARTDATETIME",dt)
Call Source.Document.Save(True,True)
но результата не дает. Меняем и время и зону.
Подскажите как надо?
 

deeeman

Well-Known Member
04.12.2007
383
0
#3
а если я не знаю что было Z6? может Z5 будет...

мне надо всегда чтобы было Z3

Call dt.AdjustHour(+3) уже не проканает
 

morpheus

скриптописец
07.08.2006
3 915
1
#4
deeeman
почему не канает , если у dt есть свойство TimeZone - где видно зону
 

Kizarek86

Well-Known Member
Lotus team
20.07.2007
861
6
#5
Ну так определите какая текущая временная зона (DT.TimeZone), и вычислите разницу)
 

lmike

нет, пердело совершенство
Lotus team
27.08.2008
6 483
360
#6
клиент кажет в текущей TZ
а что по результату нужно получить-то, чем не устроила таймзона, кот. есть?