Ir para conteúdo

Exemplo Simples De Asp

Dark Lost

Por Dark Lost
em Programação Web

 Share

Posts Recomendados

Dark Lost

Dark Lost 2

Postado
Postado

Creditos:Dark Lost &

Google

 

Vamos ver um simples exemplo realizado em ASP que serve para ilustrar o trabalho desenvolvido até o momento no manual da tecnologia. Este exemplo é muito básico, embora experimenta várias das utilidades vistas até agora, como o trabalho com loops e os objetos request e response, que servem para receber dados e imprimi-los na página.

 

O exemplo em concreto se trata de um gerador de tabelas de multiplicar. À princípio, quando se acessa ao arquivo, mostra-se a tabela do zero e um formulário onde podemos selecionar outro número e ver sua tabela de multiplicar. Ao enviar o formulário se acessa a mesma página, embora agora apareceria a tabela de multiplicar do número selecionado no formulário.

 

Formulário para selecionar um número

 

Vejamos agora o formulário que mostra um campo de seleção com os números do 1 ao 10. Este formulário servirá para que o visitante possa selecionar a tabela que deseja ver.

 

<form name=tb action=tb.asp method=post>

<P align=center>Selecione uma opção

<SELECT align=center name=tab style="WIDTH: 40px">

<OPTION selected>1</OPTION>

<OPTION >2</OPTION>

<OPTION >3</OPTION>

<OPTION >4</OPTION>

<OPTION >5</OPTION>

<OPTION >6</OPTION>

<OPTION >7</OPTION>

<OPTION >8</OPTION>

<OPTION >9</OPTION>

<OPTION >10</OPTION>

</SELECT>

<br>

<INPUT type=submit value="Ver tabela" >

</P>

</form>

 

Temos que observar que a página que vai receber o formulário chama-se tb.asp, segundo se indica no atributo action. O único campo do formulário que se envia é chamado "tab", e salva o número que tenha sido selecionado.

 

Código para mostrar a tabela de multiplicar correspondente

 

Começamos recebendo o dado do formulário que nos indica a tabela que o usuário quer visualizar. À princípio, não se recebe nenhum dado do formulário (até que não se envie o formulário não se sabe que tabela se deseja ver e portanto, havíamos dito que se mostraria a tabela do zero). Sendo assim, se não recebo nada, inicio a zero a variável i, que salva o número da tabela de multiplicar a ser mostrada. No caso de que receba algo do formulário, se inicia a variável i ao valor recebido no campo "tab".

 

'se não se está recebendo dados do formulário

if request.form("tab")="" then

'inicio a tabela a mostrar a zero

i=0

else

'inicio a tabela a mostrar ao dado recebido no formulário

i=Request.Form ("tab")

end if

 

Agora veremos um loop que mostra a tabela de multiplicar do valor recebido por formulário. Este loop faz uma repetição desde 1 ao 10 e vão se realizando as multiplicações e mostrando os resultados.

 

'mostro a tabela do número que recebo do formulário

Response.Write "Tabela do " & i%><br><br><%

'realizo um loop do 1 ao 10 para mostrar a tabela correspondente

for a=1 to 10

Response.Write i &" x " & a & " = " & i*a%>

<br>

<%

next

%>

 

Código completo

 

O código completo do exemplo pode ser visto a seguir. Espero que sirva de ajuda para as pessoas que começam a dar seus primeiros passos com ASP.

 

<%@ Language=VBScript %>

<HTML>

<HEAD><title>Tabelas de Multiplicar....</title>

</HEAD>

<BODY bgColor=skyblue>

 

<div align="center">

 

<form name=tb action=tb.asp method=post>

<P align=center>Selecione uma opção

<SELECT align=center name=tab style="WIDTH: 40px">

<OPTION selected>1</OPTION>

<OPTION >2</OPTION>

<OPTION >3</OPTION>

<OPTION >4</OPTION>

<OPTION >5</OPTION>

<OPTION >6</OPTION>

<OPTION >7</OPTION>

<OPTION >8</OPTION>

<OPTION >9</OPTION>

<OPTION >10</OPTION>

</SELECT>

<br>

<INPUT type=submit value="Ver tabela" name=submit1 >

</P>

</form>

<%

 

'se não se está recebendo dados do formulário

if request.form("tab")="" then

'inicio a tabela a mostrar a zero

i=0

else

'inicio a tabela a mostrar ao dado recebido no formulário

i=Request.Form ("tab")

end if

 

'mostro a tabela do número que recebo do formulário

Response.Write "Tabela do " & i%><br><br><%

'realizo um loop do 1 ao 10 para mostrar a tabela correspondente

for a=1 to 10

Response.Write i &" x " & a & " = " & i*a%>

<br>

<%

next

%>

</div>

 

</BODY>

</HTML>

 

Espero que Gostem do Artigo

 

Abraços

Link para o comentário
Compartilhar em outros sites
  • 2 months later...
 Share
Ir para a lista de tópicos
×
×
  • Criar Novo...