_CommandPtr指针执行存储过程参数有关问题

_CommandPtr指针执行存储过程参数问题
用_CommandPtr指针执行一个存储过程，能不能先初始化一个_ParameterPtr类型的值，Append到_CommandPtr对象之后，再来修改
此参数值，代码如下：
自己测试了下，老是崩溃，不知道问题出在哪，请各位技术帝给看看

C/C++ code

_CommandPtr pCommand;pCommand.CreateInstance(__uuidof(Command));pCommand->CommandText = "proc_EventLog";pCommand->CommandType = adCmdStoredProc;_ParameterPtr partype = pCommand->CreateParameter("type", adBSTR, adParamInput, 255, _variant_t(""));_ParameterPtr partime = pCommand->CreateParameter("time", adDate, adParamInput, 255, _variant_t(""));_ParameterPtr parname = pCommand->CreateParameter("name", adBSTR, adParamInput, 255, _variant_t(""));_ParameterPtr parEvent1 = pCommand->CreateParameter("event1", adBSTR, adParamInput, 255, _variant_t(""));_ParameterPtr parEvent2 = pCommand->CreateParameter("event2", adBSTR, adParamInput, 255, _variant_t(""));pCommand->Parameters->Append(partype);pCommand->Parameters->Append(partime);pCommand->Parameters->Append(parname);pCommand->Parameters->Append(parEvent1);pCommand->Parameters->Append(parEvent2);do something...._variant_t vType("type"),    vUser("user"),    vTime("2011-02-02 02:02:02"),    vName("name"),    vEvent("1");pCommand->Parameters->Item["@type"]->Value = vType;pCommand->Parameters->Item["@time"]->Value = vTime;pCommand->Parameters->Item["@name"]->Value = vName;pCommand->Parameters->Item["@event1"]->Value = vUser;pCommand->Parameters->Item["@event2"]->Value = vEvent;