请教高手

BOOL CTypingTestApp::InitInstance()
{
 int ScrWidth=GetSystemMetrics(SM_CXSCREEN);
 if(ScrWidth<1024)
 {
  MessageBox(NULL,"本软件运行在屏幕分辨率高于1024*768以上","出错信息",MB_OK);
  ExitProcess(EXIT_FAILURE);
  return FALSE;
 }
 //COM库初始化
 if(!AfxOleInit())
 {
  AfxMessageBox("初始化COM库失败");
  return FALSE;
 }
 //创建Connection对象
 HRESULT hr;
 try
 {
  hr=m_pConnection.CreateInstance("ADODB.Connection");
  if(SUCCEEDED(hr))
  {
   CHAR HD[]="Provider=Microsoft.Jet.OLEDB.6.0;Data Source=User.mdb;Persist security info=FALSE;Jet OLEDB:Database Password=815815";
   hr=m_pConnection->Open(HD," "," ",adModeUnknown);
   //连接数据库
   //上面一句中连接字符串中的Provider是针对ACCESS2000环境的
   //对于ACCESS97，需要改为：provider=Microsoft.Jet.OLEDB.3.51;
  }
 }
 catch(_com_error e)
 {
  CString errormessage;
  errormessage.Format("连接数据库失败！/r/n错误信息:%s",e.ErrorMessage());
  AfxMessageBox(errormessage);//显示错误信息
  return false;
  //创建connection对象的代码完
 }
 //4.2.5登录系统
 CLoginDlg LoginDlg;
 if(LoginDlg.DoModal()==IDOK)
 {
  m_lUserRight=LoginDlg.m_lUserRight;//转存权限
  m_strUserName=LoginDlg.m_strUserName;//转存用户名
  m_strUserID=LoginDlg.m_strUserID;//转存用户标识ID
 }
 else
 {
  return false;
 }

程序执行时总是出现Unknown error 0x800AOE7A

我链接的是access 2003

用的是VC++6.0

请哪位高手帮忙解决一下谢谢!