connection dynamique à dataenvironnement

comment passer par le code pour connecter le dataenvironnement à une une base de données:cry:

VBscript, VB6 et antérieur, VB.net, autre .... ?