wincc vbs脚本

变量读写： Write和Read方法的语法： 读 ：

1 Dim objTag Set objTag=HMIRunTime.Tags(\变量名\ objTag.Read

2 HMIRunTime.Tags(\变量名\ 写：

1 Dim objTag Set objTag=HMIRunTime.Tags(\变量名\ objTag.Write 1 '向变量写入数值1 2 HMIRunTime.Tags(\变量名\ 中间变量的值写入 ：Dim objTag,val Set objTag=HMIRunTime.Tags(\变量名\ objTag.Read

val=objTag.Value '中间变量val存放了变量的值 VBS

语言使用方法

概述：

VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言.

我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编

WinCC中全局脚本VBS归档到Excel中

用一个变量触发数据归档到Excel中，请高手看看我写的为何不能运行。 Sub procedure1

If Item.OutputValue = \

Dim oVar,oBlendingVar,objExcelApp,oWorkBook,ExcelTableFull,oFileName On Error Resume Next ExcelTableFull=0

Set objExcelApp=CreateObject(\ objExcelApp.Visible=False

Set oWorkBook=objExcelApp.Workbooks.Open(\模板\\Receipt_Table.xls\ Dim iBlankLine

iBlankLine=oWorkBook.ActiveSheet.Columns(1).Find(\ 'MsgBox(\ If iBlankLine<504 Then

objExcelApp.Cells(iBlankLine,1).Value=HMIRuntime.SmartTags(\ objExcelApp.Cells(iBlankLine,2).Value=H

WinCC中全局脚本VBS归档到Excel中

用一个变量触发数据归档到Excel中，请高手看看我写的为何不能运行。 Sub procedure1

If Item.OutputValue = \

Dim oVar,oBlendingVar,objExcelApp,oWorkBook,ExcelTableFull,oFileName On Error Resume Next ExcelTableFull=0

Set objExcelApp=CreateObject(\ objExcelApp.Visible=False

Set oWorkBook=objExcelApp.Workbooks.Open(\模板\\Receipt_Table.xls\ Dim iBlankLine

iBlankLine=oWorkBook.ActiveSheet.Columns(1).Find(\ 'MsgBox(\ If iBlankLine<504 Then

objExcelApp.Cells(iBlankLine,1).Value=HMIRuntime.SmartTags(\ objExcelApp.Cells(iBlankLine,2).Value=H

我们先来看一个简单的 vbs脚本实例 Const aa=\例子\cc=\

语法介绍 VBScript 常数什么是常数？常数是具有一定含义的名称，用于代替数字或字符串，其值从不改变。 VBScript定义了许多固有常数。详细信息，请参阅 VBScript 语言参考。创建常数的方法：您可以使用 Const 语句在 VBScript 中创建用户自定义常数。使用 Const 语句可以创建名称具有一定含义的字符串型或数值型常数，并给它们赋原义值。例如： Const MyString = \这是一个字符串。 \请注意字符串文字包含在两个引号 (\之间。这是区分字符串型常数和数值型常数的最明显的方法。日期文字和时间文字包含在两个井号 (#) 之间。例如：

Const CutoffDate = #6-1-97# 最好采用一个命名方案以区分常数和变量。这样可以避免在运行 Script时对常数重新赋值。例如，可以使用 “vb”或“con”作常数名的前缀，或将常数名的所有字母大写。将常数和变量区分开可以在开发复杂的 Script 时避免混乱。

VBScript 变量什么是变量？变量相当于一个容器，我们可以给这个容器起名叫做 A，那么我们可以向 A杯子内放入任何

Sub OnClick(Byval Item)

Dim fso,folder Dim type1

Dim patch,filename Dim

testposition,testnumber,startdate,printdate,brand,tyremodel,rim,tread,condition,load,speed,pressure,status

Set testposition=HMIRuntime.tags(\Set testnumber=HMIRuntime.tags(\Set startdate=HMIRuntime.tags(\Set printdate=HMIRuntime.tags(\Set brand=HMIRuntime.tags(\Set tyremodel=HMIRuntime.tags(\Set rim=HMIRuntime.tags(\Set tread=HMIRuntime.tags(\

Set condition=HMIRuntime.tags(\Set

wincc中使用vbs的常用函数

1.函数array() 功能:创建一个数组变量 格式:array(list)

参数:list 为数组变量中的每个数值列,中间用逗号间隔 例子:

<% i = array (“1”,”2”,”3”) %> 结果: i 被赋予为数组 2.函数Cint()

功能:将一表达式/其它类型的变量转换成整数类型(int) 格式:Cint(expression)

参数:expression 是任何有效的表达式/其它类型的变量 例子: <%

f = ”234”

response.write cINT(f) + 2 %> 结果: 236

函数Cint()将字符”234”转换 成整数234.如果表达式为空,3.函数:Creatobject()

功能:创建及返回一个ActiveX对象. 格式:Creatobject(obname) 参数bname 是对象的名称 例子: <%

Set con = Server.CreateObject(“ADODB.Connection”)

——————1、wincc全局脚本动作-------隐藏控件——————

#include \ int gscAction( void ) {

// WINCC:TAGNAME_SECTION_START

// syntax: #define TagNameInAction \// next TagID : 1

// WINCC:TAGNAME_SECTION_END int value;

value=GetTagBit(\为触发的变量。 if(value==1) {

SetVisible(\按钮8\为控制对象所在画面名，“按钮8”为对象名称 } else {

SetVisible(\按钮8\}

// WINCC:PICNAME_SECTION_START

// syntax: #define PicNameInAction \// next PicID : 1

// WINCC:PICNAME_SECTION_END

return 0; }

===================================================== 说明：在触发器里选择变量IM_in

——————2、wincc

全局脚本动作---

WinCC脚本案例保留 2010-09-16 16:44

最近做一个WinCC跟ERP通讯的一个小项目,将脚本语言保留下来,以备不时之需! 仅仅是保留,各位看官如发现不妥之处请加以指教.

1.通过扫描枪扫描到ID号传给PLC,WinCC读取到ID号从ERP数据库中查找相关数据,写回到PLC,并给PLC一个写完成确认信号.(数据库是SqlServer2000)

Dim DB240trigger,db241trigger

db240trigger=HMIRuntime.Tags(\db241trigger=HMIRuntime.Tags(\Dim ss,str

str=HMIRuntime.Tags(\ss=CStr(str)

If (db240trigger=1 And db241trigger=0 ) Then Dim sPro,sDsn,sSer,sCon,sSql

Dim oRsMaterial,conn,oCom,oItem,oRsSCHEMA Dim database,server,uid,pwd

sCon =\Set conn = CreateObject(\conn.ConnectionString = sCon conn.Op

WinCC flexible ES -- 创建HMI组态 -- 创建脚本 在 WinCC flexible PC 运行系统中如何将打印输出到不同的打印机上？ 在 WinCC flexible 中如何实现字符串归档？ 在 WinCC flexible 中如何通过脚本访问 SQL 数据库？ 创建脚本的技巧与窍门 如何在脚本中实现等待(延时)函数？ WinCC flexible的PC项目中怎样使用脚本来保存或者读取文本文件的信息？ 对于基于 Windows 的面板，如何使用脚本将信息保存到文本文件或读取出来？ 如何在WinCC flexible PC运行系统中通过脚本启动一个声音文件？ 如何在 WinCC flexible 中用脚本做动态对象？ 在 WinCC flexible 中提供哪些 VBS 信息和编程向导？

collapse('/WWsupport/',24248681, document.img_24248681) 在 WinCC flexible PC 运行系统中如何将打印输出到不同的打印机上？ 隐藏订货号显示订货号订货号:

说明

在 WinCC flexible PC 运行系统中无法

WINCC C脚本的标准函数

标准函数

该系统包含标准函数。 可以按需要修改这些函数。 此外，还可以自己创建标准函数。 该系统包括一个标准函数集。 一、Alarm - 简短描述

Alarm组包含控制WinCC报警控件的函数。标准函数可用于工具栏中的每一个按钮。这些函数可用来创建自定义工具栏，例如选择画面,或者定义控件上的设置。

1．void AcknowledgeMessage(DWORD MsgNr)函数，确认消息系统中带编号的消息，该编号被传递为参数。

使用标准函数操作WinCC报警控件的实例 {//确认选择的报警记录消息

AcknowledgeMessage(GetTagWord(\ }

指定待确认的消息号。在本例中是从变量读取的。 2．BOOL AXC_OnBtnArcLong(char* lpszPictureName, char* pszMsgWin)函数，在消息窗口中该函数表示消息存储在长期归档中。

使用标准函数操作WinCC报警控件的实例 {// 跳转到WinCC报警控件中的第一条消息 AXC_OnBtnMsgFirst(\