Exemplo de uso de SERVER.EXECUTE

Olá galera.

Tava vendo algumas duvidas e sugestões com o uso do include e server.execute, vi que muitas dúvidas pairam para pessoas iniciantes.

Alem disso vi que muitos códigos postados como script ou artigos fazem uso do include, visto que a página ASP carrega primeiro o include para depois mostrar o conteúdo no browser esse fator faz a página perder a agilidade.

Vou postar um código simplesinho que pode ser utilizado em suas aplicações, isso facilitará o carregamento e poupará tempo.

No HTML criaremos os links que provavelmente você usará em seu menu.

CODE

<a href=?pag=noticias.asp>Noticias</a>
 |  

<a href=?pag=cadastro.asp>Cadastro</a>

 |  

<a href=?pag=Login.asp>Logar</a>

Agora na coluna, tabela ou div onde você vai mostrar o conteúdo da página chamada no link coloque o seguinte código:

CODE
<%
Dim pag

pag= Request.QueryString ("pag") ' aqui recebo o valor enviado pela QueryString PAG

if Request.QueryString ("pag") ="" then %>

<%'Se ela for vazia executo a página ini.asp na proxima linha,

'se no for executo a pagina enviada pela QueryString PAG%>

<%server.Execute("ini.asp")%>

<%else%>

<%server.Execute(pag)%>

<% end if %>

Bom, o código está comentado, é só apagar os comentários e testá-lo em seu servidor.

Grande abraços a todos.