ÜYE ALANI


Kullanıcı adı

Şifre

Üye kayıt 
Bilgilerimi unuttum 
E-mail kodunu yolla 
Neden üye olayım? 



 İSTATİSTİK
Ders 24
Ders yorum 28
Haber / duyuru 4
Haber / duyuru yorum 6
Forum konu 44
Forum yorum 43
Üye 2012
Ziyaret bilgileri
Bugün

73

Dün

68

Toplam

368043


 YARIŞMA İLK 10

 YAZARLARIMIZ

 ARAMA

 
Detaylı aramayı aç


 FORUM

Forum / Problemler / ASP


Yorum ekle

 
 Şifremi Unuttum Bölümü....

 

samimi6060


 
Mesaj sayısı
1
 
Forum aktiflik
-


21 Ekim 2010 - 9:32 | Okuma: 2974 | Yorum: 0 

Arkadaşlar sitede şifremi unuttum bölümüne mail adresi giriliyor ve gönder deyince o üyenin şifresi mail adresine gitmesi gerekiyor. Ancak aşağıdaki kodlardaki hata nerede hiç bir mail adresine hiçbirşey göndermiyor. Hata koduda vermiyor...Şimdiden teşekkürler. (Ayrıca birde webmailtercih.asp dosyası var. Acaba orası ile bir ilişkisi olabilirmi hatanın?)


<% @Language="VBScript" CodePage="1254" %>
<!--#INCLUDE FILE="VT_Baglan.asp"-->
<!--#INCLUDE FILE="ADOVBS.inc"-->
<!--#INCLUDE FILE="__website.config.asp"-->
<%
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = -1

Kilitle=FALSE
email_uye=LCASE(Trim(Request.Form("email_uye")))

If Request("do")="psw" Then

Set FRM_EMAIL = Server.CreateObject( "ADODB.Recordset" )
FRM_EMAIL.ActiveConnection = Baglanti
FRM_EMAIL.CursorType= adOpenStatic

If Request.Form("uye_statu")="0" Then

FRM_EMAIL.Open " SELECT * FROM oto_ilan_uyeler WHERE email='"&email_uye&"' "

End If

If Request.Form("uye_statu")="1" Then

FRM_EMAIL.Open " SELECT * FROM oto_ilan_uyeler2 WHERE email='"&email_uye&"' "

End If

If not FRM_EMAIL.EOF AND not FRM_EMAIL.BOF Then

MyBody_Mail = MyBody_Mail & " Sn. Üyemiz, şifre talebiniz için gerekli bilgiler aşağıda gönderilmiştir." & vbCrLf
MyBody_Mail = MyBody_Mail & "----------------------------------------------------------------" & vbCrLf
MyBody_Mail = MyBody_Mail & " Kullanıcı_________: "& FRM_EMAIL("email") & vbCrLf
MyBody_Mail = MyBody_Mail & " Parola____________: "& FRM_EMAIL("parola") & vbCrLf
MyBody_Mail = MyBody_Mail & " IP________________: "& Request.ServerVariables("remote_addr") & vbCrLf
MyBody_Mail = MyBody_Mail & " Web Adresi________: "&web_url& vbCrLf
MyBody_Mail = MyBody_Mail & "----------------------------------------------------------------" & vbCrLf
MyBody_Mail = MyBody_Mail & " Hoşçakalın, Saygılarımla" & vbCrLf
MyBody_Mail = MyBody_Mail & "----------------------------------------------------------------" & vbCrLf
MyBody_Mail = MyBody_Mail & " ASP & ASP.Net Sistemleri - www.ASPPLUS.net 2008" & vbCrLf

email=FRM_EMAIL("email")
Mail_Konu="Firma Rehberi - Şifre Talep"

%>
<!--#INCLUDE FILE="__webmail.tercih.asp"-->
<%
Response.Write "<br /><center><b>İşlem Tamamlandı, Şifre Bilginiz Başarıyla Gönderildi.<br />Teşekkürler...</b></center>"
Kilitle=TRUE

Else
Response.Write "<font color=""red""><br /><center><b>Girilen e-mail adresi sisteme kayıtlı değil !.<br />E-Mail adresinizi kontrol edip tekrar deneyiniz !.</b></center></font>"
End If

End If
%>
<html xmlns="http://www.w3.org/1999/xhtml">

<head>
<meta http-equiv="Content-Language" content="tr">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254" />
<title>ŞİFRE TALEP FORMU</title>
<link rel="stylesheet" type="text/css" href="Stiller.css" />
<link rel="stylesheet" type="text/css" href="anabaslik2.css" />

<style type="text/css">
.newStyle1 {
background-color: #E6E6E6;
border: 1px solid #C0C0C0;
font-family: Arial, Helvetica, sans-serif;
font-size: 11px;
color: #808080;
font-weight: bold;
}
.style1 {
color: #808080;
}
.style2 {
color: #808080;
background-color: #E6E6E6;
}
</style>

<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
function checkEmail(myForm) {
if (/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(myForm.email.value)){
return (true)
}
alert("Lütfen Geçerli Bir E-Posta Adresi Girin !")
return (false)
}
// End -->
</SCRIPT>


</head>

<body style="margin-left: 0; margin-right: 0; margin-top: 5px; margin-bottom: 0">
<div class="shadetabs2" style="border-bottom: 3px solid #3366cc">
<center>
<img border="0" src="/images/sifretalepformu.jpg" style="border-left: 3px solid #3366CC; border-right: 3px solid #3366CC; border-top: 3px solid #3366CC"></center></div>

<form method="post" action="?do=psw" name="myForm" onSubmit="return checkEmail(this)">
<table style="width: 734px" cellpadding="2" align="center">
<tr>
<td><strong>&nbsp; E-Mail Adresiniz</strong></td>
<td style="width: 7px"><strong>:</strong></td>
<td width="580">
<input name="email_uye" type="text" style="width: 260px" class="newStyle1" maxlength="99"></td>
</tr>
<tr>
<td>&nbsp;</td>
<td style="width: 7px">&nbsp;</td>
<td width="580">
<input name="uye_statu" type="radio" checked="checked" value="0" style="height: 20px"><span class="uye_login_stil6">Bireysel</span><input name="uye_statu" type="radio" value="1"><span class="uye_login_stil6">Kurumsal</span>
</td>
</tr>
<tr>
<td>&nbsp;</td>
<td style="width: 7px">&nbsp;</td>
<td width="580">
<input name="Submit1" type="submit" value="Gönder" class="newStyle1" <% If Kilitle=TRUE Then %>Disabled<% End If %> style="color: #FFFFFF; font-weight: bold; background-color: #FF0000"></td>
</tr>
<tr>
<td class="style2" style="height: 1px"></td>
<td style="width: 7px; height: 1px" class="style2"></td>
<td class="style2" style="height: 1px" width="580"></td>
</tr>
<tr>
<td class="style1"><strong>&nbsp; Bilgi</strong></td>
<td style="width: 7px" class="style1"><strong>:</strong></td>
<td class="style1" width="580">Üye olurken kullandığınız e-mail adresini yazınız.</td>
</tr>
<tr>
<td class="style1">&nbsp;</td>
<td style="width: 7px" class="style1">&nbsp;</td>
<td class="style1" width="580">Parolanız sistemimize üye olurken
kullandığınız e-mail adresi ise en kısa
zamanda
gönderilecektir.</td>
</tr>
<tr>
<td class="style1">&nbsp;</td>
<td style="width: 7px" class="style1">&nbsp;</td>
<td class="style1" width="580">E-Mailinizde önemsiz veya gereksiz klasörünü de kontrol etmeyi
unutmayınız !</td>
</tr>
</table>
</form>

</body>

</html>

Yorum yok



Yorum ekle  Yorum sadece üyeler ekleyebilir.

  Üye olunuz yada üye girişi yapınız.

 
Çevrimiçi bilgiler - Üye girişi yapmadınız.
ASPdersleri.com © 2008 - 2018
Kaynak göstermek
ve ticari olmamak şartlı ile içerikleri kullanabilirsiniz.
Üyelerin eklediği içeriklerden
ASPdersleri.com sorumlu değildir.
Bütün sistem ASPdersleri.com tarafından kodlanmıştır.

Ana sayfa - İletişim - Kadro