Asp connection not working

[colinod]

i have just got hosting on a virtual server and amtrying to get my site working on it

I have the code

<%
On Error Resume Next
 
Response.Expires=0
Set yaketyConnection=Server.CreateObject("ADODB.Connection")
DatabaseDetails="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("D:\vhosts\yaketyyak.co.uk\private\yaketyyak.mdb") & ";"
yaketyConnection.Open DatabaseDetails
yaketyQuery="SELECT * FROM celebs INNER JOIN celebsvoicetypes ON celebs.idnumber = celebsvoicetypes.celebidvoicetypes WHERE celebsvoicetypes.celebstypes ='" &voiceid& "' AND celebs.sex = 'm' ORDER BY celebs.surname,celebs.firstname"
Set yaketyRecordset=yaketyConnection.execute(yaketyQuery)
 
i=yaketyRecordset.recordcount
 
Dim iCount
%>

which works fine in a shred hosting environment, but does not work now.

i have set up an ODBC DSN connection in my control panel and tested it this connects.

what i cant figure out is how to use this ODBC DSN connection that i have set up in my asp page to access the database.