Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как в VBA текст в дату преобразовать?? / 22 сообщений из 22, страница 1 из 1
03.03.2004, 15:09
    #32429667
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
всем привет!

т.е собственно делаю селект и надо в условии where написать поле dt (тип дата) больше введенного юзером текста (например, '14.01.2004')

как мне это сделать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2004, 15:17
    #32429690
funddd
funddd
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
Где введенного?

можно сделать просто так:

where dt>[Введите дату]

только, если там юзер фигню будет писать, то надо подумать о приведении фигни в формат даты
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2004, 15:19
    #32429696
Лох Позорный
Лох Позорный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
http://www.sql.ru/faq/faq_topic.aspx?fid=157
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2004, 16:49
    #32429873
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
все понял надо делать так
Код: plaintext
1.
2.
3.
4.
5.
Dim q As Date
q = Now
strSQL =  "SELECT * "  _
  &  "FROM Table "  _
  &  "WHERE (((Table.Quanty)=#"  & Format(q,  "mm/dd/yy hh:mm:ss" ) &  "#));"


а что значит #
???

cорри за ламерские вопросы, просто, это все что надо сделать, а глобально изучать ms access из-за этого вломы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2004, 16:56
    #32429890
Kelme
Kelme
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
авторчто значит # ?
Признак даты это
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2004, 17:38
    #32429984
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
thanks
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2004, 18:53
    #32430140
CtrlAlt
CtrlAlt
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
Можно еще DateValue попробовать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.03.2004, 23:43
    #32430314
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
Между прочим, вопрос был про преобразование текста в дату, а ответ, приведенный самим автором вопроса, - про преобразование даты в текст.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 12:27
    #32430953
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
точно ложанулся
кто-нибудь может подсказать что не так???

пользователеь вводит на одной форме условия поиска (дату в формате dd.mm.yyyy), при нажатии кнопки поиск формируется условие, которое передается в другую форму

при запуске акцес выдает ошибку "синтаксическая ошибка и выдает текст из этого участка кода".

вот код сам код


Код: plaintext
1.
2.
3.
4.
  
If Not IsNull(Me![Родился_с]) Then
       stLinkCriteria = stLinkCriteria &  "AND ([Дата рождения] >= #Format('" & Me![Родился_с] & "','dd.mm.yyyy')#)" 
End If
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 12:32
    #32430966
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
найди пять отличий

=#" & Format(q, "mm/dd/yy hh:mm:ss") & "#));"
=#Format('" & Me![Родился_с] & "','dd.mm.yyyy')#)"

Сделать можно всё!!!
Только бы знать как...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 12:52
    #32431039
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
отличий дофига
в упор не въезжаю в преобразование типов

в моем случа Me![Родился_с] обычный текст вида dd.mm.yyyy, который надо преобразовать к виду, чтобы акцес воспринимал его как дату, т.е в каком-нибудь оракле я написал бы так

Код: plaintext
field >= to_date(текстовая переменная, 'dd.mm.yyyy')


как вот это сделать в msaccess???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 13:03
    #32431066
funddd
funddd
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
"AND ([Дата рождения] >= #" & Format(Me![Родился_с],'dd.mm.yyyy') & "#)"

обрати внимание на расставление кавычек.

ты подставляешь Аксу что-то в знаках ##, а это что-то предварительно форматируешь как mm/dd/yyyy.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 13:03
    #32431067
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
дело в том что Format - это ф-я, но она Аксессная, а для выполнения запроса тебе надо вставить результат это ф-ии, а не её тело, т.к. в Jet SQL нет такой ф-ии и по этому её в твоём случае следует записать следующим образом:
Код: plaintext
>=# " & Format(Me![Родился_с],'dd.mm.yyyy') & " #

Сделать можно всё!!!
Только бы знать как...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 13:26
    #32431128
magic'2k
magic'2k
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
Интересно...
а почему все формат используют... а разве нельзя так написать?

strSQL = "Select * From Таблица Where [Дата_рожд] =CDate('" & Me.date_of_birth.Value & "')"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 13:52
    #32431198
funddd
funddd
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
А разве в JetSQL есть CDate?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 14:18
    #32431266
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
а может у меня что-то с региональными настройками??? (указан формат даты dd.MM.yyyy разделитель точка
или я как-то неправильно создал таблицу???

из приведенного кода работает только последний

Код: plaintext
1.
2.
3.
4.
5.
     
>=# " & Format("  22 . 01 . 1981  ", " mm/dd/yyyy ") & " #
>=# " & Format("  22 . 01 . 1981  ", " dd/mm/yyyy ") & " #
>=# " & ("  22 / 01 / 1981  ") & " #)  < ---- работает


на все остальные выдает ошибку
"Дата содержит синтаксическую ошибку в выражении запроса '[Дата рождения]>=#22.01.1981#'"

псли писать так
Код: plaintext
>=# " & Format(Me![Родился_с],'dd.mm.yyyy') & " #

то выдает ошибку на одинарные ковычки
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 14:22
    #32431279
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
попробуй >=#" & Format("22.01.1981", "dd\/mm\/yyyy") & "#


Сделать можно всё!!!
Только бы знать как...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 14:32
    #32431301
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
выдает ошибку
"Дата содержит синтаксическую ошибку в выражении запроса '[Дата рождения]>=#22V01V1981#'"

блин, не реплэйсом же все точки на слэш менять:)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 14:52
    #32431358
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
покажика выражение целиком, и как/откуда запускаешь запрос

Сделать можно всё!!!
Только бы знать как...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 15:24
    #32431435
Simon
Simon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
всем спасибо
помог такой вариат

Dim q as Date

q = Me![Родился_с]
stLinkCriteria = stLinkCriteria & "([Дата рождения] >= CDate(""" & CStr(q) & """)) AND "
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 15:40
    #32431459
incold
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
Вывод:
Используйте параметризированные запросы, тогда не будет заморочек с преобразованием типов.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.03.2004, 15:43
    #32431468
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в VBA текст в дату преобразовать??
ну ты мозги то пудрил... я ж для WHERE писал а не для критерия...

Сделать можно всё!!!
Только бы знать как...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как в VBA текст в дату преобразовать?? / 22 сообщений из 22, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 435ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1676284]:
 0ms
get settings:
 10ms
get forum list:
 16ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 83ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 66ms
get tp. blocked users:
 2ms
others: 236ms
total:  435ms
x
x
Закрыть


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