Read a word
The following program reads the present value of
N7:0
into a text box (txtCold)
once the Read
button (Command1) is pressed.Sub Command1_Click ()
'Read word from N7:0
txtCold.LinkTopic = "RSLinx|testsol" | 'Assign application|topic to DDE text box |
txtCold.LinkItem = "N7:0" | Assign link item to DDE text box |
txtCold.LinkMode = 2 | 'Set up link as manual; open up link |
txtCold.LinkRequest | 'Request data RSLinx |
txtCold.LinkMode = 0 | 'Close DDE link |
End Sub |
Provide Feedback