omforme connection fra acces til sql

Jeg har et lille programstump som jeg bruger til at konnekte acces databasen.
Men nu vil jeg til at prøve det med Sql database. Men ved ikke hvordan jeg skal konnekte sql server.
Her nedunder er koden for connection til acces. denne fil skal bruges som includefil

<!-- METADATA TYPE=\"typelib\"
              FILE=\"e:\\Programmer\\Fælles filer\\System\\ado\\msado15.dll\" -->
<%
  Dim objConn
  Set objConn = Server.CreateObject(\"ADODB.Connection\")
  objConn.Open \"Provider=Microsoft.Jet.OLEDB.4.0; \" & _
              \"Data Source= c:\\datastores\\classified_2000.mdb\"

  If Session(\"blnValidUser\") = True and Session(\"PersonID\") = \"\" Then
    Dim rsPersonIDCheck
    Set rsPersonIDCheck = Server.CreateObject(\"ADODB.Recordset\")
    Dim strSQL
    strSQL = \"SELECT PersonID FROM Medlem \" & _
            \"WHERE Medlemsnr = \'\" & Session(\"Medlemsnr\") & \"\';\"
    rsPersonIDCheck.Open strSQL, objConn
    If rsPersonIDCheck.EOF Then
      Session(\"blnValidUser\") = False
    Else
      Session(\"PersonID\") = rsPersonIDCheck(\"PersonID\")
    End If
    rsPersonIDCheck.Close
    Set rsPersonIDCheck = Nothing
  End If
%>