I was wondering how to query the system to return a list of the dns available at run time.
I want to simply then list the ones available to the user so they can pick which ever one they want to use
Any ideas
Thanks
G
Now, if you open Project->References and check the checkbox next to Registration Manipulation Classes you'll be able to use the following objects:
'Put this code in the right place and it should do exactly what you need.
Dim key As RegKey
Dim val As RegValue
Set key = RegKeyFromString("\HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers"
For Each val In key.Values
Combo1.AddItem val.Name
Next
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.