Thanks for reminder but it was already posted on UT a couple times:
Re: ADO questions Thread #532298 Message #533025
Re: Enumerate OLEDB Providers Thread #593614 Message #594020

>Hi there folks, I just wanted to share this tip with you all. Hope you might find this useful. Regards
>
>Let's say we wanna create an oledb (ADO) connection by invoking the connection property dialog. Here's the code to do that.
>
>public oConn as adodb.connection
>local oData as object
>
>odata=createobject("datalinks")
>oConn=oData.PromptNew() && We select our data source here
>=oConn.Open()
>
>There it is a valid ado connection without recalling any specific connection string.