modificar registro

[juannavarro1481]

hola amigos
estoy tratando de hacer una consulta update pero al momento de ejecutar la sentencia no se modifica ningun registro

el codigo que uso es

oComm.CommandType = CommandType.Text
Dim pEmail As New OleDbParameter("@Email", OleDbType.VarChar, 30)
pEmail.Value = Email
oComm.Parameters.Add(pEmail)

Dim pTelefono As New OleDbParameter("@Telefono", OleDbType.VarChar, 30)
pTelefono.Value = Telefono
oComm.Parameters.Add(pTelefono)
'MsgBox(CommandType.Text)
MsgBox(oComm.CommandType)

oConn.Open()
oComm.ExecuteNonQuery()
oConn.Close()

y nose en que estoy mal
gracia por su ayuda

[Aquaventus]

y la consulta?? donde esta??? sino como podemos saber si en caso lo tengas que talvez tu query este mal, pon el codigo completo.

[Ka0stj]

Apoyo a Aquaventus, ahora bien asegurate de que el dato o información que estas tratando de modificar exista.

Saludos!

[juannavarro1481]

SQL = "select alumnos.* from alumnos"
da = New OleDb.OleDbDataAdapter(SQL, oConn)
'da.Fill(ds, "Mi_Tabla")
da.Fill(ds, "alumnos")
'Accedemos al Registro
For Each Registro As DataRow In ds.Tables("alumnos").Rows

[juannavarro1481]

hola amigos este es codigo que uso para modificar los registros y si el registro si existe
SQL = "select alumnos.* from alumnos"
da = New OleDb.OleDbDataAdapter(SQL, oConn)
'da.Fill(ds, "Mi_Tabla")
da.Fill(ds, "alumnos")
'Accedemos al Registro
For Each Registro As DataRow In ds.Tables("alumnos").Rows
If Registro.Item("IdAlumno") = IdAlumno Then
Registro(punto) Item("Nombres") = "Mi1"
Registro(punto) Item("Apellidos") = "Mi2"

End If
Next

cb.DataAdapter = da

'Actualizamos la BD
da.Update(ds, "alumnos")
p.d.
el codigo de arriba no se como borrarlo