citect2018 cicode通过动作触发事件,向sql server添加记录

由于某浪博客一直不正常,售后也一直不相应我的求助,今后就在这里更新吧。

 

现场有这样一种需求:当布料小车停在某个储槽上方下料时,希望能够记录什么时间在什么储槽上方,便于查询。我先简化做了一个测试练习,现在把练习过程记录下来。

 

1. 建立数据库

在sql server新建一个数据库myDB。赋予数据库用户sa访问这个数据库的权限。数据库下新建一个表PositionRecord,表结构如下

citect2018 cicode通过动作触发事件,向sql server添加记录

myID为主键,递增。

保存新建的表。

 

2.新建ODBC连接mtRecord,指向刚才新建的sql数据库。

3.新建citect项目

4. 新建本地变量

citect2018 cicode通过动作触发事件,向sql server添加记录

5.新建画面,放置按钮和图形,按钮用于修改本地变量数值,模拟现场信号变化,图形用于观察变量变化效果。

citect2018 cicode通过动作触发事件,向sql server添加记录

6.新建cicode函数

FUNCTION P1record()
STRING myTime,Posidescrip;
myTime=Date(10)
Posidescrip="A313布料小车处于1#槽位"
INT hSQL;
STRING SqlAction;
SqlAction= "INSERT INTO PositionRecord(myTime,Posidescrip) VALUES (‘" + myTime + "‘,‘" + Posidescrip + "‘)"
hSQL = SQLConnect("DSN=myRecord;UID=sa;PWD=sa");
IF hSQL <> -1 THEN
SQLExec(hSQL, SqlAction);
SQLDisconnect(hSQL);
END
END

FUNCTION P2Record()
STRING myTime,Posidescrip;
myTime=Date(10)
Posidescrip="A313布料小车处于2#槽位"
INT hSQL;
STRING SqlAction;
SqlAction= "INSERT INTO PositionRecord(myTime,Posidescrip) VALUES (‘" + myTime + "‘,‘" + Posidescrip + "‘)"
hSQL = SQLConnect("DSN=myRecord;UID=sa;PWD=sa");
IF hSQL <> -1 THEN
SQLExec(hSQL, SqlAction);
SQLDisconnect(hSQL);
END
END

 

7.新建两个事件,通过触发执行事件

citect2018 cicode通过动作触发事件,向sql server添加记录

8. 编译。

9.设置计算机向导,允许运行期间执行这两个事件。

10.运行citect程序,点击按钮,使P1、P2置位。到sql server中查看PositionRecord表记录,可以看到新添加的记录。

citect2018 cicode通过动作触发事件,向sql server添加记录

 

citect2018 cicode通过动作触发事件,向sql server添加记录

上一篇:netty - LengthFieldBasedFrameDecoder


下一篇:DBeaver——超好用可视化数据库!(墙裂推荐(づ ̄3 ̄)づ╭?~)