MFC ADO代码

CoInitialize(NULL);//初始化COM库

	HRESULT hr = NULL;  //HRESULT hr = E_FAIL;// S_OK, S_FALSE, E_FAIL;  
	pConn.CreateInstance(__uuidof(Connection));
	pRst.CreateInstance(__uuidof(Recordset));
	try
	{
		hr = pConn->Open("Provider=SQLNCLI10.1;Data Source=127.0.0.1,1433", "sa", "123456", adConnectUnspecified);
		pConn->DefaultDatabase = "testdb";
		//int state = m_pConnection->State;
		if (!SUCCEEDED(hr)) {
			MessageBox(L"数据库连接创建失败");
		}
		else
		{

			_bstr_t sql = "select * from t_users";
			long p;
			_variant_t ra;
			pRst = pConn->Execute(sql, NULL, adCmdText);
			//CString result;
			while (!pRst->adoEOF)
			{
				//result.Append((_bstr_t)(pRst->GetCollect("uname")));
				((CListBox *)GetDlgItem(IDC_LIST_USERS))->AddString((_bstr_t)(pRst->GetCollect("uname")));

				pRst->MoveNext();
			}


			//pRst->get_RecordCount(&p);

		}
	}
	catch (_com_error& e)
	{
		pRst->Close();
		pConn->Close();

		//dump_com_error(e);
		MessageBox(e.ErrorMessage());
		CoUninitialize();//卸载COM库
	}