我是在这个论坛里找的代码,模块应该没问题, Winsock1.Close Winsock1.RemoteHost = 220 Winsock1.RemotePort = 25 Dim a As Boolean a = SendMail(Winsock1, "[email protected]", "[email protected]", "hi!", "123") If a = True Then MsgBox "ok!" End Sub我在FORM里加了这些代码,从新浪发邮件到网易,怎么收不到?
是什么意思?
Winsock1.Close
Winsock1.RemoteHost = 220
Winsock1.RemotePort = 25
Dim a As Boolean
a = SendMail(Winsock1, "[email protected]", "[email protected]", "hi!", "123")
If a = True Then MsgBox "ok!"
End Sub我在FORM里加了这些代码,从新浪发邮件到网易,怎么收不到?