ADP еще раз про дату

pizdyanki
Дата: 25.11.2009 11:07:11
проблема с форматом даты в системе на ADP 2007 + mssql 2005. Прога должна работать с офисом на английском и русском языках. Во всех запросах и dlookup где в коде работаю с датой возникают ошибки.

русский понимает Format$(Date, "dd\/mm\/yyyy")

английский Format$(Date, "yyyy\/mm\/dd")


пробовал уже миллион вариантов
Replace(Format$(Date, "dd/mm/yyyy"), ".", "/", 1) - не работает
currentproject.accessconnection.execute (....where convert(varchar,Tdate,104)='"(Format$(Date, "dd.mm.yyy") & "'... работает в запросах, а как сделать в dlookup не знаю

спасибо
VladimirKr
Дата: 25.11.2009 11:10:20
pizdyanki
проблема с форматом даты в системе на ADP 2007 + mssql 2005. Прога должна работать с офисом на английском и русском языках. Во всех запросах и dlookup где в коде работаю с датой возникают ошибки.

русский понимает Format$(Date, "dd\/mm\/yyyy")

английский Format$(Date, "yyyy\/mm\/dd")


пробовал уже миллион вариантов
Replace(Format$(Date, "dd/mm/yyyy"), ".", "/", 1) - не работает
currentproject.accessconnection.execute (....where convert(varchar,Tdate,104)='"(Format$(Date, "dd.mm.yyy") & "'... работает в запросах, а как сделать в dlookup не знаю

спасибо


Для MSSQL универсальный формат даты: 'yyyymmdd'. Этот формат понятен ему при любых региональных установках. см ФАК на MS SQL форуме
pizdyanki
Дата: 25.11.2009 11:16:35
VladimirKr,
CurrentProject.AccessConnection.Execute("select * from currency where Tdate='" & Format$(Date, "yyyyddmm") не пашет на русском офисе

если бы все было так просто
VladimirKr
Дата: 25.11.2009 11:23:30
pizdyanki
VladimirKr,
CurrentProject.AccessConnection.Execute("select * from currency where Tdate='" & Format$(Date, "yyyyddmm") не пашет на русском офисе

если бы все было так просто


Блин, не yyyymmdd - это 8-значное целое число, а 'ууууmmdd' - 8-символьная строка
pizdyanki
Дата: 25.11.2009 11:25:25
pizdyanki
VladimirKr,
CurrentProject.AccessConnection.Execute("select * from currency where Tdate='" & Format$(Date, "yyyyddmm") '" не пашет на русском офисе

если бы все было так просто


там такой код, так что это стринг
Ёжик`
Дата: 25.11.2009 11:26:42
CurrentProject.Connection.Execute("select * from currency where Tdate=" & Format(Date, " 'yyyyddmm' ")
aleks2
Дата: 25.11.2009 11:27:42
pizdyanki,

Все станет просто, если вы привыкнете передавать дату - датой, а НЕ строкой.
Ёжик`
Дата: 25.11.2009 11:28:02
УПС 'yyyymmdd'
CurrentProject.Connection.Execute("select * from currency where Tdate=" & Format(Date, " 'yyyymmdd' ")
pizdyanki
Дата: 25.11.2009 11:35:29
aleks2,

расскажите как плз

Модератор: Автор забанен за нецензурный ник.