Erro No Update
#1
Posted 02/09/2005, 16:24
'Conecta com o banco SQL
Dim cn As New SqlClient.SqlConnection(ConfigurationSettings.AppSettings("ConnectionString"))
'Abre o Banco
cn.Open()
'Edita Administrador
Dim MySQL As String = "UPDATE Administrador SET NomeCompleto = @NomeCompleto, Cpf = @Cpf, TelResidencial = @TelResidencial, TelComercial = @TelComercial, Celular = @Celular, Email = @Email, Senha = @Senha WHERE id = @id"
Dim Cmd As New SqlClient.SqlCommand(MySQL, cn)
Cmd.Parameters.Add(New SqlClient.SqlParameter("@NomeCompleto", txtNome.Text))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@Cpf", txtCpf.Text))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@TelResidencial", txtResidencial.Text))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@TelComercial", txtComercial.Text))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@Celular", txtCelular.Text))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@Email", txtEmail.Text))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@Senha", txtSenha.Text))
Cmd.Parameters.Add(New SqlClient.SqlParameter("@id", Request.QueryString("id")))
Cmd.ExecuteNonQuery()
mas eu edito e ele num muda nada alguem sabe o que to fazendo de errado??
#2
Posted 03/09/2005, 12:06
mesmo assim, tenta fazer como no código abaixo...
'Conecta com o banco SQL Dim cn As New SqlConnection(ConfigurationSettings.AppSettings("ConnectionString")) 'Abre o Banco cn.Open() 'Edita Administrador Dim MySQL As String = "UPDATE Administrador SET NomeCompleto = @NomeCompleto, Cpf = @Cpf, TelResidencial = @TelResidencial, TelComercial = @TelComercial, Celular = @Celular, Email = @Email, Senha = @Senha WHERE id = @id" Dim Cmd = New SqlCommand(MySQL, cn) Cmd.Parameters.Add(New SqlParameter("@NomeCompleto", txtNome.Text)) Cmd.Parameters.Add(New SqlParameter("@Cpf", txtCpf.Text)) Cmd.Parameters.Add(New SqlParameter("@TelResidencial", txtResidencial.Text)) Cmd.Parameters.Add(New SqlParameter("@TelComercial", txtComercial.Text)) Cmd.Parameters.Add(New SqlParameter("@Celular", txtCelular.Text)) Cmd.Parameters.Add(New SqlParameter("@Email", txtEmail.Text)) Cmd.Parameters.Add(New SqlParameter("@Senha", txtSenha.Text)) Cmd.Parameters.Add(New SqlParameter("@id", Request.QueryString("id"))) Cmd.ExecuteNonQuery() cn.Close()
Quialquer coisa posta ae
Abraços
Edição feita por: wozniak, 03/09/2005, 23:21.
#3
Posted 05/09/2005, 09:50
colokei o .aspx e o .vb em um zip ce puder dar uma olhada...
http://www.gruporang...ministrador.zip
#4
Posted 06/09/2005, 16:05
ele está em [color="red"]off ?
se vc está utilizando o MSSQL pq vc não faz uma procedure ?
a performance fica bem melhor e o código fica mais simples.
*************************************************
#5
Posted 06/09/2005, 16:31
eu num faço em procedures pq num manjo mto..
se puder postar um exemplo da procedure e de como ficaria a chamada dela eu agradeceria!
Edição feita por: N3G4T1V3, 06/09/2005, 16:31.
#6
Posted 06/09/2005, 21:01
<customErrors mode="Off" />
Só p/ exibir o erro extamente...
Abraços
#7
Posted 07/09/2005, 16:18
Create Proc Proc_Altera_Administrador @id int, @NomeCompleto varchar(60), Cpf varchar(11), TelResidencial numericr(8,0), TelComercial numericr(8,0), Celular numericr(8,0), Email varchar(60), Senha varchar(15) as UPDATE Administrador SET NomeCompleto = @NomeCompleto, Cpf = @Cpf, TelResidencial = @TelResidencial, TelComercial = @TelComercial, Celular = @Celular, Email = @Email, Senha = @Senha WHERE id = @id
*************************************************
#8
Posted 08/09/2005, 09:45
certo quanto a procedure eu criei.. agora como faço apra chamar ela no asp.net e passar as variaveis??
#9
Posted 10/09/2005, 19:05
Tentei colocar o erro em "off" mas não mudou nada..
certo quanto a procedure eu criei.. agora como faço apra chamar ela no asp.net e passar as variaveis??
'Conecta com o banco SQL
Dim cn As New SqlConnection(ConfigurationSettings.AppSettings("ConnectionString"))
'Abre o Banco
cn.Open()
'Edita Administrador
Dim Cmd As New SqlCommand()
Cmd.Connection = cn
Cmd.CommandText = "PROCEDURE_NAME"
Cmd.CommandType = CommandType.StoreProcedure
Cmd.Parameters.Add(New SqlParameter("@NomeCompleto", txtNome.Text))
Cmd.Parameters.Add(New SqlParameter("@Cpf", txtCpf.Text))
Cmd.Parameters.Add(New SqlParameter("@TelResidencial", txtResidencial.Text))
Cmd.Parameters.Add(New SqlParameter("@TelComercial", txtComercial.Text))
Cmd.Parameters.Add(New SqlParameter("@Celular", txtCelular.Text))
Cmd.Parameters.Add(New SqlParameter("@Email", txtEmail.Text))
Cmd.Parameters.Add(New SqlParameter("@Senha", txtSenha.Text))
Cmd.Parameters.Add(New SqlParameter("@id", Request.QueryString("id")))
Cmd.ExecuteNonQuery()
cn.Close()
#10
Posted 12/09/2005, 10:22
por favor me deem um help nem que eu tenha que pagar pra alguem concerta isso pq preciso entrega isso até o fim de mês e impaquei nessa parte...
Edição feita por: N3G4T1V3, 12/09/2005, 11:47.
#11
Posted 21/11/2017, 08:23
Cialis 20 Mg Comprar En Espana Zithromax Official Website Thiazides Diuretics Buy Canadian Pharm viagra online Can I Buy Nexium In Canada Pay With Check By Phone Buy Amoxicillin 500mg Cap
Buy Doxycycline No Rx Cheap Vigora buy viagra online Levitra 5mg Rezeptfrei
Medscom Bewertung Progesterone Low Price Ups Mail Order Synthroid viagra Buy Effexor No Prescription
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)