ado putcollect的问题

Question

1.往一整形字段写值
_variant_t var;
var.intVal=2;
m_pRS->PutCollect("移站序号",&var);
这样写抛出异常，如何解决
2.access数据库一个字段为是否
_variant_t var;
var.boolVal=true;
m_pRS->PutCollect("粗差",&var);
这样写通过不了，
请求支援，谢谢

Answer 1

var.vt 没有设置，
解决办法1：
_variant_t var;
var.vt = VT_I2;
var.intVal=2;
m_pRS->PutCollect("移站序号",var);_variant_t var;
var.vt = VT_BOOL;
var.boolVal=true;
m_pRS->PutCollect("粗差",&var);解决办法2：
m_pRS->PutCollect("移站序号", 2);m_pRS->PutCollect("粗差", true);