<% Set strURL = Request.ServerVariables("QUERY_STRING") strBolum = Split(strURL,"/") If strBolum(2 + KarakterBul(strScriptYolu, "/")) = "haber" Then Server.Execute("haber_detay.asp") Elseif strBolum(2 + KarakterBul(strScriptYolu, "/")) = "haberler" Then Server.Execute("haberler.asp") Elseif strBolum(2 + KarakterBul(strScriptYolu, "/")) = "yazar" Then Server.Execute("yazar.asp") Elseif strBolum(2 + KarakterBul(strScriptYolu, "/")) = "sayfa" Then Server.Execute("sayfa.asp") Elseif strBolum(2 + KarakterBul(strScriptYolu, "/")) = "arsiv" Then Server.Execute("arsiv.asp") End If %>