Inserting VB6 date variables in Oracle 8i date fields

[Palmero]

See the following attached code to give me an idea on how to insert VB date variables in Oracle V8i date fields.

Dim start_time As Date
Dim end_time As Date
Dim Return_code as integer

start_time = Now()
Return_code = My_proc(Transaction, response, err)
end_time = Now()

duration = DateDiff("s", start_time, end_time)


QSQL = "Update MY_TABLE set duration=" & duration & ",start_time='" & start_time & "',end_time='" & end_time & "'"
Set Squery = Cn.CreateQuery("", QSQL)
Squery.Execute


THE UPDATE DOES NOT WORK.
I have the execution error : 40002
S1000:[Oracle][ODBC][Ora]ORA-01830


Thanks in advance for your idea.

Palmero

 

[jackg]

use the to_date function.
set start_time = to_date('&start_time','ddmmyy')
if you want the time as well then add hhmiss