看看pop3协议和smtp协议以及vb得winsock空件

解决方案 »

  1.   

    20分太少了吧!,不过看在你刚的情况下,给你一段范例吧!如果有什么不明白的,留EMAIL下来,我发其它的给你
    Private Sub cmdSend_Click()
        ' 开始 MAPI Session
        MAPISession1.SignOn
            
        ' 当 MAPI Session 建立后,
        ' Session 所产生的 Handle 会存于 SessionID 属性中
        If MAPISession1.SessionID <> 0 Then
        
            ' 建立 MAPIMessages 与 MAPISession 间之有效联系
            MAPIMessages1.SessionID = MAPISession1.SessionID
            
            ' 建立新的 E-Mail Message
            MAPIMessages1.Compose
            
            ' 收件人 (Recipient's Name)
            MAPIMessages1.RecipDisplayName = txtName.Text
            
            ' 收件人的 E-Mail 地址
            MAPIMessages1.RecipAddress = txtAddress.Text
            
            ' 是否要检查收件人有无存在于全域 (Global) 或个人 (Personal) 通讯录中
            MAPIMessages1.AddressResolveUI = True
            
            ' 检查收件人有无存在于全域 (Global) 或个人 (Personal) 通讯录中
            MAPIMessages1.ResolveName
            
            ' E-Mail 的主题
            MAPIMessages1.MsgSubject = txtSubject.Text
            
            ' E-Mail 的内文
            MAPIMessages1.MsgNoteText = txtNote.Text
            
            ' 发送 E-Mail 且不显示"邮件对话框" (直接发送)
            MAPIMessages1.Send False
        End If
        
        ' 结束 MAPI Session
        MAPISession1.SignOff
    End SubPrivate Sub cmdExit_Click()
        End
    End Sub
      

  2.   

    人家不是给了吗?你看:
    回复人: fraser01(王晓栋) (2001-12-3 11:25:41)  得0分 这不是写得清楚,你得0分,呵呵。
      

  3.   

    to:fraser01(王晓栋):
    谢谢你!我不是"蚊子",你可能找错人了!我叫阿贵(我的朋友都这么叫我)!
    我的Email:[email protected]!交个朋友,如何?
      

  4.   

    to:fraser01(王晓栋):
    怎么给你加分后就不说话呀,我还有问题要问你呀!!!