C语言读取excel文件的数据

C语言读取excel文件的数据,第1张

简单的方法是通过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 = 0i <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 = 1i <= SS.GetTotalRows()i++)

{

// 读取一行

SS.ReadRow(Rows, i)

CString strContents = ""

for (int j = 1j <= Rows.GetSize()j++)

{

if(j == 1)

strContents = Rows.GetAt(j-1)

else

strContents = strContents + " -->" + Rows.GetAt(j-1)

}

m_AccessList.AddString(strContents)

}

基本思路

基础实现方法同上篇文章《直接通过ODBC读、写Excel表格文件》相同,都是通过ODBC来把Excel表格文件当成数据库文件来进行读、写等 *** 作,所以在Excel表格文件中写入的行头名必须是唯一的(不要重名,相当于数据库中的ID值)。本文中对Excel文件的 *** 作都被封装进一个类CSpreadSheet中,通过它我们可以非常简便的实现各种Excel表格数据 *** 作,并且可以对该类进行扩充来满足自己的需求。

具体实现

一、 包含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 = 0i <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 = 1i <= SS.GetTotalRows()i++)

{

// 读取一行

SS.ReadRow(Rows, i)

CString strContents = ""

for (int j = 1j <= Rows.GetSize()j++)

{

if(j == 1)

strContents = Rows.GetAt(j-1)

else

strContents = strContents + " -->" + Rows.GetAt(j-1)

}

m_AccessList.AddString(strContents)

}

四、 对已存在Excel表格数据进行添加、插入、替换 *** 作

// 初始化测试行数据,进行添加、插入及替换数据 *** 作演示

for (int k = 1k <= 2k++)

{

testRow.Add("Test")

}

SS.AddRow(testRow) // 添加到尾部

SS.AddRow(testRow, 2) // 插入新行到第二行

SS.AddRow(testRow, 6, true)// 替换原第四行来新的内容

SS.AddCell("徐景周", 1,2) // 添加(不存在)或替换(存在)第二行,第一列单元格内容

SS.Commit()

五、 对已存在Excel表格数据进行行、列、单元格查询

void CExcelAccessDlg::OnQuery()

{

CSpreadSheet SS("c:\\Test.xls", "TestSheet")

CStringArray Rows, Column

CString tempString = ""

UpdateData()

if(m_strRow == "" &&m_strColumn == "") // 查询为空

{

AfxMessageBox("行号、列号不能同时为空!")

return

}

else if(m_strRow == "" &&m_strColumn != "")// 查询指定列数据

{

int iColumn = atoi(m_strColumn)

int iCols = SS.GetTotalColumns()

if(iColumn >iCols) // 超出表范围查询时

{

CString str

str.Format("表中总列数为: %d, ", iCols)

AfxMessageBox(str + " 查询列数大于Excel表中总列数,请重新输入!")

return

}

// 读取一列数据,并按行读出

if(!SS.ReadColumn(Column, iColumn))

{

AfxMessageBox(SS.GetLastError())

return

}

CString tmpStr

for (int i = 0i <Column.GetSize()i++)

{

tmpStr.Format("行号: %d, 列号: %d ,内容: %s\n", i+1,iColumn,Column.GetAt(i))

tempString += tmpStr

}

AfxMessageBox(tempString)

}

else if(m_strRow != "" &&m_strColumn == "") // 查询指定行数数据

{

int iRow = atoi(m_strRow)

int iRows = SS.GetTotalRows()

if(iRow >iRows) // 超出表范围查询时

{

CString str

str.Format("表中总行数为: %d, ", iRows)

AfxMessageBox(str + " 查询行数大于Excel表中总行数,请重新输入!")

return

}

// 读取指定行数据

if(!SS.ReadRow(Rows, iRow))

{

AfxMessageBox(SS.GetLastError())

return

}

CString tmpStr

for (int i = 0i <Rows.GetSize()i++)

{

tmpStr.Format("行号: %d, 列号: %d ,内容: %s\n", iRow, i+1, Rows.GetAt(i))

tempString += tmpStr

}

AfxMessageBox(tempString)

}

else if(m_strRow != "" &&m_strColumn != "") // 查询指定单元格数据

{

int iRow = atoi(m_strRow), iColumn = atoi(m_strColumn)

int iRows = SS.GetTotalRows(), iCols = SS.GetTotalColumns()

if(iColumn >iCols) // 超出表范围查询时

{

CString str

str.Format("表中总列数为: %d, ", iCols)

AfxMessageBox(str + " 查询列数大于Excel表中总列数,请重新输入!")

return

}

else if(iRow >iRows)

{

CString str

str.Format("表中总行数为: %d, ", iRows)

AfxMessageBox(str + " 查询行数大于Excel表中总行数,请重新输入!")

return

}

// 读取指定行、列单元格数据

if(!SS.ReadCell(tempString, iColumn, iRow))

{

AfxMessageBox(SS.GetLastError())

return

}

CString str

str.Format("行号: %d, 列号: %d ,内容: %s", iRow,iColumn,tempString)

AfxMessageBox(str)

}

}

六、 将存在的Excel转换另存为指定分隔的文本文件

// 将原Excel文件转换为用分号分隔的文本,并另存为同名文本文件

SS.Convert("")

七、 删除Excel中表格

SS. DeleteSheet() // 删除Excel文件中所有表格

SS. DeleteSheet(" TestSheet ") // 删除Excel中TextSheet表格

八、 获取Excel中总行数、总列数、当前行

int iCols = SS.GetTotalColumns() // 总列数

int iRows = SS.GetTotalRows() // 总行数

int iCurRow = SS.GetCurrentRow()// 当前所在行号

九、 获取行头数据

CStringArray rowHeader

SS.GetFieldNames(rowHeader)

CString tmpStr

for (int i = 0i <rowHeader.GetSize()i++)

{

tmpStr.Format("行号: %d, 列号: %d ,内容: %s\n", 1, i+1, rowHeader.GetAt(i))

tempString += tmpStr

}

AfxMessageBox(tempString)

最后,如果想知道详细实现细节的话,可以在下载示例源码后,仔细查看源码既可(内有详细注释)。

想要通过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=1READONLY=FALSECREATE_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("ODBCDRIVER={%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

}


欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/sjk/9896213.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-03
下一篇2023-05-03

发表评论

登录后才能评论

评论列表(0条)

    保存