本想在网上找一段现成的用，找了半天没找到，只得自己慢慢搞其实这东西跟VB没啥关系，只是SMTP协议的实现写的很乱，但是能发出去，本着能用就行的原则，到此结束。。。需要一个模块，主要是一个加密算法：Public UserName As String Public MailPass As String Public EmailFromAdd As String Public MailToAdd As String Public MailSub As String Public MailMessage As StringFunction Base64Encode(inData) - 阅读剩余部分 -