请贴一下在VC++中用代码直接创建一个Access *.mdb文件的代码(不需建立数据源)
用vc创建.xls文件的代码如下,
CDatabase database;
CString sDriver = "MICROSOFT EXCEL DRIVER (*.XLS)"; // exactly the same
// name as in the ODBC-Manager
CString sExcelFile = "e:\\test.xls"; // Filename and path for
//the file to be created
CString sSql;
TRY
{
// Build the creation string for access without DSN
sSql.Format("DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s",
sDriver, sExcelFile, sExcelFile);
// Create the database (i.e. Excel sheet)
if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
{
// Create table structure
sSql = "CREATE TABLE demo (Name TEXT,Age NUMBER)";
database.ExecuteSQL(sSql);
// Insert data
sSql = "INSERT INTO demo (Name,Age) VALUES ('Bruno Brutalinsky',45)";
database.ExecuteSQL(sSql);
}
// Close database
database.Close();
}
CATCH_ALL(e)
{
TRACE1("Driver not installed: %s",sDriver);
}
END_CATCH_ALL;
问题点数:100、回复次数:7Top
1 楼Q_O()回复于 2002-05-28 22:00:10 得分 0
用DaoTop
2 楼tigerVC(Tiger.Z)回复于 2002-05-28 22:10:42 得分 10
CString strSQL;
TRY
{
strSQL = "DROP TABLE consumer";
m_database.ExecuteSQL(strSQL);
}
CATCH(CDBException,e)
{
}
END_CATCH
strSQL ="CREATE TABLE consumer(";
CString str;
str="";
AddCol(str,"account char(20) NOT NULL");
AddCol(str,"name char(15) NOT NULL");
AddCol(str,"accounttype tinyint NOT NULL");
AddCol(str,"deput char(15)");
AddCol(str,"sealcount tinyint");
AddCol(str,"create_date datetime NOT NULL");
AddCol(str,"begindate datetime NOT NULL");
AddCol(str,"depart_id char(10) NOT NULL");
AddCol(str,"telephone char(20)");
AddCol(str,"address char(50)");
AddCol(str,"state tinyint NOT NULL");
strSQL +=str; strSQL +=')';
TRY
{
m_database.ExecuteSQL(strSQL);
}
CATCH(CDBException,e)
{
m_wPrompt="数据库表Consumer表建立失败!";
UpdateData(FALSE);
return FALSE;
}
END_CATCH
strSQL = "ALTER TABLE consumer ADD CONSTRAINT PK_accounts PRIMARY KEY CLUSTERED(account)";
TRY
{
m_database.ExecuteSQL(strSQL);
}
CATCH(CDBException,e)
{
m_wPrompt="数据库表Consumer表主键建立失败!";
UpdateData(FALSE);
return FALSE;
}Top
3 楼small_wei(small)回复于 2002-05-28 22:11:07 得分 30
CDaoDatabase db;
db.Create("c:\\vod.mdb");
Top
4 楼srg777(小人物)回复于 2002-05-28 23:15:10 得分 30
原码:
http://webdiy.org/srg/soft/code_Srg1.0.zip
其他:
http://webdiy.org/srg/other/soft.htm
Top
5 楼zdhe(zdhe)回复于 2002-05-29 00:31:58 得分 0
up.Top
6 楼Richuen22(Vista)回复于 2002-05-29 00:35:20 得分 0
同small_wei(small)Top
7 楼mryinliang(海崖)回复于 2002-05-29 00:35:45 得分 30
用ADOXTop




