Referirme a un campo
Hola tengo las siguientes lineas de código:
valor = InputBox("INTRODUCE LOS APELLIDOS ")
If DCount("APELLIDOS", "Historico", "[APELLIDOS]='" & valor & "'") > 0 Then
DoCmd.Close acForm, "actual"
DoCmd.OpenForm "Historico", , , "[APELLIDOS]='" & valor & "'" '
DoCmd.OpenForm "jugadores", acNormal
DoCmd.GoToRecord , , acNewRec
Pretendo lo siguiente yo parto de un formulario "actual" el cual al pulsar sale una pregunta, "apellidos"
Entonces busca en el formulario "historico" ese dato si lo encuentra pretendo que abra el formulario "jugadores" e introduzca el registro encontrado de "historico" en "jugadores"
Pero no se como hacer referencia a los campos del fichero histórico, es decir yo pongo
[jugadores].[apellidos]= [historico].[apellidos]
Pero da error, ¿alguien me puede decir la sintaxis correcta?
Gracias
valor = InputBox("INTRODUCE LOS APELLIDOS ")
If DCount("APELLIDOS", "Historico", "[APELLIDOS]='" & valor & "'") > 0 Then
DoCmd.Close acForm, "actual"
DoCmd.OpenForm "Historico", , , "[APELLIDOS]='" & valor & "'" '
DoCmd.OpenForm "jugadores", acNormal
DoCmd.GoToRecord , , acNewRec
Pretendo lo siguiente yo parto de un formulario "actual" el cual al pulsar sale una pregunta, "apellidos"
Entonces busca en el formulario "historico" ese dato si lo encuentra pretendo que abra el formulario "jugadores" e introduzca el registro encontrado de "historico" en "jugadores"
Pero no se como hacer referencia a los campos del fichero histórico, es decir yo pongo
[jugadores].[apellidos]= [historico].[apellidos]
Pero da error, ¿alguien me puede decir la sintaxis correcta?
Gracias
1 respuesta
Respuesta de Julián González Cabarcos
1
Entre Docmd. Openform"histórico" y Docmd. Openform"jugadores" escribe
Docmd.runsql"Insert into jugadores select * from histórico where [apellidos]=[form]![histórico]![apellidos]"
Si jugadores e histórico no tuevieran los mismos campos puedes poner
Docmd.runsql"insert into jugadores select nombre, apellidos,fechanac from histórico where...."
De todas formas, si quieres un ejemplo dímelo.
Unn saludo
Docmd.runsql"Insert into jugadores select * from histórico where [apellidos]=[form]![histórico]![apellidos]"
Si jugadores e histórico no tuevieran los mismos campos puedes poner
Docmd.runsql"insert into jugadores select nombre, apellidos,fechanac from histórico where...."
De todas formas, si quieres un ejemplo dímelo.
Unn saludo
