Foros del Web » Programación para mayores de 30 ;) » Bases de Datos General »

Duda access: asignar valor a un campo en nuevo registro

Estas en el tema de Duda access: asignar valor a un campo en nuevo registro en el foro de Bases de Datos General en Foros del Web. Hola, me gustaría saber cómo puedo hacer una consulta o una macro con access para que en un formulario, al pulsar un botón de comando, ...
  #1 (permalink)  
Antiguo 07/01/2011, 12:42
 
Fecha de Ingreso: enero-2011
Mensajes: 1
Antigüedad: 13 años, 11 meses
Puntos: 0
Duda access: asignar valor a un campo en nuevo registro

Hola, me gustaría saber cómo puedo hacer una consulta o una macro con access para que en un formulario, al pulsar un botón de comando, agregar un nuevo registro y asignarle al campo clave numérico de la tabla el valor más alto existente en la tabla + 1. Muchísimas gracias.
  #2 (permalink)  
Antiguo 15/06/2011, 03:04
 
Fecha de Ingreso: junio-2011
Mensajes: 2
Antigüedad: 13 años, 6 meses
Puntos: 0
Respuesta: Duda access: asignar valor a un campo en nuevo registro

Cita:
Iniciado por ajred02 Ver Mensaje
Hola, me gustaría saber cómo puedo hacer una consulta o una macro con access para que en un formulario, al pulsar un botón de comando, agregar un nuevo registro y asignarle al campo clave numérico de la tabla el valor más alto existente en la tabla + 1. Muchísimas gracias.
Tengo exactamente el mismo problema que tu y no encuentro solucion. Me preguntaba si conseguiste solucionar el problema.

Gracias
  #3 (permalink)  
Antiguo 15/06/2011, 04:11
 
Fecha de Ingreso: junio-2011
Mensajes: 2
Antigüedad: 13 años, 6 meses
Puntos: 0
Respuesta: Duda access: asignar valor a un campo en nuevo registro

He encontrado la solucion en otra web. La comparto contigo por si aun no lo has solucionado.

Añades un botón "nuevo registro", y en "al hacer Clic" -> Procedimiento de evento escribes lo siguiente despues del .......acNewRec :

Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("Select * from Inscripciones")
db.TableDefs.Refresh
Me.Refresh
If rs.EOF Then
Form!id.Value = 1
Else
Form!id.Value = Val(DMax("[Inscripciones].[Id]", "[Inscripciones]")) + 1
End If

Sustituyendo "Inscripciones" por el nombre de tu tabla.

Etiquetas: access, asignar, registro, campos
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




La zona horaria es GMT -6. Ahora son las 13:55.