Access 2003: Import & Append New data

[compooper]

Hi,



I'm trying to find/write a code that will allow me to import separate csv files into separate tables.
The table it will be imported to is determined like this:

If cboCompany = CompanyA and cboInvType = TypeA then
import to tbl_CompanyA_TypeA
append txtinvoiceenddate to Invperiod
If cboCompany = CompanyA and cboInvType = TypeB then
import to tbl_CompanyA_TypeB
append txtinvoiceenddate to Invperiod
If cboCompany = CompanyB and cboInvType = TypeA then
import to tbl_CompanyB_TypeA
append txtinvoiceenddate to Invperiod

What I mean by "append txtinvoiceenddate to Invperiod" that in each table there is a field called Invperiod (Invoice period)

The user has to enter the invoice end date in a form.
That date has to be added & repeat for all records in the newly imported file. It should not overwrite any existing records in the table.

My idea is to just have lots of if statements and DoCmd.TransferSpreadsheet statements for the separate scenerios
Is this efficient?
And how do I add the invoice period to only the new data I am importing?
Are there any sample databases out there, that import separate files into separate existing tables?

I should add that I've already got the browse button and txtPath to work.

[compooper]

Just to test my idea I tried this:
Private Sub cmdUpload_Click()
If Me.cboCompany = 1 And Me.cboInvType = 2 Then
DoCmd.TransferSpreadsheet acImportDelim, "", "Inv_companya_type1", Me.txtPath, True
Else
MsgBox "Error!!"
End If
End Sub

I get Run-Time Error: '13' Type mismatch
and when I press debug it highlights
DoCmd.TransferSpreadsheet acImportDelim, "", "Inv_EXAM_Labs", Me.txtPath, True

[compooper]

Nevermind, it was supposed to be DoCmd.TransferText acImportDelim, "", "Inv_companya_type1", Me.txtPath, True

New question:
How can I delete the first row of the newly imported data (contains field headers, that I do not like)?