很急了,弄了一整天都没改好,请高手帮忙啊....

Public Function SendEmail(ByVal ToEmail As String, Optional FromEmail As String = "", Optional Subject As String = "", Optional Contents As String = "") As Boolean Public Function SendEmail(ByVal ToEmail As Stri