Example

This example converts all characters to uppercase.

Private Sub Session_BeforeTransmitString(TheString As String, Continue As Boolean)

 TheString = UCase(TheString)

End Sub