Personalization

Next, is the personalization page, this is just a form -

Each checkbox is named ind, sto, tod, tec and sci (to represent Index, Stocks, Today, Technology and Science respectively. It submits to a page called 'dopers.asp'. Which is just code -

<% Dim pers If Len(Request.QueryString("ind")) Then pers = "01" Else pers = "00" End If If Len(Request.QueryString("sto")) Then pers = pers & "01" Else pers = pers & "00" End If If Len(Request.QueryString("tod")) Then pers = pers & "01" Else pers = pers & "00" End If If Len(Request.QueryString("tec")) Then pers = pers & "01" Else pers = pers & "00" End If If Len(Request.QueryString("sci")) Then pers = pers & "01" Else pers = pers & "00" End If Session("pers") = pers Response.Redirect("infostuff.asp") %>

Which checks each checkbox to see weather it was filled in, if so, it adds '01' to the personalization string and if not it adds '00' to the string. This created the 'pers' string which is then assigned to the Session variable of the same name. The user is then redirected back to the main page (infostuff.asp).