vb .net使用OracleCommand.ExecuteNoquery insert请教

需求把另一个数据库查询结果的DataSet insert到Oracle资料库。DataSet包含有eqp_status, eqp_status_time，seq, seq_recipe等栏位。insert语句采用Batch方式，部分代码如下：
'SQL：
insert into table_a(status, eqp_status_time，seq, seq_recipe) values(:pStatus, :pEqpStatusTime, :pSeq, :pSeqRecipe)

'设定SQL Parameter:
For i = 0 To intQuery - 1
drRow = dsNotExistEqpInfo.Tables(0).Rows(i)
objParam(0) = New DataBase.SqlParameter("pEqpStatus", CStr(drRow.Item("eqp_status")))
objParam(1) = New DataBase.SqlParameter("pEqpStatusTime", CType(drRow.Item("eqp_status_time"), Date))
objParam(2) = New DataBase.SqlParameter("pSeq", CType(drRow.Item("seq"), Integer))
objParam(3) = New DataBase.SqlParameter("pSeqRecipe", CType(drRow.Item("seq_recipe"), Integer))

Me.OraclePis2Connection.ExecuteNonQuery(strSql, objParam)
Next

'打印出来的SQL语句：
INSERT INTO C_EQP_EQPX (eqp_status, eqp_status_time, seq, seq_recipe) VALUES ('RUN', 'RUN'Time, '0', '0'Recipe)
如上SQL语句中的加粗字体，CType(drRow.Item("eqp_status_time"), Date)='2010/01/01'，但insert语句中值却为'RUN'Time，即CStr(drRow.Item("eqp_status"))+Time，请问大家有遇到过这个问题吗？



{{--