如何在COM将数据库中的BLOB字段VARIANT类型转为SAFEARRAY(unsigned char)*

Question

[id(0x60030002)]
        HRESULT EncodeArr(
                        [in, out] SAFEARRAY(unsigned char)* bytInput, 
                        [out, retval] BSTR* );
上面是我的IDL描述方法，如何用VC在客户端如何调用，bytInput参数如何输入，现在我已经从数据库中取出了VARIANT变量，向把他转为SAFEARRAY，传送到COM SERVER,如何？谢谢
long lDataSize = spRs->GetFields()->GetItem(long(0))->ActualSize;///µÃµ½
VARIANT bin= spRs->GetFields()->GetItem(i)->GetChunk(lDataSize);SAFEARRAY* byt = NULL;
将bin　　转为　byt 呀