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