<% DIM TAD(200),TADI(200) x=1 FOR EACH ITEM IN Request.Form FOR I=1 TO Request.Form(ITEM).COUNT TADI(x)=ITEM tad(x)=Request.Form(ITEM) if len (tad(x)) then tad(x)=replace(tad(x),chr(10),"")'satir basi tad(x)=replace(tad(x),chr(34),"")'cift tirnak tad(x)=replace(tad(x),"'","")'tek tirnak tad(x)=replace(tad(x),chr(13),"")'yeni satir tad(x)=replace(tad(x),"<","")'kucuktur tad(x)=replace(tad(x),">","")'buyuktur do while instr(tad(x)," ")'iki aralik tad(x)=replace(tad(x)," "," ") loop tad(x)=trim(tad(x))' onundeki ve arkasindaki bosluklar end if %><% NEXT %><% x=x+1 NEXT %>