ADO向SQLSERVER2008写入日期类型出错

下面是构造的日期参数。。。
//添加COleDateTime参数
void CAdoDB::PutParamDateTime(string key, COleDateTime value)
{
_variant_t var;
var.ChangeType(VT_DATE);
var.date = value.m_dt;
_ParameterPtr pParam = m_pCommand->CreateParameter(key.c_str(),adDate,adParamInput,0,var);
m_pCommand->Parameters->Append(pParam);
}
数据库中对应列的类型是datetime类型。
异常描述:[Microsoft][ODBC SQL Server Driver]没有执行可选特性。
求解！我怀疑是CreateParameter中参数问题

检查下参数的类型，你数据库的类型和你程序的类型是否兼容。
http://bbs.csdn.net/topics/25908