>Thanks a bunch. Your timing was absolutely perfect. I was just cracking my knuckles to write something like this when "Reply" chimed on my workstation.
>
>I made one slight change to make the search EXACT and case-insensitive (VFP7-specific):
>

lFound = (ASCAN(aKeyVals, "OLE DB Provider", -1, -1, 0, 7) <> 0)

Again, thanks for saving me a chunk of work.

No problem and thanks for the addition. Did you find any providers that weren't found by the routine?

The list should be the same as what the data link edit/create dialog shows. (for example when you open a .udl file)