问题描述:
我要在vc中实现将数据插入excel表，从表中查询数据，删除数据，更新数据，会的帮帮忙
解析:
我用的是excel2000
首先利用Visual C++ 6.0，建立一个MFC基于对话框的工程项老睁目，共享DLL，Win32平台。工程名称ExcelTest。在主对话框中加入一个按钮，
ID IDC_EXCELTEST
Caption Test Excel
双击该按钮，增加成员函数void CExcelTestDlg::OnExceltest()。
在BOOL CExcelTestApp::InitInstance()中，dlg.DoModal()之前增加代码：
if (CoInitialize(NULL)!=0)
{
AfxMessageBox("初始化COM支持库失败!")
exit(1)
}
在return FALSE语句前，加入：
CoUninitialize()
选择Menu->View->ClassWizade，打开ClassWizade窗口，选择Add Class->From a type library，选择D:\Program Files\Microsoft Office\office\Excel9.OLB(D:\Program Files\Microsoft Office\是本机上Microsoft Office 2000的安装目录，可根据个人机器上的实际安装目录修改)。选择_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range，加入新类，分别为_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range，头文件Excel9.h，源文件Excel9.cpp。
在ExcelTestDlg.cpp文件的头部，#include "ExcelTestDlg.h"语句之下，增加 ：
#include "def.h"
#include "Excel9.h"
在void CExcelTestDlg::OnExceltest() 函数中增加如下代码：
void CExcelTestDlg::OnExceltest()
{
_Application ExcelApp
Workbooks wbsMyBooks
_Workbook wbMyBook
Worksheets wssMysheets
_Worksheet wsMysheet
Range rgMyRge
创建Excel 2000服务器(启动Excel)
if (!ExcelApp.CreateDispatch("Excel.Application",NULL))
{
AfxMessageBox("创建Excel服务失败!")
exit(1)
}
利用模板文件建立新文档
wbsMyBooks.AttachDispatch(ExcelApp.GetWorkbooks(),true)
wbMyBook.AttachDispatch(wbsMyBooks.Add(_variant_t("g:\\exceltest\\MyTemplate.xlt")))
得到Worksheets
wssMysheets.AttachDispatch(wbMyBook.GetWorksheets(),true)
得到sheet1
wsMysheet.AttachDispatch(wssMysheets.GetItem(_variant_t("sheet1")),true)
得到全部Cells，此时,rgMyRge是cells的 ***
rgMyRge.AttachDispatch(wsMysheet.GetCells(),true)
设置1行1列的单元的值
rgMyRge.SetItem(_variant_t((long)1),_variant_t((long)1),_variant_t("This Is A Excel Test Program!"))
得到所有的列
rgMyRge.AttachDispatch(wsMysheet.GetColumns(),true)
得到第一列
rgMyRge.AttachDispatch(rgMyRge.GetItem(_variant_t((long)1),vtMissing).pdispVal,true)
设置列宽
rgMyRge.SetColumnWidth(_variant_t((long)200))
调用模板中预先存放的宏
ExcelApp.Run(_variant_t("CopyRow"),_variant_t((long)10),vtMissing,vtMissing,
vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,
vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,
vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,
vtMissing,vtMissing,vtMissing,vtMissing,vtMissing,vtMissing)
打印预览
wbMyBook.SetSaved(true)
ExcelApp.SetVisible(true)
wbMyBook.PrintPreview(_variant_t(false))
释放对象
rgMyRge.ReleaseDispatch()
wsMysheet.ReleaseDispatch()
wssMysheets.ReleaseDispatch()
wbMyBook.ReleaseDispatch()
wbsMyBooks.ReleaseDispatch()
ExcelApp.ReleaseDispatch()
}
可以先用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]
intrc, 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=%sDBQ=%sREADONLY=FALSEEXCLUSIVE=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=0i<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=0i<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=%08Xhdbc=%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 提供必要的输出信息或干脆删掉。
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）