欢迎来到天天文库
浏览记录
ID:50507197
大小:95.56 KB
页数:7页
时间:2020-03-06
《WINCC常用脚本说明.pdf》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、WINCC常用脚本说明——第一篇(2011-06-郑州-SZL)一、VBS1.定义变量格式:Dim变量实例:DimGDH1,PCH1,CL1,BC1,Silo1,PH1DimGDH2,PCH2,CL2,BC2,Silo2,PH22.注释格式:’’(英文下)实例:'换柜21、22、23、2425'工单开始31、32、33、3435'工单结束41、42、43、4445'1--换柜,2--工单开始,3--班开始,4--工单结束,5--班结束3.读变量取值格式:=HMIRuntime.Tags("")
2、.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
3、格式:MsgBox("")实例:MsgBox("CP工单开始取消")7.IF判断格式:ifHMIRuntime.tags("").read<>0thenEndif实例:ifHMIRuntime.tags("WSJ_A_GDH_1").read<>0thenEndif8.打开控件组态对话框格式:ScreenItems(“”).TollbarButtonClick=实例:ScreenItems(“Control1”).TollbarButtonClick=29.数据库操作WinCC访问数据库的三种方法:
4、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=S
5、QLLEDB.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;P
6、assword=dbzs1;InitialCatalog=DBZS1;DataSource=10.65.248.20WINCC"'strSQL="selectdistinctMATIDfromMES_ZS_WOR_CUT_BACKwhereWOID='"&YX&"'"SetobjCoNnection=CreateObject("ADODB.Connection")objConnection.ConnectiOnString=strConnectionStringobjConnection.open
7、SetobjR=CreateObject("ADODB.RecorDset")SetobJCommand=CreateObject("ADODB.Command")objCommand.ActiveCoNnection=objConnection2)查找数据库实例:strSQL="Selectmzwcb.MATIDFROMMES_ZS_WOR_CUT_BACKmzwcbWHEREmzwcb.WOID='"&YX&"'ANDmzwcb.MATIDLIKE'270%'"3)写数据库实例:objComma
8、nd.ComMandText=StrsqLSetobjR=objCommand.ExEcuteJX=""JX=objR(0)HMIRuntime.Tags("CP_A_JXPH").WriteJX4)关闭数据库实例:SetobJCommand=NothingobjConnection.CloseSetobjR=NothingSetobjCoNnection=Nothing5)数据库存储过程操作objCommand.CommandText="WSJ_REPORT'"&G
此文档下载收益归作者所有