<%set rs=server.createobject("adodb.recordset") rs.open "ayarlar where admin",cilem,1,3 islem=Request.QueryString("islem") if islem="sifrekayit" then call sifrekayit end if%>

Yönetici Adı :   Yeni Şifre :   " maxlength="25"> ¬ Yeni Şifrenizi Giriniz   <%sub sifrekayit sifre=md5(request("sifre")) admin=trim(request("admin")) admin=guvenlik(admin) %> <% set rs=server.createobject("adodb.recordset") rs.open "ayarlar where admin",cilem,1,3 rs("admin") = admin rs("sifre") = sifre rs.update %> <% end sub %>