2016-08-03 7 views
1

Q1Использование ISO 8601 даты в MS Access

Есть ли способ, чтобы справиться с ISO 8601 даты в MS Access. Мне нужно иметь возможность использовать дату: 2010-05-31T06: 00: 00 в коде VBA. Кроме того, я должен быть в состоянии принять 5/31/10 6:00 утра и положить в другой формат

Q2

Я спасаю Дата & Время в NoSQL базе данных (например, Firebase), а также будет извлекать данные и отметку времени. Следовательно, нужна функция, которая конвертирует обратно и вперед между данными данных доступа & и датами ISO 8601.

+0

Этот вид я ответил на вопросы будет лучше всего подходит для [документации] (http://stackoverflow.com/documentation/vba/topics) – litelite

+1

I надеялся, что это поможет пользователям искать ответы (как и я). Но, похоже, SO пользователям это не понравилось. –

+0

@litelite, документация по-прежнему находится в бета-версии. –

ответ

3

Создайте модуль и вставьте код ниже. Эти функции могут быть вызваны в любой из форм/Модули

'ISO to Access 
Public Function DtIsoToAccess(myisodate as String) as date 
DtIsotoaccess=cdate(Replace(myisodate, "T"," ")) 
End function 

'Access to ISO 
Public Function DtAccessToIso(myaccdate as Date) as string 
DtAccessToIso= format(myaccdate, "yyyy-mm-dd\Thh:nn:ss") 
End function 
+1

Обратите внимание, что этот код не учитывает «TZD» (обозначение часового пояса), как в '2017-11-13T21: 42: 30.000 + 03: 00' (' +03: 00'). См. Https://www.w3.org/TR/NOTE-datetime. – paulroho

Смежные вопросы