注册邮箱验证

Question

情况是这样的：  我要做一个注册的页面，注册信息中有一条邮箱记录，当完成注册时自动发送邮件到他所填的邮箱中（发送的内容为该注册用户的注册信息），    然后该用户到邮箱里确认注册信息，将注册信息保存在我网站的数据库中（我的开发工具为vs2003(vb.net)+sql2000)    关键是希望能提供发邮件的那个动作和确认信息的那个动作 是怎么实现了，请提供例子代码（类似的也可以）

Answer 1

一般來說是用戶註冊完成就發送一份EMAIL
然後數據庫可以用一個字段來判斷用戶是否確認了信息
註冊完成時為FALSE
然後EMAIL里給一個鏈接
當用戶點擊鏈接時候.
然後在對應的頁面里對參數進行操作符合你邀請就吧判斷的字段變成TRUE就完成了這個過程

Answer 2

这个我知道，我要问 的是怎么发邮件，我要代码，  还 有   发送邮件服务器SMTP地址 smtp.163.com是免费的，还有没有其它免费的?          

Answer 3

sina也可以 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        SendMail("[email protected]", Me.TextBox1.Text.Trim(), Nothing, Me.TextBox2.Text.Trim(), Me.TextBox3.Text.Trim())
        'Dim sc As New System.Net.Mail.SmtpClient()
        ''指定SMTP服务器 
        'sc.Host = "[email protected]"
        ''邮件发送 
        'sc.Send("[email protected]", "[email protected]", "ss", "ssssssss")
    End Sub
    Public Shared Sub SendMail(ByVal sender As String, ByVal receiver As String, ByVal cc() As String, ByVal subject As String, ByVal content As String)
        '   siteConfigModel = bSiteConfig.GetModel()
        Try
            Dim mail As MailMessage = New MailMessage(sender, receiver)
            Dim smtp As SmtpClient = New SmtpClient("smtp.sina.com")
            Dim nc As NetworkCredential = New NetworkCredential("email", "mima")
            mail.Subject = subject
            mail.Body = content
            If Not (cc Is Nothing) Then
                If (cc.Length > 0) Then
                    Dim item As String
                    For Each item In cc
                        mail.CC.Add(item)
                    Next
                End If
            End If
            mail.IsBodyHtml = True
            smtp.Credentials = nc
            smtp.Send(mail)
        Catch ex As SmtpFailedRecipientException
            Throw New Exception(ex.Message)
        End Try
    End Sub

Answer 4

vs2003发用方法/// <summary>
   /// 发送邮件
   /// </summary>
   /// <param name="toAddress">接收者邮箱地址</param>
   /// <param name="formAddress">发送者邮箱地址</param>
   /// <param name="maintile">邮件标题</param>
   /// <param name="body">邮件内容</param>
   /// <param name="EmailUserName">邮件服务器用户名</param>
   /// <param name="EmailPWD">邮件服务器密码</param>
   /// <param name="MailAttachmentUrl">附件地址(绝对路径)</param>
   /// <param name="EmailServerIP">邮件服务器地址</param>
   public void sendEamil(string toAddress,string formAddress,string maintile,string body,string EmailUserName,string EmailPWD,string EmailServerIP,string MailAttachmentUrl)//发送邮件
   {
    MailMessage mail = new MailMessage(); 
    mail.To =toAddress; 
    mail.From =formAddress; 
    mail.Subject =maintile; 
    mail.Body = body; 
    mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1"); 
    mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername",EmailUserName); //用户名全名
    mail.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", EmailPWD); //密码全名      //mail.Fields.Add(CdoConfiguration.cdoSMTPAuthenticate, "1"); //需引用microsoft cdo for windows 2000 Library(的com组件)       //mail.Fields.Add(CdoConfiguration.cdoSendUserName, "[email protected]"); //用户名      // mail.Fields.Add(CdoConfiguration.cdoSendPassword, "43434"); //密码
    if(MailAttachmentUrl!=null)
    {
     MailAttachment mailAttach= new MailAttachment(MailAttachmentUrl); //附件
     mail.Attachments.Add(mailAttach);
    }
    SmtpMail.SmtpServer =EmailServerIP; //smtp邮件服务器
            
    try 
    { 
     SmtpMail.Send(mail); 
    } 
    catch(System.Runtime.InteropServices.COMException e1) 
    { 
//    
    }