Envirormental Variable

[dandoescode]

Okay so I want to add a reference file using

 References.AddFromFile ("FileLocation.BlahBlahBlah")

The issue is that the file location is variable. I can be certain about the name of the folder and the file name, however the drive the folder will be located on will not. I think the way to go about doing this would be using an Envirorment variable %ProgramFiles% perhaps, but I dont really know. Anybody have any ideas?

[dandoescode]

Found the solution myself.

Dim prgFiles, winFiles As String
 prgFiles = (Environ("ProgramFiles"))
 winFiles = (Environ("Windir"))
References.AddFromFile (prgFiles & "\Microsoft Office\Office14\MSACC.OLB")

[help_me_with_access]

dude, just use the file dialog picker. it's that simple. if no file is chosen, it returns a zero length string.

[dandoescode]

Would this open a dialog box to choose a file?

[help_me_with_access]

you indicated this is solved, but the answer is YES. by definition sir, that's what it does. that's what the word "dialog" generally means. it has like 3 or 4 extensions in vb6. it has a folder spec, file spec and a couple others. there are also numerous properties associated with the object that are useful because they can restrict the user from getting into trouble by clicking around windows aimlessly (or also by trying to be cute!).

[dandoescode]

Yeah, well see I dont want the dialog box to open in this case. This vba is going to run everytime the db opens and check to see if it has the required references, and then add any missing ones, it needs to be completely in the background.

[dandoescode]

Sort of a refresh and repair tool if you will.

[help_me_with_access]

k. .,............