Xerox -05W - Manual (Page 322)

13-30
Dynamic Data Exchange
Width = 975
End
End
Sub cls_Click (index As Integer)
text2.LinkMode = 0
If index = 0 Then
text2.LinkTopic = “TT07W|ttlk1”
Else
text2.LinkTopic = “TT07W|ttlk2”
End If
text2.LinkItem = “Send”
text2.LinkMode = 2
text2 = text2 + Chr(13) + Chr(10) + Chr(0)
text2.LinkPoke
text2 = Chr(13)
text2.LinkPoke
text2 = “”
End Sub
Sub Exit_Click (index As Integer)
End
End Sub
Sub formats_Click (index As Integer)
text2.LinkMode = 0
text2.LinkTopic = “TT07W|System”
text2.LinkItem = “Formats”
text2.LinkMode = 2
text2.LinkRequest
End Sub
Sub ftp_Click (index As Integer)
text2.LinkMode = 0
text2.LinkTopic = “TTfler|System”
text2.LinkItem = “SysItems”
text2.LinkMode = 2
text2.LinkRequest
End Sub
Sub receive_Click (index As Integer)
If receive(0).Caption = “Receive” Then
receive(0).Caption = “Stop receive”
text2.LinkMode = 0
text2.LinkTopic = “TT07W|Session”
text2.LinkItem = “Receive”
text2.LinkMode = 1
Else
receive(0).Caption = “Receive”
text2.LinkMode = 0
End If