This is your following choices
<%
Response.Write "Hello "
Response.Write Request.Form("last_name")
Response.Write "
"
Response.Write "The Day of the week you choose is "
Response.Write Request.Form("week")
Response.Write "
"
Dim intloop
If Request.Form("interest").Count=0 then
Response.Write "You did not choose an interest"
Else
For intloop=1 to Request.Form("interest").count
Response.Write "Your interest/s is/are "
Response.Write Request.Form("interest")(intloop)
Response.Write "
"
Next
End if
Response.Write "
"
Response.Write "Your favorite sport is "
Response.Write Request.Form("Sports")
Response.Write "
"
Response.Write "Thank you for sending the following comments
"
Response.Write Request.Form("comments")
%>