вызов функции БД

[lord0n]

Коллеги, доброго времени суток.
Возник такой вопрос: мне нужно вызвать функцию оракли из адо
То есть например мне нужно вызвать 'sysdate' примерно вот так:

Код: Выделить всё


RS.Field("Date1").Value = "sysdate"
RS.Update


Проблема в том что она считает что я пытаюсь запихнуть в поле типа дата строковое значение. Ну и естественно выдает ошибку.

Может есть какой-нибуть способ это сделать не прибегая к команде update или insert, а именно через field рекордсета?

[GSerg]

Выполнить отдельно select sysdate, полученное значение вписать именно в field рекордсета...

[lord0n]

Выполнить отдельно select sysdate, полученное значение вписать именно в field рекордсета...

блин, не додумался)))))))))))))))))))
спасибо огромное

[lord0n]

теперь другая трабла:
при получении результата адо переводит его в формат даты который установлен у меня на машине
а мне нужно в формате оракла
собственно ради этого все и затевалось

преобразовать с помощью Format не катит, т.к. у клиента может установлен свой формат даты в оракле

[GSerg]

А нефиг путать дату со сторовым представлением даты.
Я почему-то уверен, что sysdate вернёт adDate. И записывать её можно напрямую.
А если ты работаешь со строковым представлением, а не с датой, то ты сам себе злобный буратино.

[lord0n]

А нефиг путать дату со сторовым представлением даты.
Я почему-то уверен, что sysdate вернёт adDate. И записывать её можно напрямую.
А если ты работаешь со строковым представлением, а не с датой, то ты сам себе злобный буратино.

хех, а как мне её на прямую записать?
у системы свой формат, у оракла свой
если я объявлю переменную как дата, то тоже дохлый номер: переведет в системную.
а апдейтом пользоваться не хочу((((((((((((((((((

[GSerg]

Смысл приведённого текста уловлен не был.

Куда "напрямую записать"?
Какой "системный формат"?

[lord0n]

Смысл приведённого текста уловлен не был.

Куда "напрямую записать"?
Какой "системный формат"?

смысл такой: мне нужно используя стандартные операторы АДО, вставить в таблицу Оракла текущую дату и время, при этом не прибегая к оператору VB Format и не используя SQL команд типа Update и Insert

что то из серии:

Код: Выделить всё


RS.Open("select sysdate, rownum from test.""Field1"" where rownum = 1")

Dim a As String = RS.Field("sysdate").Value
RS.Close

RS.Open("select DATE1 from test.""Field1""")
RS.AddNew()
RS.Field("DATE1").Value = a
RS.Update()


[GSerg]

Почему не dim a as date?

[lord0n]

Почему не dim a as date?

как ни странно, но работает)))))))))))))))))
но это тоже не выход: отставание от реального времени = 1-2 секунды
а если сервак хорошенько нагрузить, то будет больше

[GSerg]

А чего ты хотел? Только так.
Ну или Now, но тебе оно не нравится.

[lord0n]

А чего ты хотел? Только так.
Ну или Now, но тебе оно не нравится.

нау мне нравится, но её нужно преобразовать в формат оракла, а по скольку у разных клиентов может быть по разному настроен формат даты, то придется для каждого делать изменения в программе, а это не есть гуд

[GSerg]

Ыыы.........
То есть ты даже после того как объявил a as date, всё равно не узрел разницу между датой и её строковым представлением?

[lord0n]

Ыыы.........
То есть ты даже после того как объявил a as date, всё равно не узрел разницу между датой и её строковым представлением?

все въехал
извиняюсь за тупизм, что то я вчера тормозил))))))))))))))))
пасибки)))))))))))))))))))