|
|
ARX中直接读取数据库一例[br]ARX中直接读取数据库一例
本版版主 void ReadData()
{
//假设这是为了给全局变量设值,//
//所有的值来源于数据库
/////////////////////////open database
_ConnectionPtr m_pConnection;
HRESULT hr;
try
--{
hr = m_pConnection.CreateInstance("ADODB.Connection");//Connection对象
if(SUCCEEDED(hr))
---- {
hr =m_pConnection->Open("rovider=Microsoft.Jet.OLEDB.4.0;DataSource=d:\\cadit\\sysdatac.mdb","","",adModeUnknown);//数据库,office2000
}
--}
catch(_com_error e)///捕捉异常
--{
CString errormessage;
errormessage.Format("连接数据库失败!\r\n错误信息:%s",e.ErrorMessage());
AfxMessageBox(errormessage);///显示错误信息
return;
--}
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected=(long)0;
m_pRecordset = m_pConnection->Execute("SELECT * FROM sys",&RecordsAffected,adCmdText);//sys为表的名字
//上面的代码是打开数据库并获得记
_variant_t vCount0;
_variant_t vCount1;
CString vStr0,vStr1,textin;//第一列和第二列的值
if(!m_pRecordset->adoEOF)///
{
vCount1 = m_pRecordset->GetCollect((long)1);///取得第Count1变量
---- jhline=vCount1.dblVal ;
vCount1 = m_pRecordset->GetCollect((long)2);///取得第Count1变量
---- jhtexthigh=vCount1.dblVal ;
vCount1 = m_pRecordset->GetCollect((long)3);///取得第Count1变量
---- mxtexthigh=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)4);///取得第Count1变量
---- mxtabhigh=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)6);
---- L1=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)7);
---- L2=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)8);
---- L3=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)9);
---- L4=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)10);
---- L5=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)11);
---- L6=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)12);
---- L7=vCount1.dblVal ;
---- vCount1 = m_pRecordset->GetCollect((long)13);
---- L8=vCount1.dblVal ;
}
m_pRecordset->Close();///关闭记录集
m_pConnection->Close();///关闭数据库连接
}
----
作者： goldenshin 时间：2001-11-08.21:24:20 |
|
置顶卡
