POP3Socket.EncryptPassword

From Xojo Documentation

Property (As Boolean )
aPOP3Socket.EncryptPassword = newBooleanValue
or
BooleanValue = aPOP3Socket.EncryptPassword

Supported for all project types and targets.

If True, the password is encrypted when being sent to the mail server.

Notes

EncryptPassword uses the APOP protocol to transfer the login and password, as described in RFC 1939. If set to false, the POP3 commands USER and PASS are used instead, i.e. the password is sent in clear.

Sample Code

If Me.Caption = "Connect" Then
Socket1.Address = NthField(ServerFld.Text, ":", 1)
Socket1.Port = Val(NthField(ServerFld.Text, ":", 2))
If socket1.Port = 0 Then
Socket1.Port = 110
End If
Socket1.EncryptPassword = True
Socket1.Username = UsernameFld.Text
Socket1.Password = PasswordFld.Text

ProgressBar1.Maximum = 0
Socket1.Connect
Me.Caption = "Disconnect"
Else
Socket1.DisconnectFromServer
Me.Caption = "Connect"
End If