❶ 如何将C语言的输出倒入Excel工作表
可以先用C语言格式化输出为EXCEL可以导入的文本文件，再使用EXCEL手工导入。具体导入方法可参阅《往Excel中导入TXT文本数据的三种方法》：http://tech.sina.com.cn/s/2006-05-12/1042934532.shtml
这种方法最简单, 但自动化程度低, 不能集成到你的C程序中去.
如果用C/C++创建EXCEL, 可以使用ADO或者ODBC.
如果用C++/ODBC, 可参阅《直接通过ODBC读写Excel表格文件》：http://www.vckbase.com/document/viewdoc/?id=421
还有《针对Excel表格文件操作的编程实现》：http://www.vckbase.com/document/viewdoc/?id=693
如果你的程序是用C++写的, 推荐使用以上方法.
如果用C/ODBC, 稍微麻烦一点。我以前写过一个，好像是根据一个C++的类改写成C的, 时间太长, 记不得出处了. 现在给你做参考：
三个接口函数:
OpenExcel(): 创建或打开Excel文件的一个工作表
AppendExcel(): 向工作表中加入数据记录
CloseExcel(): 结束处理
main()中示例的是建立test.xls文件, 其中两个工作表. 我这里源程序用VC6.0编译, 得到的结果在Excel 2003中可以使用.
#include <windows.h>
#include <sqlext.h>
#include <stdio.h>
#ifdef _MSC_VER
#pragma comment(lib,"odbc32.lib")
#define SQLLEN SQLINTEGER
#endif
enum errtype { ERRORFREE, ERRACTION, XLSBUSY, TXTBUSY, TXTOPENERROR,
SQLHANDLEENVERROR, SQLSETENVERROR, SQLHANDLEDBCERROR,
SQLCONNECTERROR, SQLALLOCSTMTERROR, SQLCREATEERROR,
SQLSELECTERROR, SQLBINDERROR } ;
SQLHENV henv;
SQLHDBC hdbc;
SQLHSTMT hstmt;
// ------------------------------------------------------------------------------------------------------------
static void dbError( LPSTR lp, SQLSMALLINT handleType, SQLHANDLE handle)
{
BYTE buf[250], sqlstate[15];
SQLGetDiagRec( handleType,handle, 1, sqlstate, NULL,buf, sizeof(buf),NULL);
fprintf(stderr, "%s: %s SQLSTATE=%s\n",lp, buf, sqlstate);
}
// ------------------------------------------------------------------------------------------------------------
static void dbCleanup()
{
if (hstmt != SQL_NULL_HANDLE) {
SQLFreeStmt(hstmt, SQL_UNBIND);
SQLFreeHandle(SQL_HANDLE_STMT,hstmt);
}
if (hdbc != SQL_NULL_HANDLE) {
SQLDisconnect(hdbc);
SQLFreeHandle(SQL_HANDLE_DBC,hdbc);
}
if (henv != SQL_NULL_HANDLE) SQLFreeHandle(SQL_HANDLE_ENV,henv);
}
// ------------------------------------------------------------------------------------------------------------
static void dbErrorCleanup( LPSTR lp,SQLSMALLINT handleType, SQLHENV henv,SQLHDBC hdbc,SQLHSTMT hstmt)
{
SQLHANDLE handle;
switch (handleType) {
case SQL_HANDLE_STMT:
handle = hstmt;
break;
case SQL_HANDLE_DBC:
handle = hdbc;
break;
default:
handle = henv;
}
if (handle != SQL_NULL_HANDLE) dbError( lp, handleType, handle );
dbCleanup(henv, hdbc, hstmt );
}
//---------------------------------------------------------
static BOOL isFileOpen(const BYTE *fileName)
{
HANDLE hFile;
// 以非共享方式打开文件. 检查EXCEL文件当前是否在使用中...........
hFile = CreateFile(fileName,GENERIC_READ,0,NULL,OPEN_EXISTING,0,NULL);
if (hFile == INVALID_HANDLE_VALUE) {
if (GetLastError() == ERROR_SHARING_VIOLATION) return TRUE; // 使用中
else return FALSE; // 未使用中,或者无此文件(现在可以创建)
} else {
CloseHandle(hFile);
return FALSE;
}
}
int OpenExcel(BYTE *szExcelName, BYTE *szSheetName, BYTE *szFieldName[], BYTE *szFieldType[], int nColCount)
{
SQLRETURN retcode;
BYTE szSql[512], *pszSql=szSql;
BYTE szdatabase[256];
int rc, i;
henv = hdbc = hstmt = SQL_NULL_HANDLE;
if ( isFileOpen(szExcelName) ) return XLSBUSY;
// 准备环境 -------------------
retcode = SQLAllocHandle(SQL_HANDLE_ENV, SQL_NULL_HANDLE, &henv);
if (retcode != SQL_SUCCESS) {
dbErrorCleanup( "SQLAllocHandle(ENV)",SQL_HANDLE_ENV,henv,hdbc,hstmt);
return SQLHANDLEENVERROR;
}
retcode = SQLSetEnvAttr(henv,SQL_ATTR_ODBC_VERSION, (SQLPOINTER) SQL_OV_ODBC3,0);
if (retcode != SQL_SUCCESS) {
dbErrorCleanup( "SQLSetEnvAttr()",SQL_HANDLE_ENV,henv,hdbc,hstmt);
return SQLSETENVERROR;
}
retcode = SQLAllocHandle(SQL_HANDLE_DBC, henv, &hdbc);
if (retcode != SQL_SUCCESS) {
dbErrorCleanup( "SQLAllocHandle(DBC)",SQL_HANDLE_ENV,henv,hdbc,hstmt);
return SQLHANDLEDBCERROR;
}
// 与数据库建立连接 ------------------
sprintf(szdatabase,"DRIVER=Microsoft Excel Driver (*.xls);CREATE_DB=%s;DBQ=%s;READONLY=FALSE;EXCLUSIVE=Yes;",
szExcelName, szExcelName);
//fprintf(stderr, "DATABASE: %s\n", szdatabase);
retcode = SQLDriverConnect(hdbc, NULL, (SQLCHAR *)szdatabase, (short) (strlen(szdatabase)+1), NULL, 0, NULL, SQL_DRIVER_NOPROMPT);
if (retcode != SQL_SUCCESS && retcode != SQL_SUCCESS_WITH_INFO) {
dbErrorCleanup( "SQLDriverConnect()",SQL_HANDLE_DBC,henv,hdbc,hstmt);
return SQLCONNECTERROR;
}
retcode = SQLAllocHandle(SQL_HANDLE_STMT,hdbc, &hstmt);
if (retcode != SQL_SUCCESS) {
dbErrorCleanup( "SQLAllocHandle(STMT)",SQL_HANDLE_DBC,henv,hdbc,hstmt);
return SQLALLOCSTMTERROR;
}
// 构造执行 CREATE TABLE 语句 ----------------------
pszSql = szSql + sprintf(szSql, "CREATE TABLE %s (", szSheetName);
for (i=0; i<nColCount; ++i) {
if (i) *pszSql++ = ',';
pszSql += sprintf(pszSql, "%s %s", szFieldName[i], szFieldType[i]);
}
*pszSql++ = ')';
*pszSql = '\0';
//fprintf(stderr, "STATEMENT: [%s]\n", szSql);
retcode = SQLExecDirect(hstmt, szSql, SQL_NTS);
if (retcode != SQL_SUCCESS) {
SQLCHAR sqlState[15];
SQLGetDiagField( SQL_HANDLE_STMT, hstmt,1,SQL_DIAG_SQLSTATE,sqlState,sizeof(sqlState),NULL);
if ( lstrcmpiA(sqlState,"42S01") != 0 ) { // Already existing...
dbErrorCleanup( " SQLExecDirect()",SQL_HANDLE_STMT,henv,hdbc,hstmt);
return SQLCREATEERROR;
}
}
return 0;
}
int AppendExcel(BYTE *szSheetName, BYTE *szFieldName[], int nColCount, BYTE *szData)
{
int i, rc;
BYTE szSql[512], *s, *p, *d, *psz;
//构造 INSERT INTO 语句 --------------------------------
psz = szSql + sprintf(szSql, "INSERT INTO %s (", szSheetName);
for (i=0; i<nColCount; ++i) {
if (i) *psz++ = ',';
psz += sprintf(psz, "%s", szFieldName[i]);
}
psz += sprintf(psz, ") VALUES (%s)", szData);
//fprintf(stderr, "STATEMENT: %s\n", szSql);
rc = (int) SQLExecDirect(hstmt, szSql, SQL_NTS);
if (rc != SQL_SUCCESS) {
dbError( " SQLExecDirect()",SQL_HANDLE_STMT,hstmt);
}
return rc;
}
void CloseExcel()
{
//fprintf(stderr, "CleanUp: henv=%08X; hdbc=%08X, hstmt=%08X.\n", henv, hdbc, hstmt);
dbCleanup();
}
//------------------ Test data ---------------------------------------
static BYTE szExcelName[] = "Test.xls"; // Excel 文件名
static BYTE szSheetNameA[] = "名单"; // 工作表名
static BYTE *szFieldNameA[] = { "姓名", "年龄" }; // 字段名
static BYTE *szFieldTypeA[] = { "TEXT", "NUMBER" }; // 字段类型
static BYTE szSheetNameB[] = "日程"; // 工作表名
static BYTE *szFieldNameB[] = { "日期", "时间", "安排" }; // 字段名
static BYTE *szFieldTypeB[] = { "TEXT", "TEXT", "TEXT" }; // 字段类型
int main()
{
if (OpenExcel(szExcelName, szSheetNameA, szFieldNameA, szFieldTypeA, 2)==0)
{
AppendExcel(szSheetNameA, szFieldNameA, 2, "'张三',33");
AppendExcel(szSheetNameA, szFieldNameA, 2, "'李四',44");
printf("Excel文件[%s]中的工作表[%s] 操作成功.\n", szExcelName, szSheetNameA);
CloseExcel();
}
if (OpenExcel(szExcelName, szSheetNameB, szFieldNameB, szFieldTypeB, 3)==0)
{
AppendExcel(szSheetNameB, szFieldNameB, 3, "'五月三日','18:00','饭局'");
printf("Excel文件[%s]中的工作表[%s] 操作成功.\n", szExcelName, szSheetNameB);
CloseExcel();
}
printf(" ----- 完了.");
return 0;
}
---------------------------------------
有关函数的调用参数：
int OpenExcel( //成功：返回0
BYTE *szExcelName, //Excel文件名
BYTE *szSheetName, //工作表名
BYTE *szFieldName[], //字段名（数组）
BYTE *szFieldType[], //字段类型（数组）
int nColCount) //字段数
int AppendExcel( //成功：返回0
BYTE *szSheetName, //工作表名
BYTE *szFieldName[], //字段名（数组）
int nColCount, //字段数
BYTE *szData) //数据字串
如使用图形界面，可把#include <stdio.h> 去掉， printf/fprintf 改为用 MessageBox 提供必要的输出信息或干脆删掉。
❷ 连天可汗都敢骗还在决斗里杀死唐将，细说唐代初征西北遗事
简介：阿史那斛勃是东突厥汗室近支，东突厥颉利可汗灭亡后他不肯向唐朝归降而是选择了向北逃亡。伴随着贞观二十年薛延陀汗国的败亡，在蒙古高原地区各部落出现了一股面向唐朝的“ ”归降”热潮。李世民先后派出两股人马招抚乙注车鼻可汗阿史那斛勃，却都没有成功。李世民是否甘心于此？还是下更大的一盘棋？ 大唐贞观二十一年四月初十日（西元647年5月19日），朝廷在今内蒙古中部成立燕然都护府，并任命李素立为首任燕然都护，以作为统辖帝国北部羁縻领土瀚海等六府七州的上级机关。如前所述，燕然都护府的初始建制是六个羁縻都督府加七个羁縻州，其中六个都督府代表归降的铁勒十三部当中较大的六个部落集团，七个州则是分别各自由一个较小的部落构成。几个月之后，由于骨利干部落的加入，成立了第八个羁縻州，即玄阙州（位于今俄罗斯联邦贝加尔湖以北的勒拿河流域一带）。到贞观二十二年二月，结骨部（黠戛斯）俟利发失钵屈阿栈率部入朝受封，随后朝廷以此为契机，成立了第七个羁縻都督府——坚昆都督府（位于今俄罗斯联邦安加拉河、叶尼塞河流域一带）。一个月之后，原先隶属于瀚海都督府的俱罗勃部被分出来单独设置为第九个羁縻州烛龙州（大致位于今俄罗斯联邦石勒喀河流域）。贞观二十二年六月，又从原白霫部的寘颜州中分离出白霫别部设置了第十个羁縻州居延州（治所约在今内蒙古东部的东乌珠穆沁旗、巴林左旗一带）。这样一来，燕然都护府下属就变成七个羁縻都督府加十个羁縻州总计十七个府州单位，统治面积则高达数百万平方公里。截至李世民去世时的贞观二十三年五月，燕然都护府编制内大致就是这样的规模。 ▲唐太宗时疆域图，图片来源 Wikimedia Commons。 ▲隋朝时东西突厥地图，图片来源 Wikimedia Commons。 ▲唐代各都护府分布，图片来源网络。 不过安西都护府与燕然都护府之间当时并没有实现无缝衔接。因为还存在着一点小麻烦——在今阿尔泰山脉以北的地区，依然活跃着一股既不属于西突厥也不属于铁勒——回纥诸部控制下的势力——就是以前我们在讲解东突厥灭亡过程时候提到过的东突厥残余：乙注车鼻可汗阿史那斛勃部。 ▲安西都护府，图片来源网络。 阿史那斛勃是东突厥汗室近支，东突厥颉利可汗灭亡后他不肯向唐朝归降而是选择了向北逃亡。当时蒙古高原薛延陀势力鼎盛，铁勒诸部不接受突厥人的统治，因此阿史那斛勃无力称汗，最初只得依附于薛延陀势力。但是双方矛盾很快爆发，阿史那斛勃想借鸡生蛋、壮大实力，薛延陀人则想着如何吞并这些突厥残余，因此就差点发生了火并。最后阿史那斛勃只好率领部众向西逃亡。当时薛延陀的势力的基本盘大致在今蒙古国戈壁阿尔泰省东部及其以东的巴彦洪戈尔、前后杭爱省等地区，而在阿史那斛勃的率领下，突厥车鼻部最后在阿尔泰山以北大致相当于今蒙古国西部的科布多省、巴彦乌列盖省及乌布苏省一带安顿定居下来。斛勃将牙帐建在乌布苏湖盆地一带，开始养精蓄锐积攒力量，经过若干年的努力，终于把势力扩充到“ ”胜兵三万人”的规模（估计部落总人口十五万左右）。 ▲影视剧颉利可汗形象，图片来源网络。 ▲在唐朝与突厥之战中，颉利可汗大败，被阿史那忠生擒，押送至长安。阿史那忠后成为唐朝着名将领，图为其墓壁画，来源Wikimedia Commons。 ▲乌布苏湖，图片来源Wikimedia Commons。 ▲突厥武士复原图，图片来源网络。 薛延陀真珠可汗后期把主要精力集中于南下争夺阴山南北的草原地带，而且其北部可能受到回纥等部落的压力，因此对于远涉千里跨过大漠的西征行动心有余而力不足，也就只好坐看阿史那斛勃势力的壮大。 阿史那斛勃积聚部落恢复到一定元气，于是建号自称乙注车鼻可汗，并积极寻求向外扩张。当时西突厥忙于内战，对于活动在阿尔泰山脉及额尔齐斯河流域的葛逻禄部落疏于控制，于是乙注车鼻可汗向西吞并了在额尔齐斯河流域中上游活动的部分葛逻禄部落，又向北扩展势力，跨过唐努乌拉山控制了唐努乌梁海（今俄罗斯联邦图瓦共和国）及其以北的叶尼塞河流域部分地区（当时为结骨部落（也就是后世的黠戛斯）驻地）。乙注车鼻部与薛延陀处于敌对的状态，所以趁着薛延陀部注意力南下的机会经常劫掠薛延陀的西北边境以壮大自己。 ▲唐努乌梁海（今俄罗斯联邦图瓦共和国），图片来源网络。 伴随着贞观二十年薛延陀汗国的败亡，在蒙古高原地区各部落出现了一股面向唐朝的“ ”归降”热潮，乙注车鼻可汗也派遣他的儿子沙钵罗特勤为使者追随着这股潮流于贞观二十一年来到长安。或许车鼻可汗只是想来探探朝廷的风向，但是对于这些送上门的土地人口，李世民却已经惦记上了。他先后派出将军郭广敬（郭子仪家族的先人，郭子仪的某个四世再从堂伯祖，他的老爹郭弘道担任过隋朝的同州刺史、郜国公，爷爷郭徽则担任过西魏的同州司马，可不要小瞧他爷爷的这个在后世看来不起眼的履历噢，因为这正是他们家发达的原因之所在——同州在西魏时代是宇文泰的霸府驻地，是西魏政权的军政中枢（地位类似于东魏的晋阳），而且据说杨忠也担任过同州刺史，因此郭徽是一个早期就很接近关陇集团核心层的人物，并且很可能与隋代帝室先人早年就有深厚交往。）及云麾将军安调遮、右屯卫郎将韩华两批使者前往试图促成阿史那斛勃的归顺，结果却都没有成功——郭广敬于贞观二十一年抵达可汗的驻地，车鼻可汗的接待工作准备的非常热情周到，他口吐莲花，甚至表示自己也将要亲自入朝觐见天可汗，把个郭广敬哄得一愣一愣的。不过这显然只是口头虚晃一枪，其实阿史那斛勃根本没有这方面的打算。结果就这么连哄带骗让郭广敬回长安复命去了。（郭广敬没有死在车鼻部，这是可以肯定的，因为他后来至少在唐高宗年间担任过左卫将军兼太子左卫率上柱国郜国公甚至左威卫大将军。） 李世民对阿史那斛勃的抵抗决心缺乏认识（或者说可能更需要一个战争的借口吧），他再度派出了云麾将军安调遮（胡人，不知道是否出自安兴贵家族）与右屯卫郎将韩华于贞观二十二年前往迎接阿史那斛勃入朝。（或者是以迎接的名义挟制他入朝？）结果两人到了车鼻部的驻地一看，斛勃根本就没有动身的意思。 ▲安兴贵之子安元寿墓壁画，图片来源Wikimedia Commons。 两人这下陷入了窘境：如果就这么回去完不成皇命丢人不说，搞不好还要被朝廷追究责任、撤职查办；要打的话手头又没兵。这可怎么办呢？ 两人一合计，韩华决定铤而走险，效法前辈们老办法——联络对车鼻可汗统治不满的部分葛逻禄部民将他劫持入京。结果由于行事不够机密，被车鼻可汗提前发觉，韩华在与车鼻可汗的儿子陟苾特勒的决斗中战死，连带安调遮也被杀死。这第二次招抚也失败了。 不过，一个更大的计划正在展开…… （未完待续） 本文作者：姜良
❸ [c++]推荐一个可以读写EXCEL的方法！
想要通过ODBC直接读、写Excel表格文件，首先，应确保ODBC中已安装有Excel表格文件的驱动"MICROSOFT EXCEL DRIVER (*.XLS)"。然后，可根据下面步骤进行：
1. 在StdAfx.h文件中加入：
include <afxdb.h>
include <odbcinst.h>
2. 通过ODBC直接创建Excel文件(暂定文件名：Demo.xls)
//创建并写入Excel文件
void CRWExcel::WriteToExcel()
{
CDatabase database;
CString sDriver = "MICROSOFT EXCEL DRIVER (*.XLS)"; // Excel安装驱动
CString sExcelFile = "c:\\demo.xls"; // 要建立的Excel文件
CString sSql;
TRY
{
// 创建进行存取的字符串
sSql.Format("DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=\"%s\";DBQ=%s",sDriver, sExcelFile, sExcelFile);
// 创建数据库 (既Excel表格文件)
if( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
{
// 创建表结构(姓名、年龄)
sSql = "CREATE TABLE demo (Name TEXT,Age NUMBER)";
database.ExecuteSQL(sSql);
// 插入数值
sSql = "INSERT INTO demo (Name,Age) VALUES ('徐景周',26)";
database.ExecuteSQL(sSql);
sSql = "INSERT INTO demo (Name,Age) VALUES ('徐志慧',22)";
database.ExecuteSQL(sSql);
sSql = "INSERT INTO demo (Name,Age) VALUES ('郭徽',27)";
database.ExecuteSQL(sSql);
}
// 关闭数据库
database.Close();
}
CATCH_ALL(e)
{
TRACE1("Excel驱动没有安装: %s",sDriver);
}
END_CATCH_ALL;
}
3. 通过ODBC直接读取Excel文件(暂定文件名：Demo.xls)
// 读取Excel文件
void CRWExcel::ReadFromExcel()
{
CDatabase database;
CString sSql;
CString sItem1, sItem2;
CString sDriver;
CString sDsn;
CString sFile = "Demo.xls"; // 将被读取的Excel文件名
// 检索是否安装有Excel驱动 "Microsoft Excel Driver (*.xls)"
sDriver = GetExcelDriver();
if (sDriver.IsEmpty())
{
// 没有发现Excel驱动
AfxMessageBox("没有安装Excel驱动!");
return;
}
// 创建进行存取的字符串
sDsn.Format("ODBC;DRIVER={%s};DSN='';DBQ=%s", sDriver, sFile);
TRY
{
// 打开数据库(既Excel文件)
database.Open(NULL, false, false, sDsn);
CRecordset recset(&database);
// 设置读取的查询语句.
sSql = "SELECT Name, Age "
"FROM demo "
"ORDER BY Name ";
// 执行查询语句
recset.Open(CRecordset::forwardOnly, sSql, CRecordset::readOnly);
// 获取查询结果
while (!recset.IsEOF())
{
//读取Excel内部数值
recset.GetFieldValue("Name ", sItem1);
recset.GetFieldValue("Age", sItem2);
// 移到下一行
recset.MoveNext();
}
// 关闭数据库
database.Close();
}
CATCH(CDBException, e)
{
// 数据库操作产生异常时...
AfxMessageBox("数据库错误: " + e->m_strError);
}
END_CATCH;
}
// 获取ODBC中Excel驱动
CString CRWExcel::GetExcelDriver()
{
char szBuf[2001];
WORD cbBufMax = 2000;
WORD cbBufOut;
char *pszBuf = szBuf;
CString sDriver;
// 获取已安装驱动的名称(涵数在odbcinst.h里)
if (!SQLGetInstalledDrivers(szBuf, cbBufMax, &cbBufOut))
return "";
// 检索已安装的驱动是否有Excel...
do
{
if (strstr(pszBuf, "Excel") != 0)
{
//发现 !
sDriver = CString(pszBuf);
break;
}
pszBuf = strchr(pszBuf, '\0') + 1;
}
while (pszBuf[1] != '\0');
return sDriver;
}
❹ 如何将excel中的数据导入到c语言中的数组中
简单的方法是通过ODBC来实现：
具体实现
一、 包含Excel文件操作类头文件
#include "CSpreadSheet.h"
二、 新建Excel文件，并写入默认数据
// 新建Excel文件名及路径，TestSheet为内部表名
CSpreadSheet SS("c:\\Test.xls", "TestSheet");
CStringArray sampleArray, testRow;
SS.BeginTransaction();
// 加入标题
sampleArray.RemoveAll();
sampleArray.Add("姓名");
sampleArray.Add("年龄");
SS.AddHeaders(sampleArray);
// 加入数据
CString strName[] = {"徐景周","徐志慧","郭徽","牛英俊","朱小鹏"};
CString strAge[] = {"27","23","28","27","26"};
for(int i = 0; i < sizeof(strName)/sizeof(CString); i++)
{
sampleArray.RemoveAll();
sampleArray.Add(strName[i]);
sampleArray.Add(strAge[i]);
SS.AddRow(sampleArray);
}
SS.Commit();
三、 读取Excel文件数据
CSpreadSheet SS("c:\\Test.xls", "TestSheet");
CStringArray Rows, Column;
//清空列表框
m_AccessList.ResetContent();
for (int i = 1; i <= SS.GetTotalRows(); i++)
{
// 读取一行
SS.ReadRow(Rows, i);
CString strContents = "";
for (int j = 1; j <= Rows.GetSize(); j++)
{
if(j == 1)
strContents = Rows.GetAt(j-1);
else
strContents = strContents + " --> " + Rows.GetAt(j-1);
}
m_AccessList.AddString(strContents);
}