作者:乔山办公网日期:
返回目录:excel表格制作
CDatabase database;
CString sDriver = _T("MICROSOFT EXCEL DRIVER (*.XLS)"); // Excel安装驱动
CString sSql;
CString sFileName;
CFileDialog fDlg(false, _T("xls"), NULL,OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, _T("xls File (*.xls)|*.xls|"),NULL);
if(fDlg.DoModal()==IDOK)
{
sFileName = fDlg.GetPathName();
}
else
{
return false;
}
try
{
// 创建进行存取的字符串
sSql.Format(_T("DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=%s;DBQ=%s"),sDriver, sFileName, sFileName);
// 创建数据库 (既Excel表格文件)
if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
{
// 创建表结构
sSql = _T("create table 数据管理(序号e69da5e6ba90e79fa5e98193361 int,分公司 char(10),时间 char(10))");
CMySqlite mysql;
database.ExecuteSQL(sSql);
for (int i = 0;i < countDMflase;i++)
{
sSql.Format(_T("INSERT INTO 数据管理(序号,分公司,时间) VALUES(%d,'%s','%s')"),xx,xx,xx);
database.ExecuteSQL(sSql);
}
}
// 关闭数据库
database.Close();
AfxMessageBox(_T("数据导出成功!"));
}
catch( _com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}