接收pop3
Public Function Retrieve(ByVal rhs As Pop3Message) As Pop3Message
Dim message, response As String
Dim msg As New Pop3Message
msg.bytes = rhs.bytes
msg.number = rhs.number
message = "RETR " + rhs.number.toString + vbCrLf
write(message)
response = Respond()
If response.Substring(0, 3) <> "+OK" Then
Throw New Pop3Exception(response)
End If
MsgBox(msg)
msg.retrieved = True
While (1 = 1)
response = Respond()
If response = "." + vbCrLf Then
Exit While
Else
msg.message += response
End If
End While
Return msg
End Function
Refer to the UML diagram above and implement the Course class. After you define the Course class, you must create a Course object with the following details:
Programming I, WXES1114, taught by SMT.
Besides, your program must test all the accessor and mutator methods you had defined and the toString() method. toString() method is a special method inherited from the Object class. You have to override this method to display all the information about a course.