Que hay mal en esta conexion?

[rashid]

Miren tengo esta conexion
Sub OpenDBConn2
Set GobjConnect2 = Server.CreateObject("ADODB.Connection")
GobjConnect2.Open gsConnect2
gsConnect2 = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("..\Items.mdb")
End Sub

Y me da este error:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified

/ASP/RealState3/Adm/2UpdItemStatus.asp, line 55

la linea 55 es
GobjConnect2.Open gsConnect2

de modo que lo que no encuentra es la database [creo[ pero en otra parte tengo esta conexion que si funciona.

gsConnect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("..\Items.mdb")

Que Hago?
Estoy que me doy por la cabeza!

[bakanzipp]

prueba asi

Código:

  
Sub OpenDBConn2
Set GobjConnect2 = Server.CreateObject("ADODB.Connection")
GobjConnect2.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Items.mdb"))
End Sub

[rashid]

Gracias Gabriel.
Ahora si corre esta linea, pero ahora me da error aqui:
Sub CloseDBConn2
GobjConnect2.Close
Set GobjConnect2 = Nothing
End Sub

este es el error:
Microsoft VBScript runtime error '800a01a8'

Object required: 'GobjConnect2'

/ASP/RealState3/Adm/2UpdItemStatus.asp, line 67

Y la linea 67 tiene:
GobjConnect2.Close

Por qué?

[Nochero]

Quizas no este declarada la variable de objeto y solo la ve una sola sub.

Verifica que este definida y sino pone un Dim :

<SCRIPT LANGUAGE=VBSCRIPT>
Dim GobjConnect2

<Sub 1>
..
<Sub 2>
..
</SCRIPT>

Saludos <IMG SRC="images/futbol.gif" WIDTH="15" HEIGHT="15" HSPACE="3">

[rashid]

Gracias, ya corrio.
Pero ahora tengo otro problemita en una sentencia update.
Pondre el post adelante.
Gracias. ;)