POP3Socket.EncryptPassword
From Xojo Documentation
Property (As Boolean )
aPOP3Socket.EncryptPassword = newBooleanValue
or
BooleanValue = aPOP3Socket.EncryptPassword
Supported for all project types and targets.
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
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