Problem med asp kode efter convatering Access til MSSQL

Hej alle sammen

Jeg har et lille problem jeg har leget lidt med jeg har ikke kunnet få min databaseforbindelse til MSSQL til at virke, så nu prøver jeg at slette alt det jeg har lavet og starter så ved det udgangs punkt som virker til en access database, og håber på at nogen af jer kan hjælpe mig med at få det sat sammen så det virker.

<%

' Variabler
Dim lang,site,sql

'=========================================
  ' Åbner DB adgang
  Set Conn = Server.CreateObject("ADODB.Connection")
  DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("./db1.mdb")
  Conn.Open DSN
 
'=========================================

' Tabellen vi henter info fra
lang  = Request.Querystring("lang")
' Rækken vi henter info fra
site = Request.Querystring("site")

IF lang <> "" THEN
'=========================================
  ' Data fra bestemt række
  sql      = "SELECT * FROM `" & lang & "`"
  Set data = Conn.Execute(sql)

  Response.Write data(site)
'=========================================
ELSE
'=========================================
  ' Default side
  sql      = "SELECT * FROM `dk`"
  Set data = Conn.Execute(sql)

  Response.Write data("home")
'=========================================
END IF

%>