Error 1601 - What is the corresponding text

[Jackie]

A current application that performs a delete query, append query, update query and the TransferText function produces an error that states, "Reserved Error 1601 - There is no message for this error" is displayed. I searched help and ran the code to create the error message table. Error message number 1601 is not contained in the table. I also created the table for VB errors. It also did not contain message 1601. Any idea where to find the corresponding text or to identify what might cause this error?

 

[DougP]

Paste the TransferText line here and lets have a look see.<br>
<br>

 

[Jackie]

Transfer Text code below:<br>
<br>
DoCmd.TransferText acImportDelim, ABCDspec, &quot;ABCD&quot;, ABCDfile

 

[DougP]

Is there really a specification named ABCDSpec on your database?<br>
No wonder Access can't give you an error. you can't give it something to work with.<br>
How do you know what &quot;ABCDSpec&quot; is later, give it a name like CustomerImportSpec. <br>
try substituting a file name like &quot;C:\Leads.txt&quot; instead of ABCDfile.<br>
<br>
here have a look at this.<br>
<br>
DoCmd.TransferText acImportDelim, , &quot;Inventory&quot;, &quot;C:\Myfile.CSV&quot;, True<br>
<br>
<br>

 

[Jackie]

ABCD" was substituted for the actual file name. This code was working at one time. It is no longer working. I'm wondering about the import specification. The data that is imported is used by alot of other systems. Could it be that the import file was modified to agree with one of the other systems. Where/How can an import specification be modified?

 

[DougP]

Kill 2 birds with one stone.<br>
Create a new Spec with the exact file you are trying to import in code.<br>
Click the &quot;Tables&quot; TAB in Access main database window<br>
Right click in the white space <br>
Click Import<br>
Find the file you want to import<br>
Wait a few seconds then <br>
Click the &quot;Advanced&quot; button (lower Left)<br>
Create your spec and save it<br>
The &quot;save&quot; button saves it the &quot;Specs&quot; button shows other specifications if there are any.<br>
<br>
When all done with the Advanced stuff click &quot;OK on that screen<br>
Click NEXT button all the way to Finish<br>
<br>
In your VBA code put in your file name and this new specname<br>
<br>
You can of course use the Spec's in VBA code or manually by repeating the above procedure and clicking the Specs button.<br>

 

[Jackie]

Thanks for your info. I did some additional analysis. The error is produced when a button is selected on a form. The button executes 2 delete queries and an append query. I investigated the TransferText code and discovered that the import spec named in the TransferText function is not listed when the &quot;Advanced&quot; button is selected on the Import Wizard panel. This flags another potential error (3625 - Text file spec does not exist). However this potential error is not displayed in the application. Although I have discovered other issues, I would like to find a way to determine with what action Reserved Error 1601 is associated.

 

[elizabeth]

If you like error codes, try <A HREF="

http://support.microsoft.com/support/kb/articles/Q105/6/66.asp"

TARGET="_new">

http://support.microsoft.com/support/kb/articles/Q105/6/66.asp</A><br>

But don't do what I did - forget where I stored them!<br>
<br>
BTW, you might want to create a new import spec by that name if you know what is needed, and see if you still get the error. If you inherited the database, maybe it was something lost during the previous updates. I don't think Import Specs are handled during an Access 2.0 to Access 97 conversion, for instance.