ASP - Se requiere un objeto: 'Provider=SQLOLEDB;Da'

HOLA
AHORA MODIFIQUE LA CONEXION ASI
<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<%
dim conexion
dim ors
dim ocon
Set ors = Server.CreateObject("ADODB.RecordSet")
set ocon= server.createobject("ADODB.Connection")
Conexion = "Provider=SQLOLEDB;Data Source="";" &"trusted_connection=yes;Initial Catalog=ji"
conexion.Mode=3
oCon.open conexion
If conexion.Errors.Count > 0 then
For each error in conexion.errors
Response.write Error.Number & " = "& Error.Description
next
End if
%>
MARCA ESTE ERROR
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: 'Provider=SQLOLEDB;Da'
QUE ES LO QUE TENGO MAL, DE ANTEMANO MUCHAS GRACIAS

Estás haciendo referencia al atributo Mode de la variable de cadena "conexion"(obviamente este atributo no existe, estamos tratando con una variable, no con un objeto del servidor).

Saludos.

Angela entre en mi sitio y busca una sección de sitios, ahí tengo un link a otro lugar que tiene cerca de 3 formas de conextarse a SQL Server y a otras BDs