<% @ Language = VBScript CodePage=1254 %> <% Session.CodePage = 1254 Session.LCID = 1055 Response.Buffer = True Response.Expires = 0 Response.ExpiresAbsolute = Now() - 2 Response.AddHeader "pragma","no-cache" Response.AddHeader "cache-control","private" Response.CacheControl = "No-Store" Response.CacheControl = "no-cache" Response.Charset="ISO-8859-9" Response.Charset="Windows-1254" response.ContentType="text/HTML" if session("ramyonetim")=false and session("ramaday")=false then response.redirect("giris.asp") end if %> <% islem=request.querystring("islem") function erc(eyl) eyl = Replace(eyl, "&091;","") eyl = Replace(eyl, "&093;","") eyl = Replace(eyl, "&8200;","") eyl = Replace(eyl, "&8242;","") eyl = Replace(eyl, "&8217;","") eyl = Replace(eyl, "”","") eyl = Replace(eyl, "“","") eyl = Replace(eyl, "’","") eyl = Replace(eyl, "…","..") eyl = Replace(eyl, "&8230;","..") eyl = Replace(eyl, "‘","") eyl= Replace (eyl,"‘"," ",1,-1,1) eyl= Replace (eyl,"’"," ",1,-1,1) eyl= Replace (eyl,"`","",1,-1,1) eyl= Replace (eyl, "'","",1,-1,1) eyl= Replace (eyl, "“","",1,-1,1) eyl= Replace (eyl, "”","",1,-1,1) eyl= Replace (eyl, "&8211;","",1,-1,1) eyl= Replace (eyl, "&", "&") eyl= Replace (eyl, "<", "<") eyl= Replace (eyl, ">", ">") eyl= Replace (eyl, "[", "[") eyl= Replace (eyl, "]", "]") eyl= Replace (eyl, """", "",1,-1,1) eyl= Replace (eyl,"--","",1,-1,1) eyl= Replace (eyl,"=","",1,-1,1) eyl= Replace (eyl,"%","",1,-1,1) eyl= Replace (eyl,"!","",1,-1,1) eyl= Replace (eyl,"#","",1,-1,1) eyl= Replace (eyl,"*","",1,-1,1) eyl= Replace (eyl,"Chr(34)","",1,-1,1) eyl= Replace (eyl,"Chr(39)","",1,-1,1) eyl= Replace (eyl,"select","",1,-1,1) eyl= Replace (eyl,"join","",1,-1,1) eyl= Replace (eyl,"where","whe-re",1,-1,1) eyl= Replace (eyl,"insert","inser-t",1,-1,1) eyl= Replace (eyl,"delete","DELETE",1,-1,1) eyl= Replace(eyl, "union", "uni-on", 1, -1, 1) eyl= Replace (eyl,"update","updat-e",1,-1,1) eyl= Replace (eyl,"like ","li-ke",1,-1,1) eyl= Replace (eyl,"drop","dro-p",1,-1,1) eyl= Replace (eyl,"create","creat-e",1,-1,1) eyl= Replace (eyl,"modify","",1,-1,1) eyl= Replace (eyl,"rename","",1,-1,1) eyl= Replace (eyl,"alter","",1,-1,1) eyl= Replace (eyl,"cast","cas-t",1,-1,1) eyl= Replace (eyl," And ","",1,-1,1 ) eyl= Replace (eyl,"union","",1,-1,1 ) eyl= Replace (eyl,"xp_","",1,-1,1 ) eyl= Replace (eyl,"