Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim currRowPos as Integer
- Dim currColPos as Integer
- Session.MoveCursor targetRowPos, targetColPos ' move cursor position
- DoEvents ' custom logic to wait or inlcude delay 1 sec or more, mentioned only single code statement here
- currRowPos = Session.CursorRow 'get cursor current row position
- currColPos = Session.CursorColumn 'get cursor current column position
- 'check current cursor position and write data onto HOST screen
- If targetRowPos = currRowPos And targetColPos = currColPos Then
- Session.TransmitANSI "xyz" 'write xyz on HOST screen
- End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement