[AccessD] CSV file from hell

Robin Lawrence robin.lawrence at ukonline.co.uk
Sat May 15 06:51:47 CDT 2010


Steve,
Thanks for replying,
Here's the code (table va_orders has already been deleted) - its behind a 
simple unbound form with 3 command buttons

Private Sub Command4_Click()
On Error GoTo err_import:
DoCmd.TransferText acImportDelim, , "va_orders", 
"C:\Downloads\va_orders.csv", True
Call MsgBox("Import Completed Succesfully - Please go to Step 2", 
vbInformation, "Sterts Box Office")
Me.Command6.SetFocus
Exit Sub

err_import:
If Err.Number = 3011 Then
Call MsgBox("Error on import ! -  Can't find the import file va_orders.csv" 
& vbCrLf & "Please check you saved it to C:\Downloads\", vbCritical, "Sterts 
Box Office")
Else
Call MsgBox("Error on import ! - " & Err.Description & Err.Number, 
vbCritical, "Sterts Box Office")
End If

Exit Sub


End Sub
and the error message

The search key was not found in any record - - 3709
I've had a look at the error and it seems to be more to do with data 
corruption - I've done a database repair but as no tables are open can't 
make sense of it...

Regards
Robin




----- Original Message ----- 
From: "Steve Schapel" <miscellany at mvps.org>
To: "Access Developers discussion and problem solving" 
<accessd at databaseadvisors.com>
Sent: Saturday, May 15, 2010 12:14 PM
Subject: Re: [AccessD] CSV file from hell


> Robin,
>
> --------------------------------------------------
> From: "Robin Lawrence" <robin.lawrence at ukonline.co.uk>
> Sent: Saturday, May 15, 2010 10:15 PM
>
>> If I delete the table completely first the it complains about it not 
>> being
>> there....
>
> Really?  I would not expect that.  TransferText should create a new table
> for you if it doesn't already exist.
>
> Regards
> Steve
>
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 




More information about the AccessD mailing list