How about this version:
Code:
Function openAccessDb(DBFile as String)
'added file name as argument, you probably have as a global variable
Dim accessObj As Access.Application
Dim sSQL as String
Set accessObj = New Access.Application
accessObj.OpenCurrentDatabase DBFile
accessObj.Visible = False
sSQL="DELETE * FROM [Data dump]"
accessObj.CurrentDb.Execute sSQL,dbFailOnError
accessObj.DoCmd.TransferText transferType:=acImportDelim, SpecificationName:="spec", TableName:="[Data dump]", Filename:=fPath & fName, HasFieldNames:=True
accessObj.CloseCurrentDatabase
accessObj.Quit acQuitSaveAll
Set accessObj=Nothing
End Function
If you open the task manager after you run the function (but before attempting to open the Access db), do you see a running process for Access?
Cheers,
Vlad