回复:wincc5.1怎么通过C脚本实时向excel传送数据 并保存以当天日期为名?

有谁共鸣

  • 帖子

    2153
  • 精华

    21
  • 被关注

    6

论坛等级:侠圣

注册时间:2005-05-07

普通 普通 如何晋级?

发布于 2006-04-07 14:03:41

0楼

如下是本人繁忙中测试通过的代码:
(可以直接拷贝编译运行,但要注意记得在D盘创建命名问book1的excel文件!(即:d:\\book1.xls))

#pragma code ("kernel32.dll")

VOID GetLocalTime(LPSYSTEMTIME lpSystemTime);

#pragma code ()



char FileName[20] = "";

SYSTEMTIME sysTime;

__object* pExcel = NULL;



GetLocalTime(&sysTime);

sprintf(FileName,"d:\\%d-%d-%d.xls",sysTime.wYear,sysTime.wMonth,sysTime.wDay);

pExcel = __object_create("Excel.Application.9"); //9表示用的是office 2000

pExcel->Visible = 1;

pExcel->Workbooks ->Open ("d:\\book1.xls");

pExcel->Worksheets("sheet1")->Range("A1")->Value=12;//GetTagFloat("wincctag1"); //写wincc的变量实时值到格A1中

pExcel->Worksheets("sheet1")->Range("A2")->Value=24;//GetTagFloat("wincctag2"); //写wincc的变量实时值到格A2中

pExcel->ActiveWorkbook->SaveAs(FileName);

pExcel->Workbooks->Close();

pExcel->Quit();

__object_delete(pExcel);
雄关漫道真如铁,而今迈步从头越!
评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32564条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。