Visual Basic - un error en el codigo '3265'

Life is soft - evento anual de software empresarial
   
Vista:

un error en el codigo '3265'

Publicado por jon (1 intervención) el 09/01/2010 21:44:51
Private Sub CmbGrabar_Click()
If Usua = True Then
Guardar = MsgBox("Guardar informacion del nuevo usuario?", vbQuestion + vbYesNo, "Alta de Usuarios.")
If Guardar = 6 Then
rec.Open "Usuariosist", db, adOpenKeyset, adLockOptimistic, adCmdTable
With rec
.AddNew
!usuar = TxtLogin.Text 'aca me sale el error NO SE ENCONTRO EL ELEMENTO EN LA COLECCION K CORRESPONDE CON EL NOMBRE o el ordinal pedido.
!Contraseña = TxtContraseña.Text
!Usuario = Dctipousuario.BoundText
!Nom = TxtNombre.Text
!Apell = txtApellidos.Text
!DNI = TxtNºdni.Text
!fono = TxtTelefono.Text
!grado = DCgrado.BoundText
!FecIngreso = DTPFechaIngreso.Value
.UpdateBatch adAffectCurrent
Ok = MsgBox("El usuario ya existe en la base de datos.", vbInformation, "Alta de Usuarios.")
CancelarUsu
rec.Close
End With
End If
End If
End Sub

garcias de antemanoa por su ayuda
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:un error en el codigo '3265'

Publicado por jonathan (10 intervenciones) el 10/01/2010 18:50:06
bueno despues de With rec .AddNew van los nombres de tus campos de tu tabla por eso te sale el error y no podras guardar.
Espero que te sirva mi opinion
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar