vbscript create ADODB.Connection code example
Example: vbscript create ADODB.Connection
Dim objConn 'As ADODB.Connection'
Set objConn = Server.CreateObject("ADODB.Connection")
Dim strPath 'As String'
strPath = Server.MapPath("\App_Data\direkt.mdb")
Call objConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPath)