|
|
|
Yazar Şifre Hatırlatma Ekranı |
|
|
<% islev=Request.QueryString("islev")
if islev="" or islev="1" then %>
|
<% elseif islev="2" then %>
<%
Set rS=Server.CreateObject("Adodb.Recordset")
Sorgu="Select * from editorluk where uyemail='"& Request.Form("uyemail") &"'"
Rs.Open Sorgu, cilem, 1, 3
%>
<% if Rs.EOF then %>
<% else %>
|
|
|
<% end if
Session("uyemail")=Request.Form("uyemail")
elseif islev="3" then %>
<%
Set rs=Server.CreateObject("Adodb.Recordset")
Sorgu="Select * from editorluk where uyemail='"& Session("uyemail") &"' and gizlisoruyanit='"& Request.Form("gizlisoruyanit") &"'"
rs.Open Sorgu, cilem, 1, 3
%>
<% if RS.eof and Rs.Bof then %>
<% else %>
|
<% end if %><% end if %>
|
 |
|
|