Add import date to records being imported through TransferText 1

[beansmom]

I have a command button that imports an Excel spreadsheet using TransferText. I need to add the import date to each record as they are imported. My code is

DoCmd.SetWarnings False
DoCmd.TransferText acImportDelim, "IP for DM Import Specification", "tblPatients", Forms!frmImport.txtFileName
[Forms]![frmPatients].Requery
MsgBox "File complete!", vbInformation, "IMPORT PROCESS"
DoCmd.SetWarnings True

Any help is appreciated!

 

[PWise]

Add a datefield to tblPatients and set the default value to now()

 

[beansmom]

I have records being imported and entered manually. I was hoping to leave the import date blank for the manually entered fields.

 

[PHV]

Import into a temporary table and then use an append query calling the Date() function.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886