Ado через vbscript

Формулировка задачи:

подскажите пожалуста!
Как перевести на vbscript следующую строку

conn   ADODB.Connection
 cmd   ADODB.Command
 conn
           .Provider=
           .ConnectionString="Data Source=..........
           .
 
cmd.ActiveConnection=conn
.
.
.
.

Через дао я пишу так

DBE1 
 DBE1  = CreateObject()
DBE1.DefaultType =       
DBE1.DefaultUser = 
DBE1.DefaultPassword = 

А как адо?

Решение задачи: «Ado через vbscript»

textual
                            Листинг программы 
                        

                            <font color="blue">Dim</font> conn
<font color="blue">Dim</font> cmd

<font color="blue">set</font> conn = CreateObject(<font color="teal">"ADODB.Connection"</font>)
conn.Provider=<font color="teal">"MSDAORA"</font>
conn.ConnectionString=<font color="teal">"Data Source=.........."</font>
conn.<font color="blue">Open</font>

<font color="blue">set</font> cmd = CreateObject(<font color="teal">"ADODB.Command"</font>)
cmd.ActiveConnection=conn
.
.
.
.

                        