Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Подправьте код пожалуста: / 9 сообщений из 9, страница 1 из 1
28.05.2004, 15:36
    #32539111
Лёшик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
Я блин тут кодик попробовал написать может кто подправит:
strSQL10 = "select * FROM data where time(time2) <= #" & Format(Me.Текст6.Text, "hh:MM:ss") & "#"
Короче ошибку дает и все.
...
Рейтинг: 0 / 0
28.05.2004, 15:49
    #32539152
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
Format(Me.Текст6.Text, "hh:MM:ss")

hh - часы
mm - месяц
ss - секунды

так попробуй
Format(Me.Текст6.Text, "hh:nn:ss")
...
Рейтинг: 0 / 0
28.05.2004, 16:00
    #32539182
Alviga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
автор
strSQL10 = "select * FROM data where time(time2) <= #" & Format(Me.Текст6.Text, "hh:MM:ss") & "#"

А что за функция такая Time ?
Какая информация храниться у Вас в поле Time2 (тип) ?
Может в данном случае проще будеи сравнивать разность этих значений с 0 ?
...
Рейтинг: 0 / 0
28.05.2004, 16:01
    #32539188
Лёшик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
не работает. Блин короче вот мой код
Текст6.Text = Time
Метка8.Visible = True
Текст6.Visible = True
' код касающийся даты
Dim rs10 As Recordset
Dim strSQL10 As String
strSQL10 = "select * FROM data where timevalue(time2) <= #" & Format(Me.Текст6.Text, "hh:nn:ss") & "#"
Set rs10 = data7.Database.OpenRecordset(strSQL10)
Set Me.data7.Recordset = rs10
выделяет строку:
Set rs10 = data7.Database.OpenRecordset(strSQL10)

и пишет гадость типа data tupe mismatch in criteria expression
...
Рейтинг: 0 / 0
28.05.2004, 16:04
    #32539195
Лёшик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
у меня в поле time2 и time1 стоит значение дата и время.
Но ячейка time2 пустая. Вот если она пустаю, то должно выполняться условие, если заполненна то не выполнятся. А в ячейке время находится.
...
Рейтинг: 0 / 0
28.05.2004, 16:13
    #32539226
Alviga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
1. Сравнивать дату нужно тоже с датой, но никак со временем. Следовательно ко времени нужно добавить дату, какую это уже тебе решать исходя из условия задачи.
2. Добавь в запрос еще одно условие где проверяется пустое поле или нет
Where ..... OR time2 = NULL (точно можно посмотреть в хелпе по аксу)
и тогда у тебя будут выбираться строчки где time2 пустое
...
Рейтинг: 0 / 0
28.05.2004, 16:24
    #32539262
Лёшик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
А причем тут дата? У меня текст6.text = Time
Поле time2 = Time
...
Рейтинг: 0 / 0
28.05.2004, 16:26
    #32539266
Лёшик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
Отлично, все работает. Спасибо
...
Рейтинг: 0 / 0
28.05.2004, 16:33
    #32539282
Alviga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подправьте код пожалуста:
SELECT *
FROM tblUsers where gfdgfd <= Format('20:20:00', "hh:mm:ss") OR isNULL(gfdgfd);

попробуй создать запрос в аксе.
Вот это работает.
Так что тебе нужно только передать время как строчку и все.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Подправьте код пожалуста: / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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