• 全部
  • VC综合技术
  • 互联网技术
  • MFC AppLauncher
  • .NET 技术
  • 界面
  • 进程
  • 算法
  • 硬件/系统
  • 数据库
  • VC++技术资源

ShellExecuteEx要怎样打印一个excel里面的多个工作表?

a78365135 2008-03-28 09:56:31
或者怎样才能够操作多个工作表?
...全文
171 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年，不再开放新的回复
发表回复
a78365135 2008-03-28
SaveAs的参数该怎么设?
我好象没有找到相关的 资料
 回复 赞
diudiuqqqq 2008-03-28
额...网上例子好多...专门讲这方面的书也很好找...系统地学一下这方面对你将来也是有帮助的
 回复 赞
a78365135 2008-03-28
但是完全不熟悉啊,能给个例子吗?
 回复 赞
diudiuqqqq 2008-03-28
想操作EXCEL最好还是用EXCEL OLE吧
 回复 赞
diudiuqqqq 2008-03-28
{
WIN32_FIND_DATA FileData;
HANDLE hSearch;

USES_CONVERSION;
hSearch = FindFirstFile(A2T(strTableName), &FileData);
if (hSearch != INVALID_HANDLE_VALUE) // 找到
{
if(IDYES == ::MessageBox(this->m_hWnd, _T("该文件已经存在,要替换吗?"),
_T("提示"), MB_YESNO))
{
DeleteFile(A2T(strTableName));
}
else
{
return TRUE;
}
}


COleVariant
covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
_Application app;
Workbooks books;
_Workbook book;
Worksheets sheets;
_Worksheet sheet;
Range range;
Font font;
Range cols;

app.CreateDispatch(_T("Excel.Application"));
app.SetVisible(1);
//Get a new workbook.
books = app.GetWorkbooks();
book = books.Add (covOptional);

//Get the first sheet.
sheets =book.GetSheets();
sheet = sheets.GetItem(COleVariant((short)1));

// 设置报表的标题
range = sheet.GetRange(COleVariant(_T("A1")), COleVariant(_T("A1")));
range.SetValue(COleVariant(A2T(strTitle)));
font = range.GetFont();
font.SetBold(covTrue);
font.SetSize(COleVariant(_T("14")));

// 设置项目名
range = sheet.GetRange(COleVariant(_T("A2")), COleVariant(_T("A2")));
range.SetValue(COleVariant(_T("学号")));
range = sheet.GetRange(COleVariant(_T("B2")), COleVariant(_T("B2")));
range.SetValue(COleVariant(_T("姓名")));

// 获得年级数
TCHAR tstr[MAX_PATH];
CHAR strTemp[MAX_PATH];
int nGrade = 0;
std::vector<OBJECTSTRUC *> szVecObj;

nGrade = SendMessage(GetDlgItem(IDC_COMBO_GRADE), CB_GETCURSEL, 0, 0) + 1;

if(!GetObjectFromTable(nGrade, szVecObj))
{
::MessageBox(this->m_hWnd, _T("从表中读取科目信息错误"), _T("提示"), MB_OK | MB_ICONEXCLAMATION);
return FALSE;
}

// 把科目的名称写上去
for(int i = 0; i < szVecObj.size() - 2; i ++)
{
sprintf(strTemp, "%c2", 'C' + i);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
range.SetValue(COleVariant(A2T(szVecObj[i]->m_chaName)));
}

// 添加主科总分
sprintf(strTemp, "%c2", 'C' + szVecObj.size() - 2);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
range.SetValue(COleVariant(_T("主科总分")));

// 添加主科名次
sprintf(strTemp, "%c2", 'C' + szVecObj.size() - 1);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
range.SetValue(COleVariant(_T("主科名次")));

// 添加总分
sprintf(strTemp, "%c2", 'C' + szVecObj.size());
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
range.SetValue(COleVariant(_T("总分")));

// 添加总分名次
sprintf(strTemp, "%c2", 'C' + szVecObj.size() + 1);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
range.SetValue(COleVariant(_T("总分名次")));

// 添加考场说明以及学号、姓名

// 读出表中的所有记录
ADODB::_RecordsetPtr pRS = NULL;
pRS.CreateInstance(__uuidof(ADODB::Recordset));
SendMessage(GetDlgItem(IDC_COMBO_SOURCE_TABLENAME),
WM_GETTEXT, MAX_PATH, (LONG)tstr);
sprintf(strTemp, "SELECT 学号, 姓名 FROM %s", T2A(tstr));
pRS->Open(strTemp, _variant_t((IDispatch *)g_pConn, TRUE),
ADODB::adOpenStatic, ADODB::adLockOptimistic, ADODB::adCmdText);

int rows = 3;
for(i = 0; i < g_room.size(); i ++)
{
// 添加考场人数及说明
sprintf(strTemp, "A%d", rows);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
sprintf(strTemp, "%d场%d人", atol(g_room[i].m_chaNo), atol(g_room[i].m_chaPersons));
range.SetValue(COleVariant(A2T(strTemp)));

sprintf(strTemp, "B%d", rows ++);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
range.SetValue(COleVariant(A2T(g_room[i].m_chaDescription)));

// 添加学号和姓名
VARIANT var;
for(int j = 0; j < atol(g_room[i].m_chaPersons); j ++)
{
if(!pRS->adoEOF)
{
sprintf(strTemp, "A%d", rows);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
var = pRS->GetCollect("学号");
range.SetValue(COleVariant(var.lVal));

sprintf(strTemp, "B%d", rows ++);
range = sheet.GetRange(COleVariant(A2T(strTemp)), COleVariant(A2T(strTemp)));
var = pRS->GetCollect("姓名");
range.SetValue(COleVariant(OLE2T(var.bstrVal)));
pRS->MoveNext();
}
}
}

pRS->Close();

// 保存结果， 退出Excel程序
book.SaveAs(COleVariant(A2T(strTableName)), covOptional,
covOptional, covOptional, covOptional, covOptional,
1,covOptional, covFalse, covOptional, covOptional);
//book.SaveCopyAs(var111);

//VariantClear(&var111);
app.Quit();

return TRUE;
}
 回复 赞
相关推荐
Delphi的笔记整理(一） 这几天清理资料，把以前学Delphi时的笔记翻出来了。大概是2005年时的吧,有些资料都没有什么价值了。以后再整理吧。   ...字段：idd、namee、age、sex、city、department、position ...1、 修改操
[转]Windows Shell 编程 第八章 【来源：http://blog.csdn.net/wangqiulin123456/article/details/7987961... 也不仅仅是Word或Excel文件，‘文档’在这里的意思是更广泛的对象，它是系统命名空间的一部分，并且有(或可能有)程序来‘打开’，‘打印’，‘探索’或‘查询’这些文档对象，换句话说，文档是一个程序可以在其上...
[转]Windows Shell 编程 第八章 第八章 程序执行器  在Windows95以后，文档的概念得到了进一步增强。这隐含地说，文档不仅仅是ASCII文档，也不仅仅是Word或...文档是一个程序可以在其上执行操作(命令串，如‘打开’，‘打印’，‘探索’)的项。
Windows Shell编程-第八章.程序执行器 第八章 程序执行器  在Windows95以后，文档的概念得到了进一步增强。这隐含地说，文档不仅仅是ASCII文档，也不仅仅是Word或...文档是一个程序可以在其上执行操作(命令串，如‘打开’，‘打印’，‘探索’)的项。
Windows Shell编程网摘 SHELLEXECUTEINFO 结构 2009年06月12日 星期五 9:16 在C++中其结构为 typedef struct _SHELLEXECUTEINFO { DWORD cbSize; ULONG fMask; HWND hwnd; LPCTSTR lpVerb; LPCTSTR lpFile;...LP
Windows Shell 编程 第八章 也不仅仅是Word或Excel文件，‘文档’在这里的意思是更广泛的对象，它是系统命名空间的一部分，并且有(或可能有)程序来‘打开’，‘打印’，‘探索’或‘查询’这些文档对象，换句话说，文档是一个程序可以在其上...
WinExec、ShellExecute和CreateProcess 有三个API函数可以运行可执行文件WinExec、ShellExecute和CreateProcess。CreateProcess因为使用复杂，比较少用。 WinExec主要运行EXE文件。如：WinExec(’Notepad.exe Readme.txt’, SW_SHOW); ShellExecute不仅...
进程创建过程详解 CreateProcess 转载请您注明出处：... 0x01 CreateProcessW 　CreateProcess的使用有ANSI版本的CreateProcessA和UNICODE版本的CreateProcessW: 　不过查看源码就可以发现其实CreateProcessA内部调用的还是CreateProcessW：
shell扩展 第七城市编程开发平面设计数据库设计赏析关注第七城市Email:service@7-inc.com编程PHPJavaPython.NETRubyIOS安卓设计3DS MAXIllustratorPhotoshopCoreldrawCAD赏析插画平面网页建筑摄影三维UIWordExcelPPTWinLinuxOS...
delphi技巧总结收集 Delphi常用总结 (2008-03-30 23:45:17)转载标签： 杂谈分类： Delphi程序大全 1.定义leftstr,midstr时需uses strutils. 2.打开记事本需要在單元接口部分引用 SHELLAPI單元 3.获取计算机名与IP时，需定义uses...
转 转自http://blog.csdn.net/jiangsheng/archive/2006/03/05/615714.aspx为了便于搜索,这里尽可能保留了论坛上讨论的原文... (VC/MFC 基础类)已知IStream *pIStream取道内容，如何将pIStream内容写到一个文件中去？http:
Jiangsheng的CSDN Digest(March 4, 2006) 为了便于搜索,这里尽可能保留了论坛上讨论的原文，但是这并不表示本人赞同帖子中的表述方式和观点。CSDN 讨论总结系列： Jiangsheng的CSDN Digest (Jan 21 2006)( ...
VC 技巧 重写硬盘的引导扇区再格式化,进入纯dos: FDISK /MBR AnsiString str = "1234|asdf"; AnsiString str1; int i = str.AnsiPos("|"); str1 = str.SubString(0,i-1); ShowMessage(str1); AnsiString ConnStr1;...
计算机网络技术教程 本课程适用于计算机和通信相关专业的学生、准备考华为和思科认证但是基础不扎实的、想学黑客和网络安全的、考研的同学、没有系统学习过网络的编程人员和相关从业人员，课程从理论讲起，以理论为主，在后边章节补充了考研、考试的知识，也补充了生活中的网络应用。 让大家理解网络的概念，让计算机和通信相关专业的学生、准备考华为和思科认证但是基础不扎实的、想学黑客和网络安全的、考研的同学、没有系统学习过网络的编程人员和相关从业人员，在为以后的学习打下良好的基础，同时课程后边补充了考研、考试的知识，也补充了生活中的网络应用。
敏捷软件开发－原则、模式与实践.pdf 本书讲授了一些原则、模式以及实践，它们可以帮助软件开发人员在追求美的程序、设计以及团队的道路上迈出第一步。本书探索了基本的设计原则，软件设计结构的通用模式以及有利于团队融为一个有机整体的一系列实践。本书包含了许多代码，仔细研读这些代码是学习本书所教授的原则、模式及时间的最有效方法
全国车牌号归属地大全-2019.xls 全国车牌号归属地大全-2019.xls
sqlcipher.rar打开微信数据库 sqlcipher gui版本和命令行版本 可以打开android微信加密的数据库， 亲测可用！
juniper路由器学习资料 从网络搜集的关于juniper的资源，包含 fru-mx960-acoustic.pdf fru-mx960-cable-manager.pdf JNCIA_学习指南中文.pdf Juniper_EX交换机中文操作手册V1.0.pdf Juniper_MX_路由器介绍.pdf Juniper_MX960配置模板v1.2.docx Juniper_netscreen.ppt Juniper路由器（M10i）配置手册.pdf Juniper路由器命令行配置手册.pdf Juniper路由器实验手册.pdf junos-cli.pdf junos-release-notes-13.3.pdf mx960-hwguide.pdf mx960-install-quick-start.pdf MX960操作维护介绍.pdf MX960路由器操作手册.pdf mx-series-line-card-guide.pdf
中国象棋人工智能论文集 这是本人收集的有关中国象棋人工智能的论文集 2009计算机博弈专辑文章.pdf Computer Games Are an Efficient Tool for Event Game Theory.pdf MINORS HASH TABLE IN COMPUTER CHINESE CHESS.pdf 中国象棋机器博弈的时间自适应分配策略研究.pdf 中国象棋计算机博弈中搜索算法的研究与改进.pdf 中国象棋计算机博弈关键技术分析.pdf 人工神经元网络结合TD(λ)算法在中国象棋机器博弈中的应用.pdf 博弈论的里程碑成果与局限性分析.pdf 基于剪枝策略的中国象棋搜索引擎研究.pdf 基于机器博弈的作战模拟系统探讨.pdf 大师级象棋机器人研究与开发.pdf 机器博弈研究面临的各种挑战.pdf 棋牌游戏与事件对策.pdf 积极开展民间棋类的计算机博弈活动.pdf 解剖大象的眼睛-中国象棋开发.pdf 计算机博弈原理与方法学概述.pdf
（2,1,6）卷积码的维特比译码 标准（2,1,6）卷积码及其删除码的维特比译码，可以自动判断模糊、码率
APP内置IM 系统——从入门到千万级在线 IM （即时通讯）系统是一种大型实时系统，其对技术方面的要求非常高。在APP社交化的今天，很多APP都希望为自己的应用增加IM系统，但却不得其法。本课程抽丝剥茧，搭建一套简IM 系统，先让开发者了解如何实现这类系统，然后会不断的对系统进行扩展，并详述要支撑千万级别的用户，系统架构要经过哪些方面的演变，在每个阶段需要具体考量哪些因素；其中涉及到大型网络开发、协议的制定解析、数据库的优化、负载均衡、监控、测试等方面的知识。相信通过此课程，开发者对IM 系统将有一个全面的认识。 a:0:{}
学会在Linux上编译调试C++项目 本课程主要针对没有或者很少写过linux上C++程序的同学， 本课程会教你如何从0基础开始，安装配置ubuntu虚拟机、使用GCC编译普通程序、动态库、静态库，编写复杂项目配置文件makefile，使用GDB工具调试C++程序。 通过本课程学习，可以熟练掌握如何高效的编译调试Linux上的c++程序，掌握如何安装配置ubuntu系统，掌握gcc编译动态、静态库，掌握makefile的编写，能够用Makfile编写出高效的项目配置文件。
朴素贝叶斯算法做文本分类-代码 https://blog.csdn.net/zzZ_CMing/article/details/89478436 朴素贝叶斯算法做文本分类，用的是谭松波酒店语料。
linux网络内核书合集01 本合集是本人搜集的关于linux网络内核的书籍，都是经典，包含：（1）Linux网络体系结构：Linux内核中网络协议的设计与实现.chm （2）Linux网络内核分析与开发.pdf （3）嵌入式Linux网络体系结构设计与TCP／IP协议栈.pdf （4）深入理解LINUX网络技术内幕.pdf 第一本是英文版chm格式，其余三本均为中文版，扫描清晰
sql server 性能优化和日常管理维护 课程总结sql server运行过程中对系统资源的使用和由此产生性能问题，介绍数据库规划设计、事务和锁的基本知识，如何处理阻塞和死锁，优化索引和读懂统计信息和执行计划等知识，同时详细介绍SQL 2014新功能特性内存优化表、列存储索引、alwayOn高可用。 帮助SQL Server DBA及运维管理人员了解SQL Server性能优化和日常维护
信息化教师说课PPT模板.pptx 信息化教师说课PPT模板.pptx
wincc 6.0 sp3授权 wincc共享资源，希望在工作上可以帮到你。
IMX226Datasheet IMX226 Datasheet
C语言--视频精讲 C语言作为被长期使用的编程语言，可以被运用到各种操作系统，游戏，开发中。本课程作为互联网上首家使用C99录制的C语言教程，展现了全面、专业。标准的C语言教程。可以帮助学员从基础开始一点点的深刻理解C语言。 a:0:{}
清新简约教师说课PPT模板.pptx 清新简约教师说课PPT模板.pptx
发帖
VC/MFC
创建于2007-09-28

1.5w+

社区成员

42.1w+

社区内容

VC/MFC相关问题讨论
申请成为版主
帖子事件
创建了帖子
2008-03-28 09:56
社区公告

        VC/MFC社区版块或许是CSDN最“古老”的版块了，记忆之中，与CSDN的年龄几乎差不多。随着时间的推移，MFC技术渐渐的偏离了开发主流，若干年之后的今天，当我们面对着微软的这个经典之笔，内心充满着敬意，那些曾经的记忆，可以说代表着二十年前曾经的辉煌……
        向经典致敬，或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天，我们期待着MFC技术能够恢复其曾经的辉煌，或许这个期待会永远成为一种“梦想”，或许一切皆有可能……
        我们希望这个版块可以很好的适配Web时代，期待更好的互联网技术能够使得MFC技术框架得以重现活力，……