vc++保存变量数据到记事本和EXCEL2007中

程序在循环时，我需要把一些变量立刻保存到记事本或者EXCEL2007，以便将来查看。有源程序者可以发至244258769@qq.com，十分感谢！... 程序在循环时，我需要把一些变量立刻保存到记事本或者EXCEL2007，以便将来查看。有源程序者可以发至244258769@qq.com，十分感谢！展开

 我来答

1个回答

#合辑# 面试问优缺点怎么回答最加分？

匿名用户
2011-04-17

展开全部

3.37 icePub_appendTextToFile

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

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

更多追问追答

追问

我试了下，程序能通过，但是没有任何结果。而且这个程序看不懂啊，没有任何说明

追答

D:\program files\test\
路径得存在
可改成"d:\d.txt"
试
也有可能你没把icePubDll.dll放到windows\system32下或应用程序exe相同目录下
建议放到windows\system32下，方便你debug模式运行程序

程序就是调用一个dll函数，VC sample代码：里就
icePub_appendTextToFile("头晕、眼花、走路打晃晃！","D:\\c.txt",1);
是调用语句，其他都是动态装载dll固定语句，照抄即可