kariyer videodan allıntı galiba adem aktepenin sitesi. güzel başarılı bir site herkese tavsiye edebilirim. Ne Olursan Ol Beni Bul ; https://www.facebook.com/izmirliyimmm

ncelikle üyeler tablosunda bir Onay hucresi olması lazım. Onay hucresi 1 olanlar aktif edilmiş demek. Bunun için nce "Onay" hucresini 1 yapan bir sayfa yapmamız lazım. AktifEt. asp <%Dim Id, Adi, SoyadiId=request. QueryString Adi=request. QueryString Soyadi=request. QueryString sql="Update Uyelerimiz Set Onay=1 Where Id=" & Id & " and Adi='" & Adi & "' and Soyadi='" & Soyadi & "'"baglanti. execute sqlbaglanti. close%>Burda ne yapmış olduk. AktifEt. asp sayfasına gelen ID, Adi, Soyadi bilgili kişinin Onay hücresini 1 yap demiş olduk. Bu sayfayı oluşturduktan sonra, üye olan kişiye bu sayfanın linkini mail ile yollamak kaldı. Bunun için bir mail bileşeni gerekiyor yada Gmail in mail gnderme kodlarıyla yapılabilir. İşte mail kodu. Aşağıdaki link yerine iyi bak<%Dim iMsg, iConf, FldsSet iMsg = CreateObject Set iConf = CreateObject Set Flds = iConf. Fieldsschema = "http://schemas.microsoft.com/cdo/configuration/"Flds. Item = 2Flds. Item = "smtp. gmail.com"Flds. Item = 465Flds. Item = 1Flds. Item = "Gmail mailiniz"Flds. Item = "gmail şifreniz"Flds. Item = 1Flds. UpdateWith iMsg. To = kayıt olan kişinin epostasını yazacaksın. recordsetten çagırabilirsin.. From = "Kariyer Video <info@kariyervideo>". Subject = "Aktivizasyon Linkiniz ". HTMLBody = "<b>KariyerVideo.com</b> ' a üye olduğunuz için teşekkür ederiz.<br><br> Üyeliğinizi tamamlamak için aşağıda bulunan aktivizasyon linkine tıklayınız.<br><br> Eğer bu mail sizi ilgilendirmiyorsa lütfen siliniz.<br><br> http://www.kariyervideo.com/AktifEt. asp?Id=" & rs & "&Adi=" & rs & "&Soyadi=" & rs . Sender = "KariyerVideo.com Ailesi". Organization = "www.kariyervideo.com". ReplyTo = "info@kariyervideo.com"Set. Configuration = iConfSendEmailGmail = . SendEnd Withset iMsg = nothingset iConf = nothingset Flds = nothing%>bu şekilde bir aktifleme sistemi kullanabilirsin alıntıdır. Bu Yüce Türk Milleti ne ihanetler grdü hepsinin üstesinden gelmeyi başararak tarihe nice zaferler yazdırdı. Bu Millet Kuva-yı milliye hareketini yeniden başlatır. Sivas Kongresini yeniden toplar, Ya İstiklal, Ya lüm diye haykırır ve gereğini yapar. Türk Milleti ihaneti ve hainleri hiç affetmez. Dileğimiz odur ki bu iş sandıkta bitsin, aksi halde "sürüye dalmayı gze alan Kurt, çobanın da, kpeğinde hesabını yapmaz."