ReSQL.ru
     
powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBS/VBA сравнение дат и времени
6 сообщений из 6, страница 1 из 1
VBS/VBA сравнение дат и времени
    #39641894
strQwerty
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
strQwerty
Участник
Доброго времени суток!
Друзья, встала тут резкая необходимость своять скрипт на VBS, отлаживаю из под VBA в Excel и вот час уже злюсь.
Ситуация таково, есть две даты

dtStart = "08.05.2018 12:51:00"
dtEnd = "08.05.2018 12:56:59"

мне же их нужно сравнить с 3-ей датой, как то так

Код: vbnet
1.
2.
3.
If oFile.DateCreated >= dtStart And oFile.DateCreated <= dtEnd Then
            ' бла бла бла
End If



как это провернуть более ли менее красиво в VBS?
Спасибо!
...
Рейтинг: 0 / 0
08.05.2018, 11:22
| Ответить | Цитировать | Написать  
VBS/VBA сравнение дат и времени
    #39641909
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
strQwerty,
Наверное, так:
Код: vbnet
1.
If oFile.DateCreated >= CDate(dtStart) And oFile.DateCreated <= CDate(dtEnd) Then


Только надо еще убедиться, что DateCreated возвращает тип Date
...
Рейтинг: 0 / 0
08.05.2018, 11:31
| Ответить | Цитировать | Написать  
VBS/VBA сравнение дат и времени
    #39641910
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Явно конвертировать в тип Date, используя функцию CDate():
Код: vbnet
1.
2.
dtStart = CDate("08.05.2018 12:51:00")
dtEnd = CDate("08.05.2018 12:56:59")


После чего сравнивать:
Код: vbnet
1.
2.
3.
If dtStart <= oFile.DateCreated And oFile.DateCreated <= dtEnd Then
            ' бла бла бла
End If
...
Рейтинг: 0 / 0
08.05.2018, 11:32
| Ответить | Цитировать | Написать  
VBS/VBA сравнение дат и времени
    #39641915
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
The_Pristубедиться, что DateCreated возвращает тип DateСудя по именам объекта и свойства, oFile - это FSO.File. Так что тут проблемы быть не должно.
...
Рейтинг: 0 / 0
08.05.2018, 11:34
| Ответить | Цитировать | Написать  
VBS/VBA сравнение дат и времени
    #39641944
strQwerty
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
strQwerty
Участник
The_Prist, спасибо! все отработало как надо !
...
Рейтинг: 0 / 0
08.05.2018, 12:22
| Ответить | Цитировать | Написать  
VBS/VBA сравнение дат и времени
    #39641945
strQwerty
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
strQwerty
Участник
Akina,
так и есть, спасибо за помощь )!
...
Рейтинг: 0 / 0
08.05.2018, 12:23
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VBS/VBA сравнение дат и времени
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=39641909&tid=2172340]:
 0ms
get settings:
 9ms
get forum list:
 11ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 30ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 39ms
get tp. blocked users:
 1ms
others: 10ms
total:  119ms
созд. / загр.: 119ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]