<%'Çilem.Net © 2007'%> <% admin=replace(trim(request("admin")),"'","") sifre=replace(trim(Request("sifre")),"'","") yonetim=Request.Form("admin") Set rs = Server.CreateObject("ADODB.Recordset") sorgu = "Select * from ayarlar where admin='" & yonetim& "' and sifre='" &MD5(request("sifre"))& "'" rs.Open sorgu,cilem,1,3 %> <% if rs.eof then call git else%> <% Session("oturum") = "yonetici" Session("admin") =rs("admin") sifrem = rs("sifre") If MD5(request.form("sifre")) = sifrem Then %> <%Else%> <%End If%> <%End If%> <%sub git%> <%end sub %>