<% set sorubul6 = Server.CreateObject("ADODB.Recordset") sorubul6.open "SELECT* FROM ogretmenler order by idogretmen asc",erdc,1,3 do while not sorubul6.eof sifre=erc11(erc11(erc11(left(sorubul6("kimlikno"),6)))) sorubul6("sifre")=sifre sorubul6.update sorubul6.movenext loop sorubul6.close %>