连接Access数据库运行异常
OOL Cconnect::ODBCConnect(CString strDBFile)
{
CString strConnect;
strConnect.Format(_T("ODBC;DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)};UID=;PWD=;DBQ=%s"), strDBFile);
CDatabase db;
if(db.Open(NULL, FALSE, FALSE,strConnect))
{
//连接数据库成功
CRecordset rs(&db);
CString strSql;
strSql = _T("SELECT * FROM info"); //SQL语句
rs.Open(CRecordset::snapshot, strSql); //执行Sql语句(可添加 删除 查询等)
// rs.Open(AFX_DAO_USE_DEFAULT_TYPE,strSql,NULL);
if(rs.IsOpen())
{
CDBVariant variant;
rs.MoveFirst();
while(!rs.IsEOF())
{
//读取记录
rs.GetFieldValue(_T("姓名"), variant);
rs.MoveNext();
}
rs.Close();
}
db.Close();
return TRUE;
}
return FALSE;