请问如何用vc调用paradox数据库 急！

Question

怎么用vc调用paradox数据库，请各位大虾指教！

Answer 1

_ConnectionPtr m_pDb;
CString connectsource;
connectsource.Format(L"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s\shared;Extended Properties=Paradox 5.x;Persist Security Info=False",strCTRSRoute);
 try  //检查数据库连接是否正常
 {
  m_pDb.CreateInstance(__uuidof(Connection));
  m_pDb->ConnectionTimeout=10;
  m_pDb->CommandTimeout=20;
  if(m_pDb->State!=adStateClosed)
  {
   m_pDb->Close();
   m_pDb->Open((_bstr_t)connectsource,"","",adModeUnknown);   
  }
  else   
  {
   hr=m_pDb->Open((_bstr_t)connectsource,"","",adModeUnknown);
  }
 }
 catch(_com_error e) //捕捉异常
 {
  LogAdoErrorImport(m_pDb);  
 }
上面这段代码为什么不行呀？