Connessione problematica

[velectro]

Ciao,

premetto che sono un neofita.

ho un forum già fatto in rete, il quale si connette ad un db access sul server con queste righe

Set adoCon = Server.CreateObject("ADODB.Connection")
If strDatabaseType = "Access" Then

strDbPathAndName = Server.MapPath("\\ACCESS1\Db$\t3lab\wwForum.mdb")  

strCon = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & strDbPathAndName

ma non funziona

mentre ho un'altra pagina asp per altri scopi che si connette allo stesso db con il seguente codice:

dim cn
dim cn
set cn= server.CreateObject("adodb.connection")
on error resume next
cn.Provider= "Microsoft Jet 4.0 OLE DB Provider"
cn.Open "\\ACCESS1\Db$\t3lab\wwForum.mdb"

e questa funziona.
Mi sapreste dire come modificare le righe del forum, utilizzando le stesse variabili, visto che c'è un km di codice che le richiama?

Spero di non essere stato noioso.

Ciao
Velectro

[viki1967]

Dalla seconda connessione togli la riga

on error resume next

e prova se continua a funzionare...

[velectro]

Si funziona, mi dice connessione completata, ma quello che mi interessa è far funzionare la seconda!
Mi puoi aiutare?