1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| // Code de clic du bouton Read
rw est un tableau de 1 ReadWriteRequest dynamique
ro est un ReadOperands dynamique
rv est un System.Array dynamique
ro = allouer un ReadOperands
ro.OperandType = OperandTypes.MI
ro.NumberOfOperands = 3
ro.StartAddress = 0
rw[1] = ro
QUAND EXCEPTION DANS
monPLC.ReadWrite(rw)
rv = rw[1].ResponseValues
POUR i = 0 _A_ rv.Length - 1
SI rv.GetValue(i) <> Null ALORS
{"txtMI" + i, indChamp} = Val(rv.GetValue(i).ToString())
FIN
FIN
FAIRE
Info("Could not communicate with the PLC")
FIN |
