2021年1月29日
搬家第一天-9.WinccV7.3调整报警控件列宽
摘要： 页面上有一个报警控件，名字为ctrlAlarm,希望打开页面的时候能够把列宽调整好，那么可以在页面打开事件中写入以下代码： Dim ctrlAlarm,ctrlColumn,iSet ctrlAlarm=ScreenItems("ctrlAlarm")Set ctrlColumn=ctrlAlarm 阅读全文
posted @ 2021-01-29 12:12 来自金沙江的小鱼 阅读(1325) 评论(4) 推荐(0)
搬家第一天-8.WinccV7.3多语言项目制作方法
摘要： Wincc 提供了多语言功能，此文本介绍了 Wincc 常用控件的双语言制作方法。项目在中文版wincc V7.3 平台开发，wincc 安装时，选择了英文（美国）和中文。程序只是实验多语言功能，不对单词拼写和语法做讨论。 1. 全项目语言修改 界面上放置两个按钮，一个用于转换成英文，一个用于转换成 阅读全文
posted @ 2021-01-29 11:24 来自金沙江的小鱼 阅读(2027) 评论(0) 推荐(0)
搬家第一天-7.winccV7.3使用复选框C脚本显示和隐藏趋势
摘要： wincc上放置趋势控件ctrlTrend,显示32个趋势；放置一个复选框ctrlCheckbox，有32个选项（几何-框数量属性）,在复选框事件-属性主题-输出输入-选择框-更改中，写入如下C脚本： #include "apdefap.h"void OnPropertyChanged(char*  阅读全文
posted @ 2021-01-29 11:21 来自金沙江的小鱼 阅读(2061) 评论(0) 推荐(0)
搬家第一天-6.WinccV7.3 使用VBS删除数据表mytable
摘要： Sub OnClick(ByVal Item) Dim ors,conn,con,ssql,ocomDim ors1,conn1,con1,ssql1,ocom1Dim ssql2,ocom2Dim ocatalog,otableDim i,TableExistDim PCNamePCName=HM 阅读全文
posted @ 2021-01-29 11:18 来自金沙江的小鱼 阅读(608) 评论(0) 推荐(0)
搬家第一天-5.WinccV7.3 使用VBS创建数据表mytable5.WinccV7.3 使用VBS创建数据表mytable
摘要： Sub OnClick(ByVal Item) Dim ors,conn,con,ssql,ocomDim ors1,conn1,con1,ssql1,ocom1Dim ssql2,ocom2Dim ocatalog,otableDim i,TableExistDim PCNamePCName=HM 阅读全文
posted @ 2021-01-29 08:08 来自金沙江的小鱼 阅读(708) 评论(0) 推荐(0)
入驻第二天使用感受
摘要： 感觉这里还是比某博客好，至少界面清爽，不会上下左右全部都是广告。某些平台通过博客吸引了流量，然后引来了广告投放，还要进一步收集博主各种隐私信息，实在是霸道。 阅读全文
posted @ 2021-01-29 08:07 来自金沙江的小鱼 阅读(207) 评论(0) 推荐(1)
搬家第一天4.WinccV7.3删除数据库mydatabase
摘要： Sub OnClick(ByVal Item) Dim ors,conn,con,ssql,ocomDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readcon="Provider = SQLOLEDB.1;password = sa;u 阅读全文
posted @ 2021-01-29 08:04 来自金沙江的小鱼 阅读(566) 评论(0) 推荐(0)
搬家第一天-3.WinccV7.3创建数据库Mydatabase
摘要： Sub OnClick(ByVal Item) Dim ors,conn,con,ssql,ocomDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readcon="Provider = SQLOLEDB.1;password = sa;u 阅读全文
posted @ 2021-01-29 08:00 来自金沙江的小鱼 阅读(567) 评论(0) 推荐(0)
搬家第一天-2.WinccV7.3 使用VBS判断数据库Mydatabase是否存在
摘要： 从某浪开始搬家，第二篇 使用wincc时，如果需要判断附带的sql server是否有某个数据库，可以使用下面的代码，实际上这个应该属于IT行业的内容。 Sub OnClick(ByVal Item) Dim ors,conn,con,ssql,ocomDim PCNamePCName=HMIRun 阅读全文
posted @ 2021-01-29 07:58 来自金沙江的小鱼 阅读(427) 评论(0) 推荐(0)
搬家第一天-1.WinccV7.3 使用VBS判断数据库Mydatabase下是否存在数据表Mytable
摘要： 从今天开始搬运某浪上以前写的内容 Sub OnClick(Byval Item) Dim ors,conn,con,ssql,ocomDim ors1,conn1,con1,ssql1,ocom1Dim ocatalog,otableDim i,TableExistDim PCNamePCName= 阅读全文
posted @ 2021-01-29 07:55 来自金沙江的小鱼 阅读(635) 评论(0) 推荐(0)