Foros del Web » Programando para Internet » ASPX (.net) »

Imposible modificar registros

Estas en el tema de Imposible modificar registros en el foro de ASPX (.net) en Foros del Web. Buenas a todos estoy tratando de crear una pagina donde pueda modificar los datos personales, he colocado en el page_load de la pagina un select ...
  #1 (permalink)  
Antiguo 28/09/2012, 23:22
 
Fecha de Ingreso: marzo-2009
Mensajes: 46
Antigüedad: 10 años, 6 meses
Puntos: 1
Pregunta Imposible modificar registros

Buenas a todos
estoy tratando de crear una pagina donde pueda modificar los datos personales, he colocado en el page_load de la pagina un select a la BD para que me muestre en los textbox los datos del paciente seleccionado, hasta ahi todo bien
Luego agregue un boton donde coloque el update
Código:
 Protected Sub guardar_mod_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles guardar_pac.Click
        Try
            Dim s As String
            s = ConfigurationManager.ConnectionStrings("conexion_clinica").ConnectionString
            Dim conexion As New SqlConnection(s)
            conexion.Open()
            Dim comando As New SqlCommand("update paciente set " & _
                 "apellido='" & apellidoTextBox.Text & _
                 "',nombre='" & nombreTextBox.Text & _
                 "' where dni=" & DniTextBox.Text & "", conexion)
            Dim cant As Integer = comando.ExecuteNonQuery()

            If cant = 1 Then
                MyMessageBox1.ShowSuccess("Los datos del paciente fueron modificados")
            Else
                MyMessageBox1.ShowError("No existe el paciente")
            End If
            conexion.Close()
        Catch ex As SqlException
            MyMessageBox1.ShowError(ex.Message)
        End Try
    End Sub
Al modificar algo en los textbox y presionar en el boton guardar_mod me aparece el mensaje "Los datos del paciente fueron modificados" pero vuelve a cargar la pagina y los datos no son modificados.
Nose si tengo algo mal en el codigo o debo configurar algo con respecto al postback o me aconsejan otra forma de actualizar registros.

DESDE YA GRACIAS.-
  #2 (permalink)  
Antiguo 01/10/2012, 11:44
 
Fecha de Ingreso: enero-2002
Mensajes: 136
Antigüedad: 17 años, 8 meses
Puntos: 1
Respuesta: Imposible modificar registros

En principio podrías hacer un debug de la aplicación, visualizar la base si realmente cambió los valores y finalmente ver con qué código está accediendo para refrescar los TextBox del comienzo.
Saludos.
  #3 (permalink)  
Antiguo 03/10/2012, 05:25
 
Fecha de Ingreso: septiembre-2012
Mensajes: 6
Antigüedad: 7 años
Puntos: 1
Respuesta: Imposible modificar registros

Tambien lo que puedes mirar la cadena conexion con la BD o los parametroe que pasas al update
puede deberse a alguna comilla
  #4 (permalink)  
Antiguo 03/10/2012, 07:38
Avatar de DeivisAndres  
Fecha de Ingreso: febrero-2012
Ubicación: Colombia
Mensajes: 305
Antigüedad: 7 años, 8 meses
Puntos: 41
De acuerdo Respuesta: Imposible modificar registros

Bueno, yo trabajo es en C#. pero te trate de convertir el código a VB... Lo que yo aria es crear un método que tenga el modificar con parámetros, después en el evento click del button le llamo el método y los parámetros serian los tex... quedaría de esta manera..

Código vb:
Ver original
  1. Private Function Modificar_Registros(Codigo As String, Nombre As String, Apellido As String, Email As String, Sexo As String, Edad As String) As Boolean
  2.     ' Convertir de Cadena a Numerico.
  3.     Dim Cod As Integer = Convert.ToInt32(Codigo)
  4.     Dim Ed As Integer = Convert.ToInt32(Edad)
  5.  
  6.     ' Conexión BBDD.
  7.     Dim Conexion As New OleDbConnection()
  8.     Conexion.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0; Data Source = G:\BBDD.accdb; Persist Security Info = false"
  9.  
  10.     ' Cadena SQL.
  11.     Dim CadenaSQL As [String] = "UPDATE Persona SET "
  12.     CadenaSQL = CadenaSQL + " Nombre = '" + Nombre + "', Apellido = '" + Apellido + "', Email = '" + Email + "', Sexo = '" + Sexo + "', Edad = " + Ed + " WHERE Id = " + Cod
  13.  
  14.     ' Crear comando.
  15.     Dim Comando As OleDbCommand = Conexion.CreateCommand()
  16.     Comando.CommandText = CadenaSQL
  17.  
  18.     Try
  19.         ' Ejecutar la consulta de acción.
  20.         Conexion.Open()
  21.         Comando.ExecuteNonQuery()
  22.         Return True
  23.     Catch ex As Exception
  24.         Dim ms As String = ex.Message
  25.         Return False
  26.     Finally
  27.         If Conexion.State = ConnectionState.Open Then
  28.             Conexion.Close()
  29.         End If
  30.     End Try
  31. End Function
  32.  
  33.  
  34. Protected Sub btnActualizar_Click(sender As Object, e As EventArgs)
  35.     If Modificar_Registros(txtCodigo.Text, txtNombre.Text, txtApellido.Text, txtEmal.Text, txtSexo.Text, txtEdad.Text) = True Then     
  36.         Response.Redirect("update.aspx?mensaje=" + "El dato se actualizo con exito.")
  37.     Else
  38.         Response.Redirect("update.aspx?mensaje=" + "El dato no se pudo actualizar.")
  39.     End If
  40. End Sub

Lo único que te quedaría seria adaptarlo al gestor de BD que utilizas... espero y te sirva...

Etiquetas: imposible, modificar, registros, sql, textbox
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta

SíEste tema le ha gustado a 1 personas




La zona horaria es GMT -6. Ahora son las 02:12.