<% p = Request("p") if p = "" then p = "conteudo" end if p = p & ".asp" Server.Execute(p) %>