字段名:gwh 表名称:zmxzz
Dim zmxlsbl02 ''声明临时变量
is_sql="select gwh from zmxzz where txm=5" ''查询zmxzz表中,字段名txm=5的gwh字段名下的数值
cn.execute (is_sql) ''执行sql
HMIRuntime.Tags("zmx-xtcs-tag_2").Write =screenitems("gwh").outputvalue ''目的想将字段名gwh中取出的数值赋值给变量:zmx-xtcs-tag_2
哪位大侠给看看,怎么不执行?
谢谢!
问题补充:
第一个返回值是adoset(0),我有20个返回值,该怎么设置呢,谢谢你,再说一声!
adoset(1),adoset(2)都报错。
最佳答案
screenitems("gwh").outputvalue 这是个什么呀?
你的画面上有一个叫gwh的对象?
如果你是认为用screenitems("gwh").outputvalue来获取查询的值,貌似不行吧。
建议你用ADO
--------------------------------------------
上面的程序可以改为
dim adoset
set adoset = CreateObject("ADODB.Recordset") ‘创建ado对象
Dim zmxlsbl02
is_sql="select gwh from zmxzz where txm=5"
adoset.Open is_sql,cn ’执行你的查询语句
HMIRuntime.Tags("zmx-xtcs-tag_2").Write = adoset(0) ‘将查询到的结果的第一个值赋给变量
提问者对于答案的评价:
谢谢,明白了
原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc264137.html