wincc的excel报表实例

格式：rtf
大小：9.26 KB
文档页数：5

下载文档原格式

如何在Excel中访问WinCC变量归档数据

1 功能说明在Microsoft office Excel中访问WinCC的历史数据，实现如下图所示的报表：图1: Excel中访问WinCC的历史数据生成报表选择日期后，可以生成当天的风机参数日报表（报表数据来自WinCC）。

2 软件环境本地计算机：Windows XP SP3英文版、WinCC7.0 SP2 ASIA、Microsoft office Excel 2003 远程计算机：Windows XP SP3英文版、WinCC7.0 SP2 ASIA、Microsoft office Excel 20033 WinCC/Connectivity Pack 介绍WinCC变量归档数据是以压缩的形式存储在数据库中，需要通过WinCC/Connectivity Pack提供的OLE-DB接口才能够解压并读取这些数据。

3.1 连接字符串“Provider=WinCCOLEDBProvider.1; Catalog= ***; Data Source= ***;“其中：Catalog：WinCC运行数据库的名称注意：当修改项目名称或在其它计算机上打开原项目时, Catalog会发生变化。

建议使用WinCC系统变量“@DatasourceNameRT” 获得当前的Catalog。

Data Source ：服务器名称本地：“.\WinCC” 或者“<计算机名称>\WinCC”远程：“<计算机名称>\WinCC”3.2 查询语句“TAG:R,<ValueID or ValueName>,<TimeBegin>,<TimeEnd>[,<SQL_clause>][,<TimeStep>]”其中：ValueName：格式为“ArchiveName\Value_Name”，可以使用多个名称。

TimeBegin,TimeEnd：时间范围，格式“YYYY-MM-DD hh:mm:ss.msc”。

wincc的excel报表实例

wincc的excel报表打印实例因为ms word和excel的文档都支持html文本格式，因此可以先用word或excel做好模版，另存为Web页，然后将该html 改成jsp，将数据部分动态填入即可，不用很辛苦的调整格式word页面只要在jsp头设置如下指令：<%@page contentType="application/msword;charset=GBK" %>excel如下：<%@page contentType="application/vnd.ms-excel;charset=GBK" %>使用这种方式客户端必须安装有office软件，用户访问时将在ie中直接用wor d或excel打开该页面。

此方法优势是模板设计、调整方便，无需在服务器端使用复杂的POI或jxl技术，也无需在客户端使用ActiveX控件技术，更安全、方便，轻松实现较好的打印效果。

简单示例：使用word建立一文档，画表格如下：----------------------------| 用户名| 真实姓名| 性别|----------------------------| guest | 路人甲| 男|----------------------------保存为Web页test.htm，将test.htm改名为test.jsp，修改其中guest、路人甲、男为从数据库动态查询，如下：<%@ page contentType="application/msword;charset=GBK" %><%@ page import="java.sql.*" %><html xmlns:o="urn:schemas-micr osoft-com:office:office"xmlns:w="urn:schemas-microsoft-com:office:word"xmlns="http://www.w3.or g/TR/REC-html40"><head><meta http-equiv=C ontent-Type content="text/html; charset=GB2312"><meta name=ProgId content=W ord.Document><meta name=Generator content="Microsoft Word 9"><meta name=Originator content="Microsoft Wor d 9"><title>用户信息</title><style></style></head><body lang=ZH-CN style='tab-interval:21.0pt;text-justify-trim:punctuation'><div class=Section1 style='layout-gr id:15.6pt'><table border=1 cellspacing=0 cellpadding=0 style='border-collapse:collapse;border:none;mso-border-alt:solid w indowtext .5pt;mso-padding-alt:0cm 5.4pt 0cm 5.4pt'><tr><td w idth=189 valign=top style='width:142.0pt;border:solid w indowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'>用户名</td><td w idth=189 valign=top style='width:142.05pt;border:solid windowtext .5pt;border-left:none;mso-border-left-alt:solid w indowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'>真实姓名</td><td w idth=189 valign=top style='width:142.05pt;border:solid windowtext .5pt;border-left:none;mso-border-left-alt:solid w indowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'>性别</td></tr><%Class.forName("sun.jdbc.odbc.JdbcOdbcDr iver");String url="jdbc:odbc:mydb";//连接mydb数据库Connection con=Driver Manager.getC onnection (url, "", "");try{Statement stmt=con.createStatement();//查询employee表ResultSet rs=stmt.executeQuery("select user_name, real_name, gender from employee ");while(rs.next()){%><tr><td w idth=189 valign=top style='width:142.0pt;border:solid w indowtext .5pt;border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'><%=rs.getString("user_name")%></td><td w idth=189 valign=top style='width:142.05pt;border-top:none;border-left:none;border-bottom:solid w indowtext .5pt;border-right:solid w indowtext .5pt;mso-border-top-alt:solid windowtext .5pt;mso-bor der-left-alt:solid w indowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'><%=rs.getStr ing("real_name")%></td><td w idth=189 valign=top style='width:142.05pt;border-top:none;border-left:none;border-bottom:solid w indowtext .5pt;border-right:solid w indowtext .5pt;mso-border-top-alt:solid windowtext .5pt;mso-bor der-left-alt:solid w indowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'><%=rs.getStr ing("gender")%></td></tr><%} // end whilers.close();stmt.close();} finally {con.close();}%></table><![if !supportEmptyParas]> <![endif]><o:p></o:p>。

在Excel中访问WinCC变量归档数据

如何在Excel中访问WinCC变量归档数据————————————————————————————————作者：————————————————————————————————日期：1 功能说明在Microsoft office Excel中访问WinCC的历史数据，实现如下图所示的报表：图1: Excel中访问WinCC的历史数据生成报表选择日期后，可以生成当天的风机参数日报表（报表数据来自WinCC）。

建议使用WinCC系统变量“@DatasourceNameRT” 获得当前的Catalog。

WinCC_To_Excel

可以用C脚本,我已经照此例子实验，可以自动生成EXCEL文件给你转个论坛的帖子做参考取之于“民”用之于“民”,几段代码，希望对后来者有帮助，不要见笑。

1、记录脚本：同一卡片号的每一根钢的数据记录，有多少根，记多少行#include "apdefap.h"int gscAction( void ){#pragma code ()char FileName[20] = " ";double genshu,row,col;__object* pExcel = NULL;genshu=GetTagDouble("记数根数");SetTagDouble("根数记录",genshu);row=genshu+4;if((GetTagBit("钢温记录信号")==1)){pExcel = __object_create("Excel.Application.9"); //9表示用的是office 2000pExcel->Visible =0;pExcel->Workbooks ->Open ("e:\\LZEQ_HMI\\JILU.xls");//Cells(row,col)pExcel->Worksheets("sheet1")->Cells(row,1)->V alue=GetTagWord("记数根数");pExcel->Worksheets("sheet1")->Cells(row,2)->V alue=GetTagChar("开始时间");pExcel->Worksheets("sheet1")->Cells(row,3)->V alue=GetTagWord("1#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,4)->V alue=GetTagFloat("1#水箱流量记录"); pExcel->Worksheets("sheet1")->Cells(row,5)->V alue=GetTagWord("2#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,6)->V alue=GetTagFloat("2#水箱流量记录"); pExcel->Worksheets("sheet1")->Cells(row,7)->V alue=GetTagWord("3#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,8)->V alue=GetTagFloat("3#水箱流量记录"); pExcel->Worksheets("sheet1")->Cells(row,9)->V alue=GetTagWord("4#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,10)->V alue=GetTagWord("5#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,11)->V alue=GetTagFloat("4#水箱流量记录"); pExcel->Worksheets("sheet1")->Cells(row,12)->V alue=GetTagWord("6#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,13)->V alue=GetTagWord("7#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,14)->V alue=GetTagFloat("5#水箱流量记录"); pExcel->Worksheets("sheet1")->Cells(row,15)->V alue=GetTagWord("8#高温计温度记录"); pExcel->Worksheets("sheet1")->Cells(row,16)->V alue=GetTagChar("系统时间"); SetTagBit("钢温记录信号",0);}pExcel->ActiveWorkbook->Save;pExcel->Workbooks->Close();pExcel->Quit();__object_delete(pExcel);return 0;}2、存储脚本。

wincc 通过excel生成日报表月报表

wincc 通过excel生成日报表月报表
请教：怎样把wincc的归档变量存储到excel中，而且每天生成一个日报表，每月生成一个月报表
问题补充：
请教范范老师，因为我对vb实在是不熟悉，还得请教两个问题：1.这个脚本是不是编在vb的全局脚本里面，2.你说到的执行时间，我不知道要怎么控制这个时间，3.我把变量导入到excel里的是瞬时值还是平均值，因为我想在excel 里显示一个小时的平均值，需要怎么做呢
最佳答案
要做这个需要有一定的VB功底，你可以抄一抄别人的程序，然后运行试验试验，最后把程序变成自己的，这样最快最容易达到目的。

下面是我写的一段日报表，已经投入项目使用。

需要注意的是脚本执行的时间要控制好。

因为字数限制发的是图片版的，还需要敲一下程序。

图片说明：1，程序2，程序23，程序3
标签。

wicc 写EXCEL 表格

3 其他图形代码
Hale Waihona Puke WICC 写EXCEL 表格
1. WINCC新建EXCEL，并把变量值和公式值计算后的值写入 EXCEL表格中
On Error Resume Next Dim objExcelApp Set objExcelApp=CreateObject("Excel.Application")'创建表格对象模型 objExcelApp.Visible=False objExcelApp.Workbooks.add objExcelApp.worksheets(1).name="我的" objExcelApp.Worksheets("我的").Activate '激活工作表格 With objExcelApp.worksheets("我的") '数据写 .cells(2,2).value = HMIRuntime.Tags("EXCEL_1").read .cells(2,3).value= HMIRuntime.Tags("EXCEL_2").read .cells(3,2).value= HMIRuntime.Tags("EXCEL_3").read .cells(3,3).Formula = HMIRuntime.Tags("EXCEL_4").read .cells(4,2).Formula = "=MAX(R2C2:R3C2)" .cells(4,3).Formula = "=AVERAGE(R2C2:R3C3)" End With
objExcelApp.Activeworkbook.saveAs "e:\我的.xls" objExcelApp.Workbooks.Close'退出工作簿 objExcelApp.Quit '表格模型退出 Set objExcelApp= Nothing'释放资源 Set fso=Nothing'释放资源

WINCC嵌入式EXCEL报表系统使用手册

WINCC 嵌入式EXCEL 报表系统使用手册1、打开报表画面点击主画面中“报表”按钮，打开报表画面：2、界面介绍报表画面功能介绍时间设置3、选择报表文件在“报表选择”栏中选择需要生成报表的名称：4、选择报表类型在“类型选择”栏选择报表类型：日报表、月报表、年报表、自由报表，具体介绍如下：●日报表——为一天的报表数据，每小时产生一个记录，共24条记录，时间为“00:00:00”至“23:59:59”。

●月报表——为一月的报表数据，每天产生一个记录，根据月份的不同分别产生28-31条记录，时间为“01 00:00:00”至“30 23:59:59”（或“2823:59:59”/“29 23:59:59”/“31 23:59:59”）。

●年报表——为一年的报表数据，每月产生一个记录，共12条记录，时间为“01-01 00:00:00”至“12-31 23:59:59”。

●自由报表——为指定时间段的报表数据，时间段由“开始时间”和“结束时间”共同决定，每一个“时间间隔”产生一个记录，记录条数由时间段和时间间隔决定。

5、设置报表时间根据报表类型，选择报表时间。

点击“日历”可以打开日历控件，控件中可以快速选择日月年，也可以通过下拉窗口进行选择。

当为日报表时，需要设置“年”、“月”、“日”；当为月报表时，需要设置“年”、“月”；当为年报表时，需要设置“年”；当为自由报表时，需要设置开始和结束时间的“年”、“月”，“日”、“时”、“分”等全部项，间隔时间也需要设置。

6、生成报表当“报表选择”、“类型选择”和时间选择均设置完成后，点击“生成报表”按钮，系统将开始在右边表格中生成出报表，在生成报表的过程中能看见表格中数据逐渐显示，也能通过下方进度条看见完成情况。

生成报表时，空数据区用“#”填充，错误数据区用“##”填充，报表生成完毕后将有“成功生成数据文件！”提示。

同时，报表生成后将自动保存到项目中“report”文件夹下。

Wincc与Excell数据交换实例一二

Wincc与Excell数据交换实例一二Wincc与Excell数据交换实例一二Liking5200，sdyjdx关键字：Wincc，Excell，数据交换，动态数据交换（DDE）现实工程中，经常会遇到重要的参数存储子Excell表格中，在Wincc组态画面中，根据现场参数数值，查询调用对应Excell表格内的数据，同时根据经验在此将更新参数重新保存到Excell中去，这就要求我们实现Wincc与excell的通讯读写。

本文通过两个实例，介绍两种Wincc与excell的读写方法。

实例1Excell不做任何处理，通过Wincc按钮创建C动作，实现对Excell 的读写。

首先建立Excell文件，如d:\\Wincc_Excell_RW.xls。

内容如下：Wincc，建立四个内部变量：ReadExcell_X，Excell_Address_R，WriteExcell_X，Excell_Address_W，分别代表读取的数据，读取地址，写入的数据，输入地址，并在组态画面组态四个IO域与之相对应，组态两个按钮“按钮-读-Excell-X”，“按钮-写-Excell-X”，启动读写功能。

为了数据通用，变量类型定义为“文本变量16位字符集”，四个IO域数据格式选“字符串”，根据需要也可设为其他数据类型，但要确保Wincc与Excell相同，不然将发生读写错误或读取不正确。

按钮“按钮-读-Excell-X”，“按钮-写-Excell-X”，分别创建Ｃ动作如下按钮“按钮-读-Excell-X”，Ｃ动作：#include "apdefap.h"void OnClick(char* lpszPictureName, char* lpszObjectName, char*lpszPropertyName){#pragma code("Shell32.dll") //调用动态链接库char tag1[20],tag2[20],add[20];__object* pExcel = NULL; //建立 pExcel 指针用来对 EXCEL 进行操作HWND handle=NULL;handle=FindWindow(NULL,"WinCC-运行系统 - ");if (MessageBox(handle,"Start Reading","Read From Excell", MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB _SYSTEMMODAL)==IDYES){ pExcel = __object_create("Excel.Application");pExcel->Visible = 0;pExcel->Workbooks ->Open ("d:\\Wincc_Excell_RW.xls");strcpy(add,GetTagChar("Excell_Address_R"));strcpy(tag1,pExcel->Worksheets("sheet1")->Range(add)->V alue);SetTagChar("ReadExcell_X",tag1);//将地址Excell_Address_R，excel文件里面的内容写到外部变量ReadExcell_XpExcel->Quit();//退出Excel}__object_delete(pExcel);}按钮“按钮-写-Excell-X”，Ｃ动作：#include "apdefap.h"void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName){#pragma code("Shell32.dll")//调用动态链接库char tag1[20],tag2[20],add[20];__object* pExcel = NULL; //建立 pExcel 指针用来对 EXCEL 进行操作HWND handle=NULL;handle=FindWindow(NULL,"WinCC-运行系统 - ");if (MessageBox(handle,"Start Writing","Write Into Excell",MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB _SYSTEMMODAL)==IDYES) { pExcel = __object_create("Excel.Application");pExcel->Visible = 0;//控制excel文件是否可见,当1时,excel文件可见.pExcel->Workbooks ->Open ("d:\\Wincc_Excell_RW.xls");strcpy(add,GetTagChar("Excell_Address_W"));pExcel->Worksheets("sheet1")->Range(add)->Value =GetTagChar("WriteExcell_X");if (MessageBox(handle,"Save the Excell","Write Into Excell", MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB _SYSTEMMODAL)==IDYES) //{ } pExcel->ActiveWorkbook->Save();pExcel->DisplayAlerts = 0;pExcel->Workbooks->Close();//关闭文件pExcel->Quit();//退出Excel}__object_delete(pExcel);}运行情况如下：读Ｂ１数据：点击是读Ｃ５数据：点击是写Ｂ１数据：点击是然后再读取Ｂ１：点击是如此，我们可以对Excell文件d:\\Wincc_Excell_RW.xls ――Sheet １的任意数据进行读写。

WINCC报表说明

WINCC报表制作说明本次报表制作以WINCC7.0为基础，利用自带的“变量记录”功能，进行变量归档操作。

然后利用WINCC自带的控件“Wincc Online Table Control”关连变量归档，可实现简单的报表的查询功能。

另一种方法为利用EXCEL的宏访问WINCC数据库（变量归档）。

本方法中需安装Microsoft Office 2003版本。

此种方法优点在于利用WINCC的数据库的开放性，将EXCEL与数据库进行关联，可方便的读取所要查询的数据。

另外EXCEL文件可以按照要求编辑修改表格样式、数据格式等，方便用户存档及打印。

具体实现方法如下：1、在WINCC中新建变量归档2、新建EXCEL文件，用于读取变量归档数据3、打开EXCEL文件，按照要求编辑报表表格样式，在表格中添加“Microsoft Date and Time Picker Control6.0”控件，此控件用于设定要查询报表的日期4、在EXCEL表格中新建查询按钮，作为报表的查询触发器5、编辑代码，进入Visual Basic编辑器进行代码编写，代码中涵盖WINCC归档时间与本地时间的转换及变量与表格的关联性操作。

6、代码编辑完成后，需运行WINCC组态软件，打开新建的EXCEL文件，提示是否启用“宏”操作，此时要选择启用，进入报表表格界面，在日期控件中选择要查询的数据日期，点击查询按钮，归档变量数据就可以显示在对应的表格中，可保存，可打印，可修改。

以上两种报表均在1608009风机在线监测项目上应用。

对于VB代码编辑部分，只需要根据EXCEL表格的样式及变量归档数据名称做出相应的修改即可。

设计部：付友维2017年6月20日。

wincc报表例子vb

用VBS脚本实现，就是把文件名称以变量的形式表示。

参考'关闭保存Dim patch,filenamefilename=CStr(Year(Now))&CStr(Month(Now))&CStr(Day(Now))&CStr(Hour(N ow))+CStr(Minute(Now))&CStr(Second(Now))patch= "d:\"&filename&"demo.xls"objExcelApp.ActiveWorkbook.SaveAs patchobjExcelApp.Workbooks.CloseobjExcelApp.QuitSet objExcelApp= Nothing对于Excel报表，用VBS最灵活，Excel定义好格式后wincc来填空，平均累计值就用Excel的功能。

Dim excelappDim aa,bb,ccSet excelapp = CreateObject("Excel.Application")Set aa = HMIRuntime.tags("tag1")excelapp.visible = False'Trueexcelapp.workbooks.open "D:\excel.xls"bb = Now 'getcurrent_datetime()aa.ReadMsgBox CStr(bb)excelapp.cells(1,1).value = "rrrrrr"'111111excelapp.cells(1,2).value = CStr(bb)excelapp.cells(2,2).value = CStr(aa.value)excelapp.cells(3,2).value = CInt(aa.value)excelapp.cells(4,2).value = CSng(aa.value)excelapp.cells(5,2).value = CDbl(aa.value)excelapp.cells(6,2).value = CLng(aa.value)excelapp.cells(3,3).value = ScreenItems("33").outputvalueexcelapp.cells(4,4).value = ScreenItems("35").outputvaluecc = "D:\excel" + Mid(CStr(bb), 1, 4)+ Mid(CStr(bb), 6, 2)+ Mid(CStr(bb), 9, 2) + Mid(CStr(bb), 12, 2)+ Mid(CStr(bb), 15, 2)+ Mid(CStr(bb), 18, 2) + ".xls" MsgBox ccexcelapp.DisplayAlerts = False '对打开的文件，直接保存时，避免弹出对话框窗口，而是直接覆盖excelapp.activeworkbook.saveas cc '根据当前日期时间，另存为新的文件'excelapp.activeworkbook.save ’对打开的文件，直接保存'excelapp.activeworkbook.saveAs "D:\excelcopy.xls" ’直接另存为新的文件excelapp.workbooks.closeexcelapp.quitSet excelapp = Nothing第一段：Option ExplicitFunction actionDim fso,myfile,daystr,dstr,fnamedstr = FormatDateTime(Date)fname="d:\" + dstr + ".xls"Set fso = CreateObject("s cripting.FileSystemObject")Set MyFile = fso.GetFile("d:\ExcelExample.xls")MyFile.Copy (fname)End Function第二段：Option ExplicitFunction actionDim fso,myfilep,daystr,dstr,fnameSet fso = CreateObject("s cripting.FileSystemObject")dstr = FormatDateTime(Date)HMIRuntime.Tags("i").write fso.GetAbsolutePathName("")fname=HMIRuntime.ActiveProject.Path++dstr+.xlsDim ObjExcelAppSet objExcelApp = CreateObject("Excel.Application")objExCelApp.Visible = TrueobjExcelApp.Workbooks.Open fnameDim ii=1Do While objExcelApp.worksheets ("sheet1").Cells(i, 1).VAlue<>""i=i+1LoopobjExcelApp.worksheets ("sheet1").Cells(i, 2).VAlue = HMIRuntime.Tags("I-COD").read objExcelApp.worksheets ("sheet1").Cells(i, 3).VAlue = HMIRuntime.Tags("I-SS").readobjExcelApp.worksheets ("sheet1").Cells(i, 4).VAlue = HMIRuntime.Tags("I-PH").readobjExcelApp.worksheets ("sheet1").Cells(i, 5).VAlue = HMIRuntime.Tags("I-F").readobjExcelApp.worksheets ("sheet1").Cells(i, 6).VAlue = HMIRuntime.Tags("I-FI").readobjExcelApp.worksheets ("sheet1").Cells(i, 7).VAlue = HMIRuntime.Tags("O-COD").read objExcelApp.worksheets ("sheet1").Cells(i, 8).VAlue = HMIRuntime.Tags("O-SS").readobjExcelApp.worksheets ("sheet1").Cells(i, 9).VAlue = HMIRuntime.Tags("O-NH4N").read objExcelApp.worksheets ("sheet1").Cells(i, 10).VAlue = HMIRuntime.Tags("0-P").readobjExcelApp.worksheets ("sheet1").Cells(i, 11).VAlue = HMIRuntime.Tags("O-F").read objExcelApp.worksheets ("sheet1").Cells(i, 12).VAlue = HMIRuntime.Tags("O-FI").read objExcelApp.worksheets ("sheet1").Cells(i, 1).VAlue =NowobjExcelApp.ActiveWorkbook.SaveobjExcelApp.Workbooks.ClosEobjExcelApp.QuiTSet ObjEXceLapp = NothingEnd Functionc。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

因为ms word和excel的文档都支持html文本格式，因此可以先用word或excel做好模版，另存为Web 页，然后将该html改成jsp，将数据部分动态填入即可，不用很辛苦的调整格式word页面只要在jsp头设置如下指令：<%@page contentType="application/msword;charset=GBK" %>excel如下：<%@page contentType="application/vnd.ms-excel;charset=GBK" %>使用这种方式客户端必须安装有office软件，用户访问时将在ie中直接用word或excel打开该页面。

microsoft关于服务器端动态创建office文档的资料（asp示例）：/default.aspx?scid=KB;en-us;301044&简单示例：使用word建立一文档，画表格如下：----------------------------| 用户名 | 真实姓名 | 性别 |----------------------------| guest | 路人甲 | 男 |----------------------------保存为Web页test.htm，将test.htm改名为test.jsp，修改其中guest、路人甲、男为从数据库动态查询，如下：<%@ page contentType="application/msword;charset=GBK" %><%@ page import="java.sql.*" %><html xmlns:o="urn:schemas-microsoft-com:office:office"xmlns:w="urn:schemas-microsoft-com:office:word"xmlns="/TR/REC-html40"><head><meta http-equiv=Content-Type content="text/html; charset=GB2312"><meta name=ProgId content=Word.Document><meta name=Generator content="Microsoft Word 9"><meta name=Originator content="Microsoft Word 9"><title>用户信息</title><style></style></head><body lang=ZH-CN style='tab-interval:21.0pt;text-justify-trim:punctuation'><div class=Section1 style='layout-grid:15.6pt'><table border=1 cellspacing=0 cellpadding=0 style='border-collapse:collapse;border:none;mso-border-alt:solid windowtext .5pt;mso-padding-alt:0cm 5.4pt 0cm 5.4pt'> <tr><td width=189 valign=top style='width:142.0pt;border:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'>用户名</td><td width=189 valign=top style='width:142.05pt;border:solid windowtext .5pt;border-left:none;mso-border-left-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'> 真实姓名</td><td width=189 valign=top style='width:142.05pt;border:solid windowtext .5pt;border-left:none;mso-border-left-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'> 性别</td><%Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");String url="jdbc:odbc:mydb";//连接mydb数据库Connection con=DriverManager.getConnection (url, "", "");try{Statement stmt=con.createStatement();//查询employee表ResultSet rs=stmt.executeQuery("select user_name, real_name, gender from employee ");while(rs.next()){%><tr><td width=189 valign=top style='width:142.0pt;border:solid windowtext .5pt;border-top:none;mso-border-top-alt:solid windowtext .5pt;padding:0cm 5.4pt 0cm 5.4pt'> <%=rs.getString("user_name")%></td><td width=189 valign=top style='width:142.05pt;border-top:none;border-left:none;border-bottom:solid windowtext .5pt;border-right:solid windowtext .5pt;mso-border-top-alt:solid windowtext .5pt;mso-border-left-alt:solid windowtext .5pt; padding:0cm 5.4pt 0cm 5.4pt'><%=rs.getString("real_name")%></td><td width=189 valign=top style='width:142.05pt;border-top:none;border-left:none;border-bottom:solid windowtext .5pt;border-right:solid windowtext .5pt;mso-border-top-alt:solid windowtext .5pt;mso-border-left-alt:solid windowtext .5pt; padding:0cm 5.4pt 0cm 5.4pt'><%=rs.getString("gender")%></td></tr><%} // end whilers.close();stmt.close();} finally {con.close();}</table><![if !supportEmptyParas]> <![endif]><o:p></o:p>。

wincc的excel报表实例

合集下载

如何在Excel中访问WinCC变量归档数据

wincc的excel报表实例

在Excel中访问WinCC变量归档数据

WinCC_To_Excel

wincc 通过excel生成日报表月报表

wicc 写EXCEL 表格

WINCC嵌入式EXCEL报表系统使用手册

Wincc与Excell数据交换实例一二

WINCC报表说明

wincc报表例子vb

文档推荐

最新文档

wincc的excel报表实例

合集下载

如何在Excel中访问WinCC变量归档数据

wincc的excel报表实例

在Excel中访问WinCC变量归档数据

WinCC_To_Excel

wincc 通过excel生成 日报表 月报表

wicc 写EXCEL 表格

WINCC嵌入式EXCEL报表系统使用手册

Wincc与Excell数据交换实例一二

WINCC报表说明

wincc报表例子vb

文档推荐

最新文档

wincc 通过excel生成日报表月报表