Y cual es el error?
Veo que intentas usar un DSN y luego lo sobreescribes por una cadena oleDB.

, debes de tener cuidado con eso de copiar y pegar código, debes entenderlo.
Creo nunca me he conectado a nada por ODBC, es lento, limitante, todo un fastidio. Yo siempre uso OleDB.
Cuando uso autentificación integrada, uso esta cadena:
Cita: ConnString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=NombreBaseDatos;Data Source=SERVIDOR"
Cuando asigno un usuario a la BD y uso esta cadena:
Cita: ConnString = "Provider=SQLNCLI;Server=SERVIDOR;Database=NombreB aseDatos;Uid=Usuario;Pwd=password;Initial Catalog=NombreBaseDatosUid
Se usa así:
Cita: set con = Server.CreateObject("ADODB.Connection")
Con.CommandTimeout = 0
con.Open ConnString
Ya con la conexión abierta, ya deberías poder hacer consultas sin problemas.
Si te marca error ...... pon el error