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" %>
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
-----
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.