void main()
{
	CDatabase cdbMyDB;
	cdbMyDB.Open("New Excel Data Source");
	cdbMyDB.ExecuteSQL("CREATE TABLE mydata (FirstName TEXT,LastName TEXT)"); 
	cdbMyDB.ExecuteSQL("INSERT INTO mydata (FirstName,LastName) VALUES('Kaev','Artem');");
	cdbMyDB.Close(); 
}


void CAaaDlg::OnButton1() 
{

	CDatabase cdbMyDB;
	try
	{
		cdbMyDB.Open("kord");
		if (cdbMyDB.IsOpen())
   	    
		{
AfxMessageBox(cdbMyDB.GetConnect()); 		
CRecordset cr; //(NULL);
cr.m_pDatabase=&cdbMyDB;
try
{
	cr.Open(CRecordset::forwardOnly,"SELECT * FROM system", CRecordset::readOnly); 
	Grid.Datasource=cr;
	cr.Close(); 
}
catch(CDBException cdb)
{
	AfxMessageBox(cdb.m_strStateNativeOrigin);
}		
		
		}

		else
			AfxMessageBox("Not Open");

		cdbMyDB.Close();
	}
	catch(...)
	{
		AfxMessageBox("Error Open DNS");
	}
	

}