NUNCA MAIS PASSE RAIVA POR NÃO CONSEGUIR RESOLVER UM PROBLEMA COM O EXCEL - GARANTIDO!

UNIVERSIDADE DO VBA - Domine o VBA no Excel Criando Sistemas Completos - Passo a Passo - CLIQUE AQUI

Você está em: PrincipalArtigos › ASP 3.0 › Capítulo 06 : 07
Quer receber novidades e e-books gratuitos?
« Lição anterior Δ Página principal ¤ Capítulos Próxima lição »
SITES DINÂMICOS COM ASP 3.0 - CURSO COMPLETO
Autor: Júlio Battisti


Promoção: Livro Windows Server 2012 R2 e Active Directory - Curso Completo, 2100 Páginas. Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

Promoção: Livro Windows Server 2012 R2 e Active Directory

Curso Completo, 2100 páginas.

Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

MAIS DETALHES | COMPRAR ESTE LIVRO


Lição 051 - Capítulo 06 - Eliminando registros de um Banco de dados

Neste tópico aprenderemos a criar uma página ASP que elimina um registro do Banco de dados.

Nosso exemplo será composto dos seguintes elementos:

  • Uma página ASP – produto.asp, onde temos um campo com a listagem de Produtos disponíveis na tabela Produtos, do Banco de dados Nwind. Este listagem será construída dinamicamente, isto é, cada vez que a página for carregada, a listagem será construída a partir das informações disponíveis na tabela Produtos. Está página já foi construída no exemplo do ítem anterior, consulte a Listagem 6.4.
  • Após selecionar o produto a ser alterado, o usuário clica em um botão “Localizar produto”. Feito isso, a página produto.asp chama uma página chamada localiza.asp, a qual localiza o registro selecionado no Banco de dados. Com isso, o usuário pode conferir se este realmente é o produto que ele deseja eliminar. Esta página já foi construída no ítem anterior, consulte a Listagem 6.5, sendo que apenas iremos alterar a legenda do botão de comando, ao invés de Alterar Produto, teremos Excluir Produto. Também será alterado o atributo action da tag FORM, para que aponte para a página exclui.asp, ao invés de apontar para a página atualiza.asp.
  • Após conferir se o produto a ser excluído é o que está sendo exibido, o usuário clica no botão “Excluir produto”. Feito isso, a página localiza.asp chama a página exclui.asp, a qual acessa o Banco de dados e exclui o produto selecionado pelo usuário. Ao final é emitida uma mensagem indicando que os dados foram atualizados com sucesso.

A página ASP para excluir o produto selecionado – exclui.asp.

Na Listagem 6.7 temos o código ASP para a criação da página exclui.asp.

Listagem 6.7 – O Página ASP para excluir o produto selecionado – exclui.asp.

1          <%@ Language=VBScript %>

2          <HTML>

3          <HEAD>

4          </HEAD>

5          <TITLE>Produto excluído com sucesso.</TITLE>

6          <BODY>

7          <%

8          'O Primeiro passo é criar a conexão com o Banco de dados.

9          'Para isto crio um objeto do tipo Connection.

10        'Cria um Objeto do Tipo ADODB.Connection

           

11        Set conn=Server.CreateObject("ADODB.Connection")

12        'Agora abro uma conexão com o arquivo nwind.mdb

13        'utilizando OLE DB.

             

14        conn.ConnectionString = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;

            DATA SOURCE=c:\meus documentos\nwind.mdb"

15        conn.Open

16        'Agora criamos um Objeto RecordSet.

17        'Este Objeto irá acessar o registro do Produto

18        'que será alterado.

19        Set Produtos = Server.CreateObject("ADODB.Recordset")

20        inst_sql="Select * from Produtos WHERE Produtos.ProductName='" &       Request.Form("ProductName")& "'"

21        Produtos.Open inst_sql,conn,3,3

22        If Produtos.RecordCount <> 1 Then

23            Response.Write "<B>O Produto não existe, ou "

24            Response.Write "existe mais do que um <BR> produto com este nome: </B>"

25            Response.Write Request.Form("ProductName")

26        Else  

27            Produtos.Delete

28            Response.Write "PRODUTO : "

29            Response.Write Request.Form("ProductName")

30            Response.Write " Foi excluído da tabela de Produtos. <BR>"

31        End If

   

32        Response.Write "<HR>"

33        %>

34        <A HREF=produto.asp>Clique aqui para selecionar outro produto a ser excluído.</A>

35        </BODY>

36        </HTML>

Algumas linhas aparecem divididas em duas ou mais linhas. Nunca é demais lembrar que estas linhas devem ser digitadas como uma linha única. As mesmas estão exibidas em duas ou mais linhas apenas por questão de espaço.

Comentário sobre o código:

A única novidade na Listagem 6.7, é o trecho indicado a seguir:

22        If Produtos.RecordCount <> 1 Then

23            Response.Write "<B>O Produto não existe, ou "

24            Response.Write "existe mais do que um <BR> produto com este nome: </B>"

25            Response.Write Request.Form("ProductName")

26        Else  

27            Produtos.Delete

28            Response.Write "PRODUTO : "

29            Response.Write Request.Form("ProductName")

30            Response.Write " Foi excluído da tabela de Produtos. <BR>"

31        End If

Neste código utilizamos o método RecordCount para verificar se não foi encontrado nenhum produto (RecordCount = 1) ou foi encontrado mais do que um produto (RecordCount>1). Nestas duas situações informamos que o produto não existe ou existe mais do que um produto com o nome selecionado. Nestas duas situações não podemos utilizamos o método Delete.

Caso tenha sido encontrado somente um registro (RecordCount = 1), utilizamos o método Delete do objeto Produtos, para eliminar o registro encontrado.

Neste exemplo, utilizamos o método Delete sem nenhum parâmetro, o que faz com que seja eliminado somente o registro atual. Podemos passar um parâmetro para o método Delete, o qual altera o comportamento do mesmo. Para isso utilizaríamos a seguinte sintaxe:

RecordSet.Delete parâmetro.

Na Tabela 6.11, descrevemos os valores mais utilizados para o parâmetro do método Delete.

Valor Descrição
1 Elimina o registro atual, isto é, o registro no qual está o indicador de registros
2 Elimina somente os registros selecionados através da utilização da propriedade Filter do objeto RecordSet. A propriedade Filter já deve ter sido definida anteriormente.
3 Elimina todos os registros do objeto RecordSet.

Tabela 6.11 Valores de parâmetro para o método Delete.

Utilizando o nosso exemplo de exclusão de registro:

Vamos utilizar o nosso exemplo, passo a passo, para que possamos visualizar o funcionamento completo do mesmo. Conforme indicado na Figura 6.18, carregamos a página produto.asp e selecionamos o produto Filo Mix.

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 6.18 Selecionando o produto Filo Mix.

Ao clicarmos no botão Localizar Produto, é carregada a página localiza.asp, a qual nos exibe os campos do produto Filo Mix, conforme indicado na Figura 6.19.

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 6.19 O registro do produto Filo Mix foi localizado.

Os dados do produto Filo Mix são exibidos para que o usuário confira se este realmente é o produto a ser excluído no Banco de dados. Para excluir o produto selecionado é só clicar no botão “Excluir Produto”

Ao clicar no botão “Excluir Produto”, é chamada a página exclui.asp, a qual exclui o produto selecionado e exibe uma mensagem de que a exclusão foi realizada com sucesso e apresente um link para que o usuário possa voltar para a página produto.asp para selecionar um outro produto a ser excluído, conforme indicado na Figura 6.20.

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 6.20 O produto Filo Mix foi excluído com sucesso.

Na Figura 6.21, abrimos a tabela Produtos do  Banco de dados C:\meus documentos\nwind.mdb, na qual podemos comprovar que o produto Filo Mix foi realmente excluído.

Curso Completo de ASP 3.0 - Júlio Battisti
Figura 6.21 Comprovando a exclusão do produto Filo Mix.

IMPORTANTE! Veja que através da utilização de ASP podemos construir aplicações Web com as mesmas funcionalidades de Banco de dados existentes em aplicações tradicionais. Podemos inserir, pesquisar, alterar e excluir registros.


Promoção: Livro Windows Server 2012 R2 e Active Directory - Curso Completo, 2100 Páginas. Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

Promoção: Livro Windows Server 2012 R2 e Active Directory

Curso Completo, 2100 páginas.

Tudo para você se tornar um administrador de redes altamente qualificado para o mercado de trabalho e levar a sua carreira para o próximo nível!

MAIS DETALHES | COMPRAR ESTE LIVRO


« Lição anterior Δ Página principal ¤ Capítulos Próxima lição »
Quer receber novidades e e-books gratuitos?

Cursos Online

  • Banco de Dados
  • Carreira
  • Criação/Web
  • Excel/Projetos
  • Formação
  • + Todas as categorias
  • Contato: Telefone: (51) 3717-3796 | E-mail: webmaster@juliobattisti.com.br | Whatsapp: (51) 99627-3434

    Júlio Battisti Livros e Cursos Ltda | CNPJ: 08.916.484/0001-25 | Rua Vereador Ivo Cláudio Weigel, 537 - Universitário, Santa Cruz do Sul/RS, CEP: 96816-208

    Todos os direitos reservados, Júlio Battisti 2001-2019 ®

    [LIVRO]: MACROS E PROGRAMAÇÃO VBA NO EXCEL 2010 - PASSO-A-PASSO

    APRENDA COM JULIO BATTISTI - 1124 PÁGINAS: CLIQUE AQUI