向List Control中添加ACCESS数据内容

最新推荐文章于 2019-11-19 16:39:21 发布

imxiangzi

最新推荐文章于 2019-11-19 16:39:21 发布

阅读量2.5k

点赞数

分类专栏： C&C++/MFC

C&C++/MFC 专栏收录该内容

60 篇文章 1 订阅

订阅专栏

转：

给List Control 添加变量tt

加入引入ADO使用智能指针
#import "c:\program files\common files\system\ado\msado15.dll"no_namespace \rename ("EOF", "adoEOF")rename ("BOF", "adoBOF")

添加几个全局变量
   RecordsetPtr vb;
   _ConnectionPtr zhu;
   CString xm,dz,yb;

在*.cpp文件中寻找

BOOL CDfApp::InitInstance()
{

AfxOleInit(); // <---添加,初始化COM
AfxEnableControlContainer();

   //在窗体初始化事件中加入
      tt.ModifyStyle(0L,LVS_REPORT);
      tt.ModifyStyle(0L,LVS_SINGLESEL);
      tt.ModifyStyle(0L,LVS_SHOWSELALWAYS);
      tt.ModifyStyle(0L,LVS_NOSORTHEADER);
      tt.SetExtendedStyle(LVS_EX_GRIDLINES);   //以上这些地方为设置List Control属性和风格
      tt.InsertColumn(0,"姓名");    //以下这些设置列和它们的长度
      tt.InsertColumn(1,"地址");
      tt.InsertColumn(2,"邮编");
      tt.SetColumnWidth(0,100);
      tt.SetColumnWidth(1,100);
      tt.SetColumnWidth(2,100);

      zhu=NULL;
      zhu.CreateInstance(__uuidof(Connection));
      zhu->ConnectionString="uid=;pwd=;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=zhu.mdb;";

      //连接字符串
      zhu->Open(L"",L"",L"",adCmdUnspecified);      //打开连接
      _bstr_t ha="select * from zrn";    //查询ZRN表里的数据
      vb=zhu->Execute(ha,NULL,adCmdText);   //获取记录集
      int i=0;
      while(!vb->adoEOF)
      {
         xm=(char*)(_bstr_t)vb->GetCollect("xm");    //xm,dz,yb 分别为你自己数据库的列名
         dz=(char*)(_bstr_t)vb->GetCollect("dz");     //把这一记录中数据库里dz列下的值给字符串dz
         yb=(char*)(_bstr_t)vb->GetCollect("yb");
         tt.InsertItem(i,"");
         tt.SetItemText(i,0,xm);     //添加到list Control 中的第i行的第一列下
         tt.SetItemText(i,1,dz);     //添加到list Control 中的第i行的第二列下
         tt.SetItemText(i,2,yb);   //添加到list Control 中的第i行的第三列下
         i+=1;   //下次循环指向第2行
         vb->MoveNext();   //移动到下一个记录
     }
     vb->Close();   //关闭记录集指针
     zhu->Close(); //关闭数据库连接
     vb=NULL;
     zhu=NULL;
     ::CoUninitialize(); 收回COM

自己：

读取数据库中内容输出到List Control里：

定义 CListCtrl m_ShowAdmin;

BOOL CSHOW::OnInitDialog()
{
CDialog::OnInitDialog();

// TODO: Add extra initialization here
//获取原风格属性
DWORD dwStyle = m_ShowAdmin.GetExtendedStyle();
//添加CheckBox、整行选中、表格线属性
dwStyle |= LVS_EX_FULLROWSELECT |LVS_EX_GRIDLINES;
//设置新属性到控件
m_ShowAdmin.SetExtendedStyle( dwStyle );

m_ShowAdmin.InsertColumn(0,"用户名",LVCFMT_CENTER,80,0);
m_ShowAdmin.InsertColumn(1,"密码",LVCFMT_CENTER,80,1);

_variant_t Sqlq="select * from Admin";
theApp.ADOExecute(theApp.m_pRs,Sqlq);
theApp.m_pRs->MoveFirst();
int i=0;
while(!theApp.m_pRs->adoEOF)
{
CString s1=(char*)(_bstr_t)theApp.m_pRs->GetCollect("Admin_User");

CString s2=(char*)(_bstr_t)theApp.m_pRs->GetCollect("Admin_Password

  m_ShowAdmin.InsertItem(i,"");
  m_ShowAdmin.SetItemText(i,0,s1);
  m_ShowAdmin.SetItemText(i,1,s2);
  i+=1;
  theApp.m_pRs->MoveNext();
}

return TRUE; // return TRUE unless you set the focus to a control
// EXCEPTION: OCX Property Pages should return FALSE
}