VC6.0 ado 连 access 编译通过,运行SQL语句时出错!

直接上代码吧
  CString strSql="select hhdz_code.name,hhdz_area.id,hhdz_area.name,ip,createDate,status \
from hhdz_area,hhdz_code,hhdz_password \
where [hhdz_area.id]=[hhdz_code.areaId] \
and [hhdz_code.name]=[hhdz_password.name]";
    BSTR bstrSQL = strSql.AllocSysString();
    m_pRecordset->Open(bstrSQL,(IDispatch*)m_pConnection,
        adOpenDynamic, adLockOptimistic, adCmdText);
m_pRecordset->MoveFirst();
while (!m_pRecordset->adoEOF)
{
_variant_t TheValue;
TheValue = m_pRecordset->GetCollect("hhdz_code.name");
if (TheValue.vt != VT_NULL)
{
CString str;
str.Format("%s", (char*)_bstr_t(TheValue.bstrVal));
m_List.InsertItem(nRow, str);
m_List.SetItemText(nRow, 0, str);
}
TheValue = m_pRecordset->GetCollect("hhdz_area.id");
if (TheValue.vt != VT_NULL)
{
CString str;
str.Format("%s", (char*)_bstr_t(TheValue.bstrVal));
m_List.SetItemText(nRow, 1, str);
}

代码中,这行红色字体,运行中出错,而把hhdz_area.id换成其它hhdz_area.name,ip,createDate,status 都是对的
hhdz_code.name为hhdz_code表的主键,而hhdz_area.id为hhdz_area表的主键.

先谢谢啦.

---

OK,解决,方法1还是出错,方法2OK.谢谢
保留字