Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Подскажите, где ошибка! / 5 сообщений из 5, страница 1 из 1
01.03.2004, 17:34
    #32426856
lizadr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите, где ошибка!
Есть запрос к базе даных. При проверке в SQL+ запрос вызвращает данные, а при запросе из VB відает что не одой записи не обнаруженно.

Dim rsAudit As ADODB.Recordset
Set rsAudit = New ADODB.Recordset
rsAudit.ActiveConnection = cn_AIS
rsAudit.CursorType = adOpenStatic
rsAudit.CursorLocation = adUseClient
ssql = "select ais_audit.t31nach_sum.otd from ais_audit.t31perev, ais_audit.t31nach_sum "
ssql = ssql & "where ais_audit.t31perev.kod='" & Me.txtFind.Text & "' and ais_audit.t31perev.id_rez=ais_audit.t31nach_sum.id_rez "
ssql = ssql & " and (ais_audit.t31perev.type=100 or ais_audit.t31perev.type =1100 or (ais_audit.t31perev.type >1200 and ais_audit.t31perev.type<1300))"
ssql = ssql & " and ais_audit.t31perev.d_check='" & MaxDate & "' " 'group by ais_audit.t31nach_sum.otd "
rsAudit.Open ssql
rsAudit.MoveFirst

Все переменные содержат значения. Подскажите где ошибка.
...
Рейтинг: 0 / 0
01.03.2004, 17:38
    #32426863
Дмитрий Валуев
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите, где ошибка!
Возможно дело в преобразовании даты. Дату лучше передавать через параметры ADO команды или попробуйте в американском формате.
...
Рейтинг: 0 / 0
01.03.2004, 17:45
    #32426881
lizadr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите, где ошибка!
Дело в том что значение MAXDate я получаю из предыдущего запроса, поэтому преобразовать ее к Американскому формату - проблематично. А как передать через параметры ADO команды
...
Рейтинг: 0 / 0
01.03.2004, 17:46
    #32426884
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите, где ошибка!
Чтобы помочь самому себе, напиши простой (!) запрос к стандартной БД Northwind и прогони его через Query Analizer и VB.
Этот эксперимент подскажет, кто виноват.
А затем, если ошибка не найдена, звони во все колокола с исходником:
Код: plaintext
1.
Sub...
End Sub
Тогда тебе быстрее помогут в поиске "кто виноват".

> Все переменные содержат значения
Ох, сама не верю я
В эти суеверия...
...
Рейтинг: 0 / 0
01.03.2004, 17:56
    #32426901
lizadr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите, где ошибка!
Спасибо разобрался. Проблема действительно была с форматом даты, и после того как в запросе указал d_check=to_date('" & MaxDate & "','dd-mm-yyyy') все заработало!
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Подскажите, где ошибка! / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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