最新更新发布在此处
ebr脚本常用函数
###参数输入输出
输入的type选择tag value;输出的type选择tag NAME;
'实例
mData.InsertData ousNAME,0,straaa '输出文本
mData.InsertData ousAGE,1,age '输出数字html直接输出
mRecordText.WriteHTML str_htmlr 可直接输出html内容
'实例'
DIM str_htmlr
str_htmlr = "<h2>测试一哈html标题</h2>"
str_htmlr = str_htmlr & "<p>测试一哈p标签</p>"
'支持所有html标签，除了js'
mRecordText.WriteHTML str_htmlr
数据库操作
mglob.DB.conData.Execute(sql) 可将sql执行后的结果返回到一个对象
'实例'
DIM sql,Rst
sql= "select * from XFP_ARTICLES t" '支持所有sql语句'
Set Rst = mglob.DB.conData.Execute(sql)
If Rst.RecordCount > 0 Then
i = 0
dim strCODE(Rst.RecordCount)
do while Rst.EOF = False
'循环取出字段'
strCODE(i) = Rst.Fields("codeart").Value
i = i+1
Rst.MoveNext
loop
THEN
msgbox "没有数据！"
END IF
脚本常用对象取值
mRecordText.WriteHTML str_htmlr 可直接输出html内容
strClientName = mGlob.Client.name '客户端环境，如7105TST'
PICode = mData.PICode 'PI编码'
opter = mGlob.User.Name '当前登录的用户'
mData.ReadData(insEQPID) '获取tag name的值'
WOCode = mData.ManCode '工单号'
Set OpManager = CreateObject("E2S_PFC_Business.claOpManager")
sWORKCENTER = OpManager.FindCurrentWorkCenter '工作中心'
