1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
|
CDocument* pDoc = GetDocument();
//pDC->TextOut(10,10,"ZoneListe");
CDaoDatabase m_db;
CDaoRecordset * m_set ;
COleVariant m_var ;
m_db.Open ( "bd1.mdb" );
MessageBox("c bon",NULL,MB_OK);
m_set = new CDaoRecordset ( &m_db ) ;
m_set -> Open ( dbOpenDynaset, "SELECT * FROM base_hydrants WHERE Identification=ALL-0001" ) ;
CString m_str;
m_set -> GetFieldValue ( "Identification", m_var ) ;
m_str = ( LPCSTR ) m_var.bstrVal;
MessageBox(m_str,NULL,MB_OK);
pDC->TextOut(10,10,m_str);
m_db.Close(); |
Partager