WINCC常用脚本说明

WINCC常用脚本说明——第一篇（2011-06-郑州-SZL）一、VBS1.定义变量格式：Dim变量实例：DimGDH1,PCH1,CL1,BC1,Silo1,PH1DimGDH2,PCH2,CL2,BC2,Silo2,PH22.注释格式：’’（英文下）实例：'换柜21、22、23、24\25'工单开始31、32、33、34\35'工单结束41、42、43、44\45'1--换柜，2--工单开始，3--班开始，4--工单结束，5--班结束3.读变量取值格式：=HMIRuntime.Tags().READ实例：MES_WO=MES_WO=HMIRuntime.Tags(CP_A_GDH).READ4.写变量赋值格式：HMIRuntime.Tags().Write实例：HMIRuntime.Tags(CP_A_GDCZBZ).Write3,15.调用windowsdialog格式：IfMsgBox(,vbYesNo,CONFIRM)=Then实例：IfMsgBox(确定工单开始？,vbYesNo,CONFIRM)=vbYesThen6.提示Messagebox格式：MsgBox()实例：MsgBox(CP工单开始取消)7.IF判断格式：ifHMIRuntime.tags().read0thenEndif实例：ifHMIRuntime.tags(WSJ_A_GDH_1).read0thenEndif8.打开控件组态对话框格式：ScreenItems(“”).TollbarButtonClick=实例：ScreenItems(“Control1”).TollbarButtonClick=29.数据库操作WinCC访问数据库的三种方法：a)使用WinCCOLEDBProvider访问WinCC过程值和消息归档实例：Setconn=CreateObject(“ADODB.Connection”)Conn.open“Provider=WinCCOLEDBProvider.1;catalog=CC_OpenArch;DataSource=.\WinCC”b)使用MSOLEDBProvider访问WinCC用户归档实例：Setconn=CreateObject(“ADODB.Connection”)Conn.open“Provider=SQLLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=false;InitialCatalog=CC_OpenArch;DataSource=.\WinCC”c)使用VBS脚本通过ODBC访问数据库1)连接数据库：实例：YX=HMIRuntime.Tags(CP_A_GDH).READstrConnectiOnString=Provider=SQLOLEDB.1;PersistSecurityInfo=False;UserID=dbzs1;Password=dbzs1;InitialCatalog=DBZS1;DataSource=10.65.248.20\WINCC'strSQL=selectdistinctMATIDfromMES_ZS_WOR_CUT_BACKwhereWOID='&YX&'SetobjCoNnection=CreateObject(ADODB.Connection)objConnection.ConnectiOnString=strConnectionStringobjConnection.openSetobjR=CreateObject(ADODB.RecorDset)SetobJCommand=CreateObject(ADODB.Command)objCommand.ActiveCoNnection=objConnection2)查找数据库实例：strSQL=Selectmzwcb.MATIDFROMMES_ZS_WOR_CUT_BACKmzwcbWHEREmzwcb.WOID='&YX&'ANDmzwcb.MATIDLIKE'270%'3)写数据库实例：objCommand.ComMandText=StrsqLSetobjR=objCommand.ExEcuteJX=JX=objR(0)HMIRuntime.Tags(CP_A_JXPH).WriteJX4)关闭数据库实例：SetobJCommand=NothingobjConnection.CloseSetobjR=NothingSetobjCoNnection=Nothing5)数据库存储过程操作objCommand.CommandText=WSJ_REPORT'&GDH1&','&BC1&','&PCH1&','&PH1&','&Silo1&',&CL1&,'&CStr(Now)&',3'V=WSJ_REPORT'&GDH&','&BC&','&PCH&','&PH&','&Silo&',&CL&,'&CStr(Now)&',3'MSgbox(1BKS)'objCommand.Execute二、C脚本1.定义变量格式：type变量实例：intGDH1;ByteGDH2;DoubleGDH3;2.注释格式：//（英文下）实例：//换柜21、22、23、24\25//工单开始31、32、33、34\35//工单结束41、42、43、44\45//1--换柜，2--工单开始，3--班开始，4--工单结束，5--班结束3.读变量取值格式：GetTagByte(,);实例：GetTagByte(WSJ_A_GDBL);GetTagByte(WSJ_A_OFWO5);4.写变量赋值格式：SetTagByte(,);实例：SetTagByte(WSJ_A_GDBL,1);SetTagByte(WSJ_A_OFWO5,1);5.调用windowsdialog格式：MsgBox(,vbYesNo,CONFIRM)实例：MsgBox(确定工单开始？,vbYesNo,CONFIRM)=vbYesThen6.提示Messagebox格式：MsgBox()实例：MsgBox(CP工单开始取消)7.IF判断格式：if（）else实例：if(WSJ_A_GDH_1==0)Else8.打开控件组态对话框格式：SetPropWord(lpszPictureName,””,””,)实例：SetPropWord(lpszPictureName,”Control1”,”TollbarButtonClick”,2)三、动态对话框函数判断取值实例：('C_SA509_CASING_CUR_1'=63||'C_SA509_CASING_CUR_2'=63||'C_SA509_CASING_CUR_3'=63)&&'C_SA509_STATE'==1四、WinCC组包含影响整个WinCC系统的函数1.BOOLGetHWDiag(LPCTSTRlpszPictureName,LPCTSTRlpszObjectName,LPCTSTRlpProperties)函数运行时该函数可实现诊断的直接启动，由事件触发。2.BOOLGetHWDiagLevel(LPCTSTRlpszPictureName,LPCTSTRlpszObjectName,LPCTSTRlpProperties,DWORDdwLevel)函数根据在dwLevel下面指定的用户管理员功能号为激活的用户执行用户配置文件级测试。3.BOOLGetKopFupAwlLevel(LPCTSTRlpszPictureName,LPCTSTRlpszObjectName,LPCTSTRlpProperties,DWORDdwLevel)函数根据在dwLevel下面指定的用户管理员功能号为激活的用户执行用户配置文件级测试。4.voidOnDeactivateExecute()函数终止WinCC时调用该函数。由于它是标准函数，可以插入指令，然后执行它们。5.voidOnErrorExecute(CCAPErrorExecuteErrorExecute)函数执行动作或函数而发生错误时由系统调用OnErrorExecute。此函数能够确定出错的准确原因。由系统调用该函数，并且不要求附加的调用命令。由于包括作为标准函数的此函数，可以改变输出的类型。6.unsignedintExecute(char*Program_Name)函数,用指定的名称启动该程序。从WinCC启动程序的实例{//启动程序calc.exe执行程序(C:\\Winnt\\system32\\calc.exe);}指定带路径的文件为参数。