辅导:VC6.0数据库编程之MFCODBC
来源:优易学  2011-10-22 9:30:33   【优易学:中国教育考试门户网】   资料下载   IT书店
  #include "stdafx.h" #include "stdio.h"
  #include "windows.h"
  #include "string.h"
  #import "C:\Program Files\Common Files\System\ado\msado20.tlb" no_namespace rename("EOF", "adoEOF")
  HRESULT ComInit();
  int APIENTRY WinMain(HINSTANCE hInstance,
  HINSTANCE hPrevInstance,
  LPSTR lpCmdLine,
  int nCmdShow)
  {
  _ConnectionPtr pCn;
  _RecordsetPtr pRs;
  _variant_t vtEmpty;
  _variant_t vRsinfo;
  long ccc;
  char jj[255];
  int j;
  ComInit();
  pCn.CreateInstance(__uuidof(Connection));
  pRs.CreateInstance(__uuidof(Recordset));
  pCn->Open("DRIVER={Microsoft Access Driver (*.mdb)};DBQ=C:\\VcADO\\users.mdb","","",-1);
  if(pCn->State==0){
  MessageBox(0,"连接数据库失败。","连接失败",MB_OK);
  }else{
  vtEmpty="select * from 用户信息表";
  pRs->Open(vtEmpty, pCn.GetInterfacePtr(),adOpenStatic,adLockOptimistic,adCmdText);
  ccc=pRs->RecordCount;
  if(ccc>=1){
  vRsinfo=pRs->Fields->GetItem("姓名")->GetValue();
  j=sprintf(jj,"查询到:%s",(char*)(_bstr_t)vRsinfo);
  MessageBox(0,jj,"查询成功",MB_OK);
  pRs->Close();
  }else{
  MessageBox(0,"没有查询到数据.","查询失败",MB_OK);
  }
  pCn->Close();
  }
  return 0;
  }
  //青年人网站提示: COM 使用时初始化
  HRESULT ComInit()
  {
  HRESULT hr = S_OK; // 默认返回值
  if FAILED(CoInitialize(NULL)) // COM 初始化调用
  {
  CoUninitialize();
  hr = E_UNEXPECTED;
  }
  return hr;
  }

责任编辑:小草

文章搜索:
 相关文章
热点资讯
资讯快报
热门课程培训