get exception while accessing date field

[vhrao]

I am trying to acess oracle data and transfer it to access. I am checking date field and if not NULL then I try to generate sqlupdate string, but I get exception (0x80020009) in the follwing line:
sqlupdate = sqlupdate & "'"& OraRec("CURHIREDATE") &"'" &", "

I don't know how to fix this in vb. can someone help?

Here is the code:

set AccDb=server.CreateObject("Adodb.connection")
set Oradb=server.CreateObject("Adodb.connection")
set AccRec=server.createobject("ADODB.Recordset")
set OraRec=server.createobject("ADODB.Recordset")
Application("EmpMasterAccessDB")="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=\DBProjects\EmpMaster\ EmpMasterCopy.mdb"
Application("Oracle_HR")= "DSN=Oracle_HLTP;User ID=myUID;Password=myPWD;"
Oradb.Open Application("Oracle_HR")
OraRec.Open "select * from EMPMASTER", Oradb
AccDb.Open Application("EmpMasterAccessDB")
Do While Not OraRec.EOF
If IsNull(OraRec("CURHIREDATE")) = False Then 
sqlupdate = sqlupdate & "CurrentHiredate="
sqlupdate = sqlupdate & "'"& OraRec("CURHIREDATE") &"'" &", " 
orarec.MoveNext
else
Response.Write "NULL"
orarec.MoveNext
End If
loop
AccDb.Close

[jhardman]

what does this give you:

response.write OraRec("CURHIREDATE")

Jared