接收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 ...
/dl/147009.html
标签:
Pop3Message
Function
Retrieve
response
上传时间:
2013-12-28
上传用户:fnhhs