这里是一部分代码，好像是发送部分的，问题在哪里啊？？？？  高手指点下



void CSendDlg::OnSend()
{
    UpdateData( TRUE);

    m_strMailServer.TrimLeft();
    m_strMailServer.TrimRight();
    m_strRecipients.TrimLeft();
    m_strRecipients.TrimRight();
    m_strSender.TrimLeft();
    m_strSender.TrimRight();

    if(m_strRecipients.GetLength() < 3)
    {
        ::MessageBox( NULL, "请填写正确的收件人邮箱", "迷你邮件加密引擎-发送邮件", MB_OK);
        return;
    }
    if(m_strSender.GetLength() <= 0)
    {
        ::MessageBox( NULL, "请填写发件人邮箱", "迷你邮件加密引擎-发送邮件", MB_OK);
        return;
    }
   
    try
    {
        jmail::IMessagePtr pMessage("JMail.Message");
        
        // 发件人邮箱
        pMessage->From = (LPCTSTR)m_strSender;
        
        // 发件人姓名
        pMessage->FromName = (LPCTSTR)m_strFromName;
        
        // 添加收件人
        pMessage->AddRecipient((LPCTSTR)m_strRecipients, "", "");
        
        // 优先级设置,1-5逐次降低, 3为中级
        pMessage->Priority = 3;
        
        // 编码方式设置, 默认是iso-8859-1
        pMessage->Charset = "GB2312";
        
        // 主题
        pMessage->Subject = (LPCTSTR)m_strSubject;
        
        // 正文
        pMessage->Body = (LPCTSTR)m_strBody;
        
        // 如有必要，可以再添加一些正文
        //pMessage->AppendText("Thank you!");
        
        // 开始发送
    //    CSendDlg.SetUserProperties(m_User,m_Password);//
        // 如果邮箱不需要认证
        if( m_bCheck == FALSE)
            pMessage->Send((LPCTSTR)m_strMailServer, VARIANT_FALSE);
        else
        {
            // 将邮件服务器组合成"用户名：密码@SMTP服务器的形式"再发送
            CString strMailServer;
            strMailServer = m_strUserName;
            strMailServer += ":";
            strMailServer += m_strPassword;
            strMailServer += "@";
            strMailServer += m_strMailServer;
            pMessage->Send((LPCTSTR)strMailServer, VARIANT_FALSE);
        }

        pMessage.Release();
        
        ::MessageBox( NULL, "恭喜你，发送邮件成功!", "迷你邮件加密引擎-发送邮件", MB_OK);
        
    }
    catch (_com_error e)
    {
        CString strErr;
        strErr.Format("错误信息：%s\r\n错误描述：%s",
            (LPCTSTR)e.ErrorMessage(), (LPCTSTR)e.Description());
        ::MessageBox( NULL, strErr, "迷你邮件加密引擎-发送邮件", MB_OK);
    }
}

void CSendDlg::OnAddmiwen()
{
    UpdateData(TRUE);
    m_strBody = m_pView->m_strFinalShow;
    UpdateData( FALSE);

    CButton* pbtnAddMiWen = (CButton*)GetDlgItem(IDC_ADDMIWEN);
    pbtnAddMiWen->EnableWindow(FALSE);
    return;
}