change from Access to MS SQL

<%

' Open the Database Connection
SET Conn = Server.CreateObject("ADODB.Connection")
sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
              "Data Source=" & Server.MapPath("\db\jobdatabase.mdb") & ";" & _
              "Persist Security Info=False"
Conn.Open(sConnection)
%>

<%
if (Request.form("search") = "" )  or (Request.form("search") = " " ) then
  SQL1 = "SELECT * FROM jobs" 
  set Rs = Conn.Execute(SQL1)
Else

  strSplit = split(Request.form ("search"),",") ' value to search for in title
  Dim iNext
  For i = 0 To UBound(strSplit)
    if (strSplit(i) <> "") and (strSplit(i) <> " ") Then
      if (i=0) then
        Booltxt="WHERE ( "
      Else
        Booltxt="OR "
      End If
      sql_search1 = sql_search1 & Booltxt & " description like '%" & strSplit(i) & "%'   " 
     End If
  Next 'i
  sql_search1 = sql_search1 & ")"

  SQL = "SELECT * FROM jobs  " & sql_search1  
  set Rs = Conn.Execute(SQL)
End If
%>