1 Тема от MikeSh

  • MikeSh
  • Разработчик
  • Неактивен

Тема: VBS (JS) : DateValue("Jan 16, 2016")

Добрый день.
Проблема такая. Есть текстовый файл, в котором даты типа "Jan 16, 2016"

DateValue("Jan 16, 2016") 'возвращает ошибку,
DateValue("Янв 16, 2016") '- работает корректно.

Сейчас решаю проблему через Replace, но может быть существует более элегантное решение?

"Единство,- возвестил оракул наших дней: -
Быть может спаяно железом лишь и кровью"…
Но мы попробуем спаять его любовью,-
А там увидим, что прочней…    (Ф. Тютчев)       Тут хорошая справка по vbs.

2 Ответ от YMP

  • YMP
  • Разработчик
  • Неактивен

Re: VBS (JS) : DateValue("Jan 16, 2016")

Можно локаль переключать.


SetLocale &H409
MsgBox DateValue("Jan 16, 2016") 'возвращает ошибку,
SetLocale &H419
MsgBox DateValue("Янв 16, 2016") '- работает корректно.
DynamicWrapperX
+ MikeSh

3 Ответ от MikeSh

  • MikeSh
  • Разработчик
  • Неактивен

Re: VBS (JS) : DateValue("Jan 16, 2016")

Это будет глобальное переключение или только внутри скрипта?

"Единство,- возвестил оракул наших дней: -
Быть может спаяно железом лишь и кровью"…
Но мы попробуем спаять его любовью,-
А там увидим, что прочней…    (Ф. Тютчев)       Тут хорошая справка по vbs.

4 Ответ от YMP

  • YMP
  • Разработчик
  • Неактивен

Re: VBS (JS) : DateValue("Jan 16, 2016")

Для данного скрипта.

DynamicWrapperX

5 Ответ от MikeSh (изменено: MikeSh, 2016-01-28 14:46:24)

  • MikeSh
  • Разработчик
  • Неактивен

Re: VBS (JS) : DateValue("Jan 16, 2016")

Спасибо
Теперь это выглядит так:

SetLocale &H409
d = DateValue(Date409)
SetLocale &H419
msgbox DateValue(d)
"Единство,- возвестил оракул наших дней: -
Быть может спаяно железом лишь и кровью"…
Но мы попробуем спаять его любовью,-
А там увидим, что прочней…    (Ф. Тютчев)       Тут хорошая справка по vbs.