Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click       
        jsmtp = New jmail.SMTPMail
        Dim mailsub, ms, mc As String
        mailsub = LTrim(tsub.Text)
        ms = Trim(tsm.Text)
        mc = Trim(tcm.Text)
        jsmtp.Message.Body = ftb.Text
        jsmtp.Message.FromName = "liufeng005"
        jsmtp.Message.From = "[email protected]"
        jsmtp.Message.Subject = mailsub
        jsmtp.Message.AddRecipient(ms)
        jsmtp.Message.AddRecipientCC(mc)
        jsmtp.ContentTransferEncoding = "base64"
        jsmtp.Message.Encoding = "GB2312"
        Try            jsmtp.Message.Send("mail3")
            Response.Write("<script>alert('邮件发送成功!')</script>")
        Catch
            Response.Write("<script>alert('邮件发送失败!')</script>")
        End Try        tsub.Text = ""
        tsm.Text = ""
        tcm.Text = ""
        ftb.Text = ""    End Sub发送出去的都是乱码,怎么解决
jsmtp.ContentTransferEncoding = "base64"
jsmtp.Message.Encoding = "GB2312"这两句去掉也还是乱码!