<% if request.querystring("closed") = "true" then closed = 1 else closed = 0 end if if request.querystring("sort") = "dist" then order_by = " business_name" chk2 = "checked" else order_by = " theDate" chk1 = "checked" end if 'on error resume next%>

Open Warranty List

<%if closed = 0 then %>

Show Closed <%else%> Show Open <%end if%>

<% sql = "select warranty_id,theDate,serial_num,emi_num,customer_name,business_name,status from warranty w inner join distributor d on w.dist_id = d.dist_id where closed = " & closed & " order by " & order_by 'd sql set rs = conn.Execute(sql) do while not rs.eof%> <% rs.movenext: loop %>

Sort by onclick="window.location.href='warranty_list.asp?sort=date'"> Date onclick="window.location.href='warranty_list.asp?sort=dist'"> Distributor

Distributor Customer Name Warranty ID Serial Number EMI Number Entry Date Status
<%=rs("business_name")%> "><%=rs("customer_name")%> <%=Pad(rs("warranty_id"))%> <%=rs("serial_num")%> <%=rs("emi_num")%> <%=rs("theDate")%> <%=rs("status")%>