elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Data Control VB6?
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Data Control VB6?  (Leído 1,787 veces)
R3Z

Desconectado Desconectado

Mensajes: 86


Ver Perfil
Data Control VB6?
« en: 21 Julio 2015, 22:08 pm »

Alguien puede decir por que me sale error    este codigo lo tengo en un solo commando cada vez que le doy me sale error

Código
  1. Private Sub Command2_Click()
  2. Data1.Recordset.FindFirst ("Codigo='" & TXTCodigo & "'")
  3. If Data1.Recordset.NoMatch = True Then
  4. Data1.Recordset.AddNew
  5. Data1.Recordset!Codigo = TXTCodigo
  6. Data1.Recordset!Descripcion = TXTDescripcion
  7. Data1.Recordset!Aula = TXTAula
  8. Data1.Recordset.Update
  9. MsgBox "Registro Adicionado"
  10. Else
  11. Data1.Recordset.Edit
  12. MsgBox "Registro Editado"
  13. Data1.Recordset.AddNew
  14. Data1.Recordset!Codigo = TXTCodigo
  15. Data1.Recordset!Descripcion = TXTDescripcion
  16. Data1.Recordset!Aula = TXTAula
  17. Data1.Recordset.Update
  18.  
  19.  


En línea

Cj2009z

Desconectado Desconectado

Mensajes: 52


Ver Perfil
Re: Data Control VB6?
« Respuesta #1 en: 21 Abril 2016, 05:12 am »

mmmm a la hora de modificar un registro, no debes de agregar el método .addnew sino que simplemente .update, intenta y comentas.


En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines