MsSQL – Editar Dados
Nas matérias anteriores focamos nosso conhecimento em conexão a Banco de Dados.
A partir de hoje, vamos passo a passo criar Projetos simples ou robustos em ASP.NET, PHP, JAVA, Delphi, aliás, qualquer Linguagem de Programação que tenha relacionamento com o SQL SERVER..
Hoje lhe darei um exemplo prático e objetivo de como editar dados utilizando o ASP.NET junto ao SQL SERVER.
Para seguir nesta matéria, você precisará ter algum conhecimento em ASP.NET.
Se você ainda não o tem, lhe recomendo visitar algumas de nossas matérias, onde explicamos passo a passo como trabalhar nesta linguagem de programação que apesar de ser nova, já é muito utilizada no mundo inteiro.
Como de costume, preparamos o material descrito na matéria para que você possa baixar.
Ele está zipado e disponível em anexo, com o nome arquivo.zip.
Criando As Tabelas Na Base De Dados MsSQL
Copie o conteúdo descrito no arquivo script-sql.txt junto ao SQL Server e crie a tabela Clientes.
-----CRIA A TABELA CLIENTES -----
CREATE TABLE `Clientes` (
`codigo` int(11) NOT NULL AUTO_INCREMENT,
`nome` VARCHAR(50) NOT NULL DEFAULT "",
`email` VARCHAR(50) NOT NULL DEFAULT ""
PRIMARY KEY(`codigo`)
);
INSERT INTO clientes(nome, email) VALUES ('Marta Regina', 'email1@teste.com.br');
INSERT INTO clientes(nome, email) VALUES ('Karen Souza', 'karen@teste.com.br');
INSERT INTO clientes(nome, email) VALUES ('Sonia Braga', 'sonia@teste.com.br');
INSERT INTO clientes(nome, email) VALUES ('Carla Souza', 'carlinha@teste.com.br');
-----
Feita a inserção dos dados, sua tabela estará criada, já com os dados a serem verificados dentro dela..
Editando Dados Na Base De Dados MsSQL
Descrevo abaixo parte do código descrito no arquivo editacliente.aspx, onde trata da edição dos dados.
-----CRIA A TABELA CLIENTES - Linha 01 à Linha 61 -----
<%@ Page Language="vb" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SQLClient" %>
<script runat="server">
Dim codigo as integer
Dim nome , email as string
Sub Page_Load(Source as Object, E as EventArgs)
if not Page.IsPostBack then
BindData
End If
End Sub
Sub BindData()
Dim sql as string = "Select * from Clientes"
Dim myConn As SqlConnection = New
SqlConnection(ConfigurationSettings.AppSettings("conexaoSQL"))
Dim Cmd as New SQLCommand(sql, MyConn)
Dim objDR as SQLDataReader
Myconn.Open()
objDR=Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
list1.datasource=objDR
list1.DataValueField="codigo"
list1.datatextfield="nome"
list1.databind
list1.selectedindex=0
Myconn.Close()
End Sub
Sub EditarRegistro(Source as Object, E as EventArgs)
Dim sql as string = "Select * from Clientes Where codigo = " & list1.selecteditem.value
Dim objDR as SQLDataReader
Dim myConn As SqlConnection = New
SqlConnection(ConfigurationSettings.AppSettings("conexaoSQL"))
Dim Cmd as New SQLCommand(sql, MyConn)
Myconn.Open()
objDR=Cmd.ExecuteReader(system.data.CommandBehavior.CloseConnection)
While objDR.Read()
codigo=objDR("cliente_id")
nome=objDR("nome")
email=objDR("email")
End While
page.databind()
label1.text=""
End Sub
Sub AtualizarRegistro(Source as Object, E as EventArgs)
Dim sql as string = "Update Clientes Set nome=@nome, email=@email Where codigo=@codigo"
Dim myConn As SqlConnection = New
SqlConnection(ConfigurationSettings.AppSettings("conexaoSQL"))
Dim Cmd as New SQLCommand(sql, MyConn)
cmd.Parameters.Add(New SQLParameter("@codigo", lblID.text))
cmd.Parameters.Add(New SQLParameter("@nome", frmnome.text))
cmd.Parameters.Add(New SQLParameter("@email", frmemail.text))
MyConn.Open()
cmd.ExecuteNonQuery
label1.text="Dados atualizados com sucesso ! "
BindData
list1.SelectedIndex=List1.Items.IndexOf(List1.Items.FindByValue(lblID.text))
End Sub
</script>
-----
Observações importantes:
Dividimos este código em pelo menos 4 partes importantes:
- Rotina BindData() – Linha 16 à Linha 29 Quando o usuário clica no link Exibir Clientes, ele carrega a página com os dados a serem exibidos no componente List.
- EditarRegistro - Linha 31 à Linha 46 Através desta rotina, será possível trazer os dados para edição do conteúdo, fazendo-os serem exibidos nas caixas de texto.
- AtualizarRegistro – Linha 49 à Linha 61 Através desta rotina, será possível gravar os dados na tabela Clientes (após terem sido enviados através do botão atualizar).
- HTML - Linha 68 à Linha 94 (não está disponível acima) A parte mais conhecida e prática do código. Através desta área, será possível selecionar e alterar o conteúdo a ser trabalhado.
Nosso foco hoje será o de discriminar passo a passo o script abaixo e tratando-se de um profissional experiente, certamente você sabe como inserir dados em uma tabela, correto?Como disse no início: Esta matéria é focada aos mais experientes, portanto, a intenção é dispor Após ter criado a tabela administradores, disponibilize o conteúdo descrito no script conexaojava.java dentro do StelsCSV JDBC (conforme a imagem abaixo) e clique em Execute query (conforme a imagem abaixo).
Bem… espero ter lhe ajudado em algo com esta matéria que apesar de curta é bem objetiva!
Acompanhe o script completo que vai em anexo e caso você tenha alguma dúvida, pergunta ou observação, estou a sua disposição pronto a lhe ajudar.
DOWNLOAD: Descarregue o código utilizado neste tutorial: MsSQL – Editar Dados, em formato .zip.