乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > <em>vc</em>编程的数据保存成<em>Excel</em>格式-

<em>vc</em>编程的数据保存成<em>Excel</em>格式-

作者:乔山办公网日期:

返回目录:excel表格制作


3.37 icePub_appendTextToFile

l 函数原型:
int WINAPI icePub_appendTextToFile(char *strText,char *strFilename,int traceFlag)
输入:strText 待写入文本串
strFilename 待写入文件名
traceFlag 非0即可;只方便e5a48de588b6e79fa5e98193331自用
输出:

l VC连接Lib方式声明
__declspec(dllexport)
int WINAPI icePub_appendTextToFile(char *strText,char *strFilename,int traceFlag);

l 动态调用例程
VC sample代码:
char strExeName[1024];

typedef int (WINAPI ICEPUB_APPENDTEXTTOFILE)(char *strText,char *strFilename,int traceFlag);
ICEPUB_APPENDTEXTTOFILE *icePub_appendTextToFile = 0;
HINSTANCE hDLLDrv = LoadLibrary("icePubDll.dll");
if(hDLLDrv)
{
icePub_appendTextToFile = (ICEPUB_APPENDTEXTTOFILE *)GetProcAddress(hDLLDrv, "icePub_appendTextToFile");
}

if(icePub_appendTextToFile != NULL)
{
icePub_appendTextToFile("头晕、眼花、走路打晃晃!","D:\\program files\\test\\c.txt",1);
}

if(hDLLDrv)
FreeLibrary(hDLLDrv);

VB sample 代码:
Private Declare Function icePub_appendTextToFile Lib "icePubDll.dll" (ByVal strText As String,ByVal strFilename As String,ByVal traceFlag As Integer) As Integer

Dim a2 As Integer

a2 = icePub_appendTextToFile("回家休息!","D:\program files\test\d.txt",1)

download:
http://dl.icese.net/dev.php?f=icePubDll.rar

文库有示范代码,比如这个
http://wenku.baidu.com/link?url=0H-FcNMjZBGsuhVrOSzzSj1qz-5C2tzZoKsQK6E1I3P6t0mthwwCrd_udX5OLHJGEiytAQy48YPlUCcknBOsxm_0RXUsD0p2DAZIb36UfIO

其中copyVC的操作,我个人建议以AUTOMATION的方式,不建议用ADO ODBC,因为自动化对象更容易理解和解析。
excel的版本是2007
用C++标准输出流输到excel中,如果没有回车,数据都在一个单元格中。希望能解决跳到同一行中的下一个单元格中。

你可以输出一个文本文件(.txt) ,
每行开始不要有空白,数据与数据之间用空白隔开。
鼠标光标放到 excel 窗的左上角 那个 圆型的 "Office Button", 揿鼠标左键,出来的菜单里有
Open,
揿了Open以后弹出 文件选择窗,选文件类型 .txt, 并找到你的vc++ 程序的文本输出文件。
接下来的 Text Import Wizard 里,选 Delimited, 然后zd 揿下面的 Next,下来 Delimiters 里选
Space(空白),( 如果你用 tab, 逗号分隔,也在这里选)。接下来 揿 finish。 就进了excel2007。
再下来你存放为 xlsx 文件就好了。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网