grabar fecha del sistema en campo de tabla access 2003

[gato_2006]

Hola de nuevo.

les pregunto como grabar la fecha actual del sistema con la instruccion insert into en access 2003, ya que poniendo # me dice que hay un error de sintaxis. pongo el codigo a continuacion para que alguien lo corrija (las mayusculas de justifican ya que el nombre de la tabla y los campos estan de ese modo):

SQL = "INSERT INTO PADRON(CLAVE,FECHA,HCLINICA,DNI,APELLIDO,NOMBRES,E DAD,SEXO,FECNAC,CALLE,NUMERO,LOCALIDAD,TELEFONO,OB RA_SOCIAL,GRUPOSANGUINEO,RH,PERTENECE,MEDICOPRINC, OBSERVACIONES,RECIBIOHC)" & _
" VALUES(" & id & ",#" & hoy & "#,'" & Nz(frmactualiza!txthistoria) & "','" & txtdni.Value & "','" & frmactualiza!txtapellidos & "','" & frmactualiza!txtnombres & "'," & frmactualiza!txtedad & ",'" & Nz(frmactualiza!txtsexo) & "'," & _
"#" & Nz(frmactualiza!txtfecha) & "#,'" & Nz(frmactualiza!txtcalle) & "','" & Nz(frmactualiza!txtnro) & "','" & Nz(frmactualiza!txtlocalidad) & "','" & Nz(frmactualiza!txttelefonos) & "','" & Nz(frmactualiza!txtobra) & "','" & Nz(frmactualiza!txtgrupo) & "'," & _
"'" & Nz(frmactualiza!txtfactor) & "','" & Nz(frmactualiza!txtdonante) & "','" & Nz(frmactualiza!txtmedico) & "','" & Nz(frmactualiza!txtobservaciones) & "','" & Nz(frmactualiza!txtcarnet) & "')"


si alguien sabe la respuesta. estoy ansioso por saberla ya que soy novato en access y vba.

Saludos.

[Taribo007]

Esta asignacion la haces desde el form frmactualiza?? de ser asi, puedes referire a el con me.

Otra cosa, la funcion nz no la usas correctamente, te falta psarle el segundo parametro, lo que devolvera la funcion en caso de ser null el primer parametro.

En cuanto a la fecha, utiliza date()

SQL = "INSERT INTO PADRON(CLAVE,FECHA,HCLINICA,DNI,APELLIDO,NOMBRES,E DAD,SEXO,FECNAC,CALLE,NUMERO,LOCALIDAD,TELEFONO,OB RA_SOCIAL,GRUPOSANGUINEO,RH,PERTENECE,MEDICOPRINC, OBSERVACIONES,RECIBIOHC)" & _
" VALUES(" & id & ",#" & Date & "#,'" & Nz(frmactualiza!txthistoria) & "','" & txtdni.Value & "','" & frmactualiza!txtapellidos & "','" & frmactualiza!txtnombres & "'," & frmactualiza!txtedad & ",'" & Nz(frmactualiza!txtsexo) & "'," & "#" & _
Nz(frmactualiza!txtfecha) & "#,'" & Nz(frmactualiza!txtcalle) & "','" & Nz(frmactualiza!txtnro) & "','" & Nz(frmactualiza!txtlocalidad) & "','" & Nz(frmactualiza!txttelefonos) & "','" & Nz(frmactualiza!txtobra) & "','" & Nz(frmactualiza!txtgrupo) & "'," & "'" & _
Nz(frmactualiza!txtfactor) & "','" & Nz(frmactualiza!txtdonante) & "','" & Nz(frmactualiza!txtmedico) & "','" & Nz(frmactualiza!txtobservaciones) & "','" & Nz(frmactualiza!txtcarnet) & "')"

Un saludo