msaccess VBA import file path - must it be physical path?

Hi all, here's a straighforward question.

I've got a form in Access 2000, with a command button, on a Windows machine.

Click the buttton and an Excel spreadsheet is imported.

My question: Do I HAVE to use a physical path? Can I not use a relative path?

When I use no path at all -only the name of the Excel file-, and simply place the Excel file in the same directory as the Access file, Access searches the MyDocuments folder for the Excel file.

Right now the code to import the spreadsheet is:
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", "C:\data\MyFile.xls", True

Why doesn't this work:
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", "MyFile.xls", True ?
tom_burkhardtAsked:
Who is Participating?
 
jerryb30Connect With a Mentor Commented:
it probably does work, but you expect to see it where  it isn't.
".\MyFile.xls"
will put it in current working path, which may not be database path.

add this to top of code:
Dim strpath As String
strpath = Left(CurrentDb.Name, InStrRev(CurrentDb.Name, "\") )
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", strpath & "myfile.xls" ,true


0
 
jefftwilleyConnect With a Mentor Commented:
>>Access searches the MyDocuments folder for the Excel file.

What makes you say that?

When Access is installed, you are asked what to use for a default file location. This is of course as you've already found, not the same as the "relative" path.

To answer your question directly, yes...you can use the relative path, but you will need to determine what the setting is for your App. OTherwise, use the DB's current directory.
J
0
 
jerryb30Commented:
debug.print curdir will give default location Jeff mentioned.
0
Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
tom_burkhardtAuthor Commented:
thanks to both of you for the quick response!

Jeff, when I saw your answer of course I did a "Doh!" forehead slap.

JerryB30, thanks for the code, much appreciated, and it works beautifully. Now I have to look up InStrRev(). That's a new one to me, I've only been exposed to InStr().

 I increased the pointage to give Jeff 50 for making me think, and JerryB an extra 50 because he gave me a working code example I hadn't asked for.
0
 
jerryb30Commented:
instrrev:New since Access 2000. Especially useful for extracting a full path when given a path\filename.
I personally change  my default location in Tools-Options-General to ".\"
Then I can easily invoke it when doing imports, exports. But being able to find currentdb path dynamically is more flexible.

Thanks.
Welcome back Jeff.
0
 
jefftwilleyCommented:
Thanks Jerry, good to be back! and...Glad it's sorted out Tom. Love these quick and informative ones :o)
J
0
 
genaughtonCommented:
>When I use no path at all -only the name of the Excel file-, and simply place the >Excel file in the same directory as the Access file, Access searches the >MyDocuments folder for the Excel file.

I assume it's using the value from the Tools\Options menu, under the General tab -- the "Default database folder:" setting.

When I'm designing forms where I'm dealing with outside files, I use an unbound textbox (i.e., txtFileLocation) that you can populate via a command button with the GetOpenFile routine attached to it's OnClick event.  That code's available at my SECOND favorite Access site:

http://www.mvps.org/access/api/api0001.htm

Then you use:

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", Me!txtFileLocation, True

Regards,
JN
0
 
tom_burkhardtAuthor Commented:
holy smokes, you guys ...  just checked my email and saw all these notifications from EE. Thank you so much not only for your help, but the generous spirit it was given in! Very much appreciated. Always love learning something new. I've been self-taught in VBA, VBScript/ASP, Access and MySQL since an early retirement a few years ago, and there's a real satisfaction when the old grey cells light up in understanding a new concept (rare yet satisfying).

I like that suggestion to make my default location in Tools-Options-General to ".\"  They say the sign of true genius is the ability to see the obvious! That had simply never occured to me.

And genaughton, thanks, I've bookmarked that site. The more resources the better, and I'm never ashamed to ask for help.

Thanks again, all.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.