Ver Mensaje Individual
  #1 (permalink)  
Antiguo 01/09/2011, 10:28
manuelivg
 
Fecha de Ingreso: julio-2011
Mensajes: 30
Antigüedad: 12 años, 9 meses
Puntos: 0
Actualizar registros en SQL desde VB . NET

Saludos cordiales,

Tengo el código que utilizo para insertar registros en una base de datos de SQL desde VB .NET, sin embargo, requiero actualizarlos desde la aplicación pero no encuentro como.

¿Como puedo hacer para que los registros se actualicen?

Aqui el código que uso para insertar, ojala alguien pueda indicarme como hacerlo ó que debo cambiar en el código para que solo actualice.

Private Sub AddElementos(ByVal Usuario As String, ByVal Password As String, ByVal BaseDatos As String, ByVal Servidor As String)
Dim CadenaConexion As String = "Provider=SQLOLEDB.1;Persist Security Info=False;" & _
"User ID =" & Usuario & ";Password =" & Password & ";Initial Catalog =" & BaseDatos & ";Data Source =" & Servidor

CN = New OleDb.OleDbConnection
CN.ConnectionString = CadenaConexion

Try
CN.Open()

CMD = New OleDbCommand
CMD.Connection = CN
CMD.CommandText = "INSERT INTO [CA_FOLIOCONSECUTIVO] (NOMBRE, FECHA, CONCATENADO, OBSERVACIONES) VALUES (?,?,?,?)" 'Los signos de interrogación nos dicen cuantos campos se van a insertar.

CMD.Parameters.AddWithValue("@NOMBRE", Me.NOMBREComboBox.Text)
CMD.Parameters.AddWithValue("@FECHA", Me.FECHADateTimePicker.Value)
CMD.Parameters.AddWithValue("@CONCATENADO", Me.TextBox2.Text)
CMD.Parameters.AddWithValue("@OBSERVACIONES", Me.OBSERVACIONESTextBox.Text)

CMD.ExecuteNonQuery()
Catch ex As Exception



End Try
CN.Close()


End Sub




De antemano gracias por la ayuda que puedan proporcionarme.