AS EMPRESAS ESTÃO "DESESPERADAS" POR ESTE TIPO DE PROFISSIONAL... - VOCÊ É UM DELES?
MEGA FORMAÇÃO EM INFRAESTRUTURA DE TI - O Conhecimento que Vira Dinheiro - CLIQUE AQUI
| « 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 |
||||||||
|---|---|---|---|---|---|---|---|---|
| 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:
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.
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.
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.
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.
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.
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. |
||||||||
| « Lição anterior | Δ Página principal | ¤ Capítulos | Próxima lição » |
|
MEGA FORMAÇÃO EM INFRAESTRUTURA DE TI (Online, Vitalício, Prático e Atualizado)! |
|
|
NÃO PROCURE VAGAS, SEJA PROCURADO! |
|
Para Todos os Detalhes, Acesse:
https://juliobattisti.com.br/curso-infra-ti.asp
|
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-2026 ®
LIVRO: MACROS E PROGRAMAÇÃO VBA NO EXCEL 2016 - CURSO COMPLETO E PRÁTICO
DOMINE A PROGRAMAÇÃO VBA NO EXCEL - 878 PÁGINAS - CLIQUE AQUI
