搬家第24天-citect v7.4 使用cicode将数据记录到access数据表

实际应用中，可能需要将数据记录到access数据表。假设前面建立的mydatabase中有一张表myreport，表结构是这样子的：

为了模拟现场数据，新建6个内部real变量，添加2个事件，每1秒钟产生6个随机数：

在cicode编辑器中写入以下代码：

FUNCTION insertData(REAL flow1,REAL flow2,REAL flow3,REAL pressure1,REAL pressure2,REAL pressure3)
INT hSql;
STRING sSql,sValue;
hsql = SQLConnect("DSN=myaccess;UID=;PWD=");
IF hsql=-1 THEN
  Message("注意","连接Mydatabase数据库失败",0);
ELSE
  sValue=Date(10)+"','"+RealToStr(flow1,6,2)+"','"+RealToStr(flow2,6,2)+"','"+RealToStr(flow3,6,2)+"','"+RealToStr(pressure1,6,2)+"','"+RealToStr(pressure2,6,2)+"','"+RealToStr(pressure3,6,2)+"')";
   sSQL="insert into myreport(curtime,flow1,flow2,flow3,pressure1,pressure2,pressure3) values('" + sValue;
   SQLExec(hsql,sSql);
   SQLDisconnect(hsql);
END
END

DNS为前一篇博客建立的ODBC连接，添加以下事件：

在计算机设置向导中使用自定义设置，启用这3个事件。保存编译运行，打开myreport表可以看到按照每秒1条频率，记录添加进去了。