Üye Girişi Yapınız     


    E-Posta
    

    Şifreniz
    



Şifremi Unuttum


Ana Sayfa Site Hakkında İletişim Ziyaretçi Defteri Döküman İndir Makale Ekle Haber Ekle

     Üyelik Onayı ve E-Posta ile Bildirme
     admin     26.09.2012     11:04:43

Sitenize üye olan ziyaretçilerin üyelik başvurlarının nasıl onaylandığını ve onay işleminin kullanıcıya mail yoluyla nasıl bildirildiğini bu yazıda bulabilirsiniz.



Öncelikle aşağıdaki ad uzaylarınıaspx. vb sayfasının en üstüne eklemelisin.
Imports System.Net
Imports System.Web.UI
Imports System.Net.Mail
 
Aşağıdaki kodu bir butonun Click olayına yazabilirsin.
 
        Dim onaysiz_uye_posta(20) As String
        Dim komut As OleDbCommand
        Dim verioku As OleDbDataReader
        Dim sqlsorgu As String
        Dim sayac, i As Byte
        sqlsorgu = "Select * From uye WHERE adminonay=false"
        komut = New OleDbCommand(sqlsorgu, dbconn)
        verioku = komut.ExecuteReader
        sayac = 0
        i = 0
        Do While verioku.Read = True
            onaysiz_uye_posta(sayac) = verioku(12)
            sayac = sayac + 1
        Loop
        Dim onaymail As New MailMessage()
        Dim istemci As New SmtpClient()
        Dim hesapbilgileri As New NetworkCredential()
        hesapbilgileri.UserName = "ayhansari52@gmail.com"
        hesapbilgileri.Password = "üstteki mail adresinin şifresi"
        istemci.Host = "smtp.gmail.com"
        istemci.Port = 587
        istemci.UseDefaultCredentials = False
        istemci.Credentials = hesapbilgileri
        istemci.EnableSsl = True
        onaymail.IsBodyHtml = True
        onaymail.From = New MailAddress("ayhansari52@gmail.com")
        For i = 0 To sayac - 1
            onaymail.To.Add(New MailAddress(onaysiz_uye_posta(i)))
        Next
        onaymail.Subject = "www.koddunyasi.net--Üyelik Onayı"
        onaymail.Body = "Üyeliğiniz ONAYLANDI... Teşekkürler." & "<br><br>" & " http://www.koddunyasi.net Linkine tıklayarak giriş yapabilirsiniz..."
        onaymail.Priority = MailPriority.High
        istemci.Send(onaymail)
 

Facebook'ta Paylaş    
Diğer ASP.Net İçerikleri       Tüm Yazılar        Ana Sayfa


  =>Soru Sorun veya Yorum Yazın...

İsim Giriniz :
  

  =>Yapılan Yorumlar...