高分求助：ado访问db中文编码

create procedure sp_person1(@a integer,@b varchar(50),@d varchar(100) output)

as

select id,name,@b as 'other' from person1 where id=@a

set @d='存储过程'

go

m_pParam1=pCommand->CreateParameter("a",adInteger,adParamInput,-1,(_variant_t)"1");

pCommand->Parameters->Append(m_pParam1);

m_pParam2=pCommand->CreateParameter("b",adVarChar,adParamInput,50,(_variant_t)L"中文");

pCommand->Parameters->Append(m_pParam2);

m_pParam3=pCommand->CreateParameter("d",adVarChar,adParamOutput,100);

pCommand->Parameters->Append(m_pParam3);

int id = 0;

_variant_t var;

int name=0;

_bstr_t other;

			

var = pRs->GetCollect(_variant_t("id"));

var.ChangeType(VT_I2);

id = var.iVal;



var = pRs->GetCollect(_variant_t("name"));

var.ChangeType(VT_I2);

name=var.iVal;



var = pRs->GetCollect(_variant_t("other"));

other=_bstr_t(var);

			

wprintf(L"%d\t%d\t%s\r\n", id, name,other.GetBSTR());