<%if Request.QueryString("graffiti")="goster" then%><%kelime = Request.Form("tagtag")if kelime = "" thenResponse.Write "Metin Kutusu Boş Bırakılmış.."Response.Endresponse.endend iffor i = 1 to Len(kelime)x = Mid(kelime,i,1)if uCase(x) = x and isnumeric(x) = false thenresponse.write "“elseresponse.write ““end ifnext%><%end if%>