Getting Windows Common Files Directory Location

[mveera]

Hi,

I am using ADO and DAO objects in my Excel Application. To use them i add the references

"msado21.tlb" for ADO from c:\Program Files\Common Files\System\ado\ directory
and

"dao360.dll" for DAO from c:\Program Files\Common Files\Microsoft Shared\DAO\ directory.

I would like to automatically include the references on Excel startup in users machine. I would like to know how i can get the Location where the common files are installed, so that i need not hard code the directory location (c:\).

Thanks
Veera

 

[JoJ]

If I'm not mistaken the location depends on the machine's O/S.

i.e.

If (InStr(Application.OperatingSystem, "95&quot > 0) Or (InStr(Application.OperatingSystem, "WINDOWS (32-BIT) 4&quot > 0) Then
strLibPathADO = "C:\???"
strLibPathDAO = "C:\???"
Else
strLibPathADO = "C:\Program Files\Common Files\System\ADO"

End If

 

[mveera]

Thanks for reply.

My only problem is, will it be always c:\. I read in some article that the location of the common files can be modified while installing. If that is the then checking for OS and setting to C:\ will not work.

That is the reason why i needed a automatic way to determine the location.

Thanks for the reply.

Veera

 

[JoJ]

Most shops practice common standards. But it sounds like you are planning to distribute your application publicly.

If so, you might want to explore a method like including the library in your distribution copy and create a registry entry that specifies an alternate location.