Docsity
Docsity

Prepare-se para as provas
Prepare-se para as provas

Estude fácil! Tem muito documento disponível na Docsity


Ganhe pontos para baixar
Ganhe pontos para baixar

Ganhe pontos ajudando outros esrudantes ou compre um plano Premium


Guias e Dicas
Guias e Dicas


Introdução a ASP (Active Server Pages) com VBScript, Notas de estudo de Gestão de Recursos Humanos

Este documento fornece uma introdução ao uso de asp (active server pages) com vbscript, incluindo exemplos de código e explicações sobre a declaração de variáveis, arrays, constantes, operadores, funções e estruturas de controle de decisão. Além disso, aborda a criação de formulários e o uso de objetos para interagir com bancos de dados.

Tipologia: Notas de estudo

2015

Compartilhado em 25/05/2015

daysi-bishop-12
daysi-bishop-12 🇧🇷

5

(2)

38 documentos

1 / 47

Toggle sidebar

Esta página não é visível na pré-visualização

Não perca as partes importantes!

bg1
UNIVERSIDADE FEDERAL DO PIAUÍ
CENTRO DE CIÊNCIAS DA NATUREZA
DEPARTAMENTO DE INFORMÁTICA E ESTATÍSTICA
BACHARELADO EM CIÊNCIA DA COMPUTAÇÃO
LINEU ANTONIO DE LIMA SANTOS
I CURSO DE ACTIVE
SERVER PAGES DA
UFPI
pf3
pf4
pf5
pf8
pf9
pfa
pfd
pfe
pff
pf12
pf13
pf14
pf15
pf16
pf17
pf18
pf19
pf1a
pf1b
pf1c
pf1d
pf1e
pf1f
pf20
pf21
pf22
pf23
pf24
pf25
pf26
pf27
pf28
pf29
pf2a
pf2b
pf2c
pf2d
pf2e
pf2f

Pré-visualização parcial do texto

Baixe Introdução a ASP (Active Server Pages) com VBScript e outras Notas de estudo em PDF para Gestão de Recursos Humanos, somente na Docsity!

UNIVERSIDADE FEDERAL DO PIAUÍ

CENTRO DE CIÊNCIAS DA NATUREZA

DEPARTAMENTO DE INFORMÁTICA E ESTATÍSTICA

BACHARELADO EM CIÊNCIA DA COMPUTAÇÃO

LINEU ANTONIO DE LIMA SANTOS

I CURSO DE ACTIVE

SERVER PAGES DA

UFPI

1 - INTRODUÇÃO

A Internet é um conjunto de redes de computadores interligados pelo mundo inteiro, que têm em comum um conjunto de protocolos e serviços, de forma que os usuários a ela conectados podem usufruir de serviços de informação e comunicação de alcance mundial tais como: e-mail, servidores Web, ftp, irc, icq etc. Trata-se da mais bem sucedida aplicação prática do conceito de interoperabilidade, que consiste em conectividade de redes de tecnologias distintas. Isso só foi conseguido graças ao conjunto de protocolos conhecidos como TCP/IP(Transmission Protocol/Internet Protocol). Mas o que popularizou mesmo a Internet foi a criação da World Wide Web. Trata-se de um serviço para a transmissão multimídia de informações implementado pelo protocolo de aplicação HTTP(Hypertext Transfer Protocol). Um Cliente HTTP(Browser WEB) se comunica com um servidor HTTP(Servidor WEB) requisitando arquivos. Geralmente esses arquivos estão no formato HTML (Hypertext Markup Language) que pode conter referências para outros arquivos diversos(imagens, sons, vídeos etc). Ao receber o arquivo HTML o cliente verifica cada referência, solicitando ao servidor HTTP os arquivos indicados. Esse modelo de funcionamento limita bastante o uso da Web uma vez que as páginas HTML têm um conteúdo estático, ou seja, sempre são exibidas da mesma forma e não possibilitam nenhuma interação com o usuário. Para deixar a Web mais dinâmica e interativa, criou-se o CGI(Common Gateway Interface). Agora podemos ter programas num servidor Web que podem ser requisitados por um cliente Web. O programa é processado e o resultado desse processamento é enviado pelo servidor Web ao cliente, geralmente no formato HTML. É importante percebermos onde está o dinamismo do CGI: o processamento de tais programas pode retornar diferentes resultados, dependendo dos parâmetros informados pelo cliente(interação) ao programa CGI. Apesar de dar mais “vida” a web, programas CGI possuem uma serie de desvantagens técnicas, sendo a principal delas o fato de tais programas executarem num processo diferente do Web Server. Sendo assim, um servidor web que recebesse várias requisições simultâneas, facilmente se sobrecarregava e parava. Por isso surgiram, e ainda surgem a cada dia, tecnologias alternativas ao uso do CGI: ISAPI, NISAPI, IDC/HTX, Cold Fusion, Java Server Pages(JSP), Personal Home Page(PHP), Active Server Pages(ASP) etc.

2 - ACTIVE SERVER PAGES

ASP é um tecnologia da Microsoft que disponibiliza um conjunto de componentes para o desenvolvimento de páginas Web dinâmicas. Tais páginas consistem em arquivos de extensão *.asp no formato texto(ASCII) que contém combinações de scripts e tags HTML. Um servidor Web que suporta ASP funciona da seguinte forma: · Cliente solicita página *.asp · Servidor abre a página e lê seu conteúdo · Se encontra tags HTML, envia direto ao cliente · Se encontra comandos de script: · Para o envio · Processa os comandos

mais seguro e robusto: Windows NT Server. Ele pode ser encontrado no CD-ROOM do Windows NT 4.0 Optional Pack. Sua instalação é bastante simples, cabendo ao usuário informar apenas quais os componentes do Optional Pack 4.0 deseja instalar e em que diretório serão instalados, bem como informar os diretórios principais para os serviços de publicação WWW e FTP. A configuração do IIS é feita através do Microsoft Management Console: Iniciar à Programas à Windows NT 4.0 Optional Pack à Microsoft Internet Information Server à Information Server Manager.

A primeira coisa a se fazer é criar um novo Web site. Basta ir no menu ActionàNewàSite Web, indicar a descrição do novo site, indicar o IP da máquina e o número da porta do servidor Web(80), indicar o caminho para o diretório home do site e, para finalizar, informar as permissões de acesso:

Acesso de Leitura Acesso de Script Acesso de Execução Acesso de Gravação Pesquisa em pasta

Depois de criar o novo site, você pode alterar suas configurações clicando no mesmo com o botão direito do mouse, escolhendo a opção propriedades:

Opção Descrição

Site da Web

Configuração do IP, portas de conexão, limite de conexões, Ativação do Log Operadores Designar contas administrativas p/ site Desempenho Otimização Filtros ISAPI Adicionar/Remover filtros ISAPI Pasta Base Configurar permissões de acesso e diretório

base Erros Personalizados Personalizar os erros do Servidor Web

Pasta de Segurança

Configurar autenticação de usuários, segurança de comunicação e restrições a endereços IP Documentos Definir arquivos padrões O IIS também possui o recurso de Diretórios Virtuais. Eles servem para que os usuários Web possam acessar o seu conteúdo, sem precisar saber sua localização física no disco do servidor. Camuflando a estrutura real do disco, nos prevenimos contra possíveis ataques de hackers e facilitamos a vida dos usuários Web, pois se mudarmos a estrutura interna de armazenamento, o endereço virtual não será afetado. Cada diretório virtual criado possui suas próprias configurações de segurança, permissões de acesso, erros personalizados, documentos padrões etc. Para criar um diretório virtual, clique com o botão direito do mouse no Web Site onde este deverá se localizarà Newà Pasta Virtual. Informe então um nome para o diretório virtual, especifique o diretório físico onde estarão as páginas desse diretório, especifique as permissões de acesso de seus usuários. Para que páginas ASP sejam executadas, deve-se pelo menos marcar a permissão de Script. Caso contrário, o servidor Web retornará as página ASP desse diretório aos clientes da mesma forma que estão armazenadas(com todos os comandos de scripts visíveis ao usuário). Quando você desejar publicar uma página na Web basta criar o arquivo ASP ou HTML e salvá-lo em algum diretório físico relacionado a algum diretório virtual. Para acessar esse arquivo por um navegados, informe o seguinte URL:

http://nome_do_servidor/nome_diretorio_virtual/nome_página

5 – ROTINAS DE SCRIPT

Script é um programa escrito numa determinada linguagem de programação que não necessita ser compilado para ser posteriormente executado. Scripts são interpretados, ou seja, seus comandos são lidos em tempo de execução por um Script Engine, processados e seus resultados passados para a saída padrão da aplicação(monitor de vídeo, impressora, sevidor web etc). Toda a funcionalidade e “Inteligência” de uma página ASP é controlada através de comandos de Script. Teoricamente, o ASP pode utilizar qualquer Script Engine(interpretador), mas na prática a Microsoft só disponibiliza dois: · Visual Basic Script (VBScript) - default · MS Java Script(JScript) Ao escrevemos páginas *.ASP a primeira coisa que devemos fazer é indicar em qual dessas linguagens disponíveis elas serão escritas:

<% @ LANGUAGE=VBScript %> ou

O Web browser não executará comandos HTML, somente scripts. Mas como ele reconhece um script? Simples, se o Web Server encontrar na página *.ASP a tag <% ou existem comandos de scripts a serem executados. Sendo assim, ele os executa e só retornará para o cliente o resultado HTML.

Um comando não pode existir em mais de uma linha.

Existem duas formas de se escrever essa página corretamente: colocar o comando numa única linha ou usar o caractere _ (underline).

6.1 VARIÁVEIS

São identificadores alfanuméricos que “apontam” para posições de memória onde existem valores armazenados temporariamente, sendo que estes pode ser alterados durante o processamento de uma aplicação. Não nos interessa saber como esse valor será armazenado na memória, nem onde. Basta apenas sabermos o nome e o tipo do valor armazenado em tal variável. Em VBScript os nomes de variáveis devem começar obrigatoriamente com uma letra e não podem exceder 255 caracteres. Ao contrário da maioria das linguagens de programação, uma variável do VBScript não necessita ser declarada antes de ser utilizada. Dim Nome_da_Variavel

Exemplo 2.2: erro_linha2.asp <% @ LANGUAGE=VBSCRIPT %> Curso ASP

<% a = 2 : b = a*2 %> Valor de B = <%=b%>

Exemplo 2.3: erro_linha3.asp <% @ LANGUAGE=VBSCRIPT %> Curso ASP

<% texto = “lineu antonio ” + “de lima santos”%> Nome = <%=texto%>

Exemplo 2.4: erro_linha4.asp <% @ LANGUAGE=VBSCRIPT %> Curso ASP

<% texto = “lineu antonio ” + _ “de lima santos”%> Nome = <%=texto%>

A mesma variável não pode ser declarada mais de uma vez no mesmo escopo do script: O código a seguir está errado

Obs: O “tempo de vida” de uma variável vai desde sua declaração explícita(Dim) ou implícita(sem Dim) até o final do script ou sub-rotina.

Talvez você não perceba isso com exemplos tão simples mas scripts com declarações implícitas de variáveis são mais difíceis de ser entendidos, além de estarmos mais vulneráveis a erros de digitação. Observe o seguinte exemplo e tire suas conclusões.

Exemplo 3.1: var1.asp <% @ LANGUAGE=VBSCRIPT %> Curso ASP

<% Dim v v1 = 100 v2 = 200 v3 = 300 %> V1=<%=v1%> V2=<%=v2%> V3=<%=v3%>

Exemplo 3.2: var2.asp <% @ LANGUAGE=VBSCRIPT %> Curso ASP

<% Dim v v1 = 100 v2 = 200 Dim v1 ‘Redeclaração da Variável v v1 = 900 v3 = 300 %> V1=<%=v1%> V2=<%=v2%> V3=<%=v3%>

Exemplo 3.3: var3.asp <% @ LANGUAGE=VBSCRIPT %> Curso ASP

<% teste = “Lineu Antonio de Lima Santos” %> Nome do Usuário = <%=tste%>

É possível em VBScript declarar uma variável para armazenar mais de um valor: Array. Ao declararmos uma variável array devemos informar seu nome e a quantidade de valores que a mesma pode armazenar:

Dim Nome_Array(Quantidade)

Para acessar determinado valor de uma variável array, informamos o nome e a posição de tal valor. Esse índice começa em 0(zero) e vai até o valor especificado na declaração(Quantidade).

Exermplo 4: tipo.asp <% @ Language = VBScript%> <% Option Explicit %> Curso ASP

<% Dim A A = "Lineu Antonio de Lima Santos" %> Valor de A como String = <%=A%> <% A = 2 %> Valor de A como Inteiro = <%=A%> <% A=#02/10/1978# %> Valor de A como Date = <%=A%> <% A = #06:30:00# %> Valor de A como Time = <%=A%> <% A = 10.20 %> Valor de A como Real = <%=A%> <% A = True %> Valor de A como Booleano = <%=A%>

Exermplo 5.1: array1.asp

<% @ Language = VBScript%> Curso ASP

<% Dim MeuArray(3) MeuArray(0)=Date MeuArray(1)="Lineu Antonio de Lima Santos" MeuArray(2)=12. MeuArray(3)=Now %> Posição 1 = <%=MeuArray(0)%> Posição 2 = <%=MeuArray(1)%> Posição 3 = <%=MeuArray(2)%> Posição 4 = <%=MeuArray(3)%>

Observe que o valor armazenado em cada elemento de um array pode ser de um subtipo diferente dos demais. Outra observação importante: arrays têm que ser declarados explicitamente. Arrays não são limitados para uma única dimensão. Em VBScript pode-se declarar Arrays de até 60 dimensões.

Pode-se declarar um array cujo tamanho é alterado durante a interpretação do script. Para tal, basta declarar o array com Dim sem informar a quantidade de elementos. Depois deve-se utilizar a declaração ReDim para determinar o número de elementos. Caso seja necessário redimensionar o array, utiliza-se novamente a declaração ReDim. Se houver a necessidade de preservar o conteúdo do array a ser redimensionado, utiliza- se a declaração ReDim Preserve.

Exermplo 5.2: array2.asp

<% @ Language = VBScript%> Curso ASP

<% Dim MeuArray(1,1) MeuArray(0,0)= "Lineu Antonio de Lima Santos" MeuArray(0,1)= MeuArray(1,0)= "Universidade Federal do Piauí" MeuArray(1,1)= %> Nome = <%=MeuArray(0,0)%> Telefone = <%=MeuArray(0,1)%> Nome = <%=MeuArray(1,0)%> Telefone = <%=MeuArray(1,1)%>

6.4 OPERADORES

De nada adiantaria termos valores armazenados em nossas variáveis de memória, se não pudéssemos fazer cálculos, comparações ou qualquer outra operação com eles. Em VBScript temos um conjunto de símbolos alfanuméricos para efetuar tais operações:

Operador Descrição = Atribuição / Igual <> Diferente < Menor que <= Menor ou igual que > Maior que >= Maior ou igual que

  • Soma numérica/ Concatenação de Strings
  • Subtração ou negativo Numérico
  • Multiplicação / Divisão \ Efetua a divisão entre dois números e retorna um número inteiro Mod Retorna o Resto de uma divisão entre inteiros ^ Exponenciação & Concatenação de Strings Is Comparação de Igualdade entre dois Objetos

Pelo exposto, não fica difícil perceber que as variáveis serão manipuladas de acordo com o seus subtipos. Os valores envolvidos numa mesma operação devem ser do mesmo subtipo ou de subtipos compatíveis.

Esse exemplo funciona corretamente pois pela regra de compatibilidade a soma de um número inteiro e uma “string numérica” resulta realmente na soma numérica dos dois. Seria lógico pensar que o contrário estaria correto também, ou seja,

Exemplo 7.1 : operador1.asp

<% @ LANGUAGE=VBSCRIPT %> <% Option Explicit %> Curso ASP

<% Dim a,b a = 1 b = “ 2 ” %> A+B = <%=a+b%> <% a=”Número de Variáveis”%> A+B = <%=a+b%>

que a soma de uma número e uma string alfanumérica resultaria numa concatenação. Verifique o próximo exemplo e tire suas conclusões:

Podem ocorrer confusões de outros tipos:

Para resolver esses problemas, poderíamos ser mais cautelosos na escrita de nossos programas efetuando exaustivos testes. Outra solução menos “dolorosa” seria utilizarmos conversões de tipos explícitas nos nossos programas.

Função de Conversão Descrição CStr Converte uma expressão para o subtipo String Cint Tenta converter uma expressão para o subtipo Integer CLng Tenta converter uma expressão para o subtipo Long Cbool Tenta Converter para Booleano Cbyte Tenta converter para o subtipo Byte Cdate Tenta converter para o subtipo Date CDbl Tenta converter para o subtipo Double CSng Tenta converter para o subtipo Single

Exemplo 7.3 : operador3.asp

<% @ LANGUAGE=VBSCRIPT %>

<% Option Explicit %> Curso ASP

<% Dim a,b a = "1" b = "2" %> A - B = <%=a-b%> A + B = <%=a+b%>

Exemplo 7.2 : operador2.asp

<% @ LANGUAGE=VBSCRIPT %> <% Option Explicit %> Curso ASP

<% Dim a,b a = 1 b = "Alfanumérica" %> A + B = <%=a+b%>

Esse script da a falsa impressão de estarmos calculando o valor da expressão da direita para a esquerda, ou seja, Resultado = 2^2^3 = 2^ 8 = 256. Mas o que percebemos foi que o resultado gerado é igual a 64, ou seja, Resultado = 2^2^3 = 4^3=64. Para evitar esse tipo de confusão com relação à ordem de cálculo de uma expressão devemos utilizar parênteses. A sub expressão que estiver dentro de parênteses têm prioridade de cálculo em cima das demais.

6.5. SUBROTINAS

VBScript possui dois tipos de subrotinas: Sub e Function. Um Sub é um conjunto de comandos associados a um identificador alfanumérico. Uma Function possui a mesma definição só que além de executar os comandos a ela associados, pode gerar um valor como resultado. Essas subrotinas podem ainda receber algum(s) valor(s) como parâmetro. Veja a seguir suas respectivas sintaxes:

Sub NomeDoProcedimento([Parâmetro(s)]) Comando(s) End Sub

Function NomeDaFunção([Parâmetro(s)]) Comando(s) End Function

Dentro da Function devemos implementar um mecanismo para passar o valor calculado para fora da function. Basta atribuir tal valor ao identificador da Function. Na verdade, o identificador da Function é uma expressão pois retorna um valor. Para verificarmos o valor retornado por uma Function, colocamos a mesma no lado direito de uma atribuição:

Exemplo 9.2 : exp2.asp <% @ LANGUAGE=VBSCRIPT %> <% Option Explicit %> Curso ASP <% Dim Resultado Resultado = 2^(2^3) %> 2^(2^3) = <%=Resultado%>

Esse exemplo serve para ilustrar as vantagens de se trabalhar com subrotinas : programa fica mais estruturado e dependendo do número de comandos de uma subrotina, existe uma economia de linhas de código. Cabem aqui algumas observações. A variável declarada dentro da Function é dita variável local da Subrotina, pois seu valor não pode ser “enxergado” fora da mesma. Por outro lado, as variáveis c,d,e podem ser “vistas” pela Function pois estas são variáveis de escopo global.

Observe que o código para o SUB(ou Function) não precisa ser escrito antes de sua chamada.

6.6. INCLUDE FILES

Exemplo 10.1: sub1.asp

<% @ LANGUAGE=VBSCRIPT %> Curso ASP <% Function Soma(a,b) Dim Resultado Resultado = a + b Soma = Resultado end Function

Dim c,d,e e = Soma(10,20) %> Soma(10,20)= <%=e%> Soma(100,200)=<%=Soma(100,200)%>

Exemplo 10.2: sub2.asp

Curso ASP <% Dim A,B A = "Variável Global A" B = "Variável Global B" MudaB %> Valor de A = <%=A%> Valor de B = <%=B%>

<% Sub MudaB() Dim A A = "Variável A no SUB" B = "Variável B no SUB" End Sub %>

determinado valor

Log (valor_numérico) Retorna o Logaritmo Neperiano de um número Exp (valor_numérico) Retorna e^valor_numérico

Sqr (valor_numérico) Retorna a raiz quadrada de um valor numérico maior ou igual a zero Date Retorna a Data atual Time Retorna a Hora atual Now Retorna a Data/Hora atual Day (valor_data) Retorna o dia de uma determinada data Month (valor_data) Retorna o mês de uma determinada data Year (valor_data) Retorna o ano de uma determinada data

Weekday (valor_data) Retorna o dia da semana no formato numérico de uma determinada data

Hour (tempo) Retorna a hora de uma determinada expressão de tempo

Minute (tempo)

Retorna os minutos de uma determinada expressão de tempo

Second (tempo) Retorna os segundos de uma determinada expressão de tempo TimeSerial(hora,minuto,segundo) Retorna uma expressão de tempo DateSerial(ano,mes,dia) Retorna caracteres são de data

Asc (caractere) Retorna o número correspondente na tabela ASCII do caractere informado

Chr (valor inteiro) Retorna o caractere ASCII correspondente ao valor inteiro informado

Lcase (string) Converte todos os caracteres de uma string para minúsculas

Ucase(String) Converte todos os caracteres de uma string para maiúscolas

Len (String) Retorna o número de caracteres de uma determinada string

InStr (pos_inicial,string,substring)

Retorna a posição do primeiro caractere de uma substring numa determinada string. Pos_inicial indica a posição da string onde devemos começar a busca. Ex : InStr(1,”Lineu”,”eu”) = 4 InStr(3,”Lineu”,”eu”) = 4

Mid (string,pos_inicial,Tamanho)

Retorna uma substring a partir de uma string informada , bastando apenas especificarmos qual a posição inicial da substring e seu tamanho. Ex : Mid (“Lineu”,4,2) = eu

Left (string,Tamanho)

Corta uma string a partir do lado esquerdo. Tamanho é o número de caracteres da nova string Ex: Left (“Lineu”,3) = Lin Right(string,Tamanho) Corta uma string a partir do lado direito.

Tamanho é o número de caracteres da nova string Ex: Right (“Lineu”,2) = eu

Ltrim (String)

Retira caracteres de espaços que possam existir no lado esquerdo de uma string Ex : Ltrim(“ Lineu S ”) = “Lineu S “

Rtrim (String)

Retira caracteres de espaços que possam existir no lado direito de uma string Ex : Ltrim(“ Lineu S ”) = “ Lineu S“

Trim (String)

Retira caracteres de espaço do inicio e do fim de uma string Ex : Trim(“ Lineu S ”) = “Lineu S”

FormatCurrency(Valor Numérico)

Formata um valor numérico para o padrão moeda configurado no computador servidor.

FormatNumber(Valor Numérico)

Formata um valor numérico para o padrão numérico configurado no computador servidor.

Exemplo 12.1 : funcoes1.asp <% @ Language = VBScript%><% Option Explicit%> Curso ASP <% Dim s S = " Lineu " S = Trim(S) %> Caracteres da palavra <%=UCase(s)%> : 1 - <%=Mid(s,1,1)%> 2 - <%=Mid(s,2,1)%> 3 - <%=Mid(s,3,1)%> 4 - <%=Mid(s,4,1)%> 5 - <%=Mid(s,5,1)%>

Verifique no próximo exemplo a ocorrência de erros:

Exemplo 12.2 : funcoes2.asp

<% @ Language = VBScript%> <% Option Explicit%> Curso ASP

<% Dim dia,mes,ano dia = 2 mes = 31 ano = 2000 %> <%=DateSerial(ano,mes,dia) %> <%=CDate(dia & "/" & mes & "/" & ano)%>