<%@ Language=VBScript %>

value="<%=Request.Form("NeedQuotes" & BuildFieldName("YEAR")) %>"> value="<%=Request.Form("Type" & BuildFieldName("YEAR")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("MONTH")) %>"> value="<%=Request.Form("Type" & BuildFieldName("MONTH")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("DAY")) %>"> value="<%=Request.Form("Type" & BuildFieldName("DAY")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("PLACE")) %>"> value="<%=Request.Form("Type" & BuildFieldName("PLACE")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("Province")) %>"> value="<%=Request.Form("Type" & BuildFieldName("Province")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("KIND")) %>"> value="<%=Request.Form("Type" & BuildFieldName("KIND")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("SOURCE")) %>"> value="<%=Request.Form("Type" & BuildFieldName("SOURCE")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("Number")) %>"> value="<%=Request.Form("Type" & BuildFieldName("Number")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("UFO")) %>"> value="<%=Request.Form("Type" & BuildFieldName("UFO")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("COMMENT")) %>"> value="<%=Request.Form("Type" & BuildFieldName("COMMENT")) %>"> value="<%=Request.Form("NeedQuotes" & BuildFieldName("SOURCE2")) %>"> value="<%=Request.Form("Type" & BuildFieldName("SOURCE2")) %>"> Advanced Search <%=Label("YEAR")%> <% call WriteSearchOptions %> <%=Label("MONTH")%> <% call WriteSearchOptions %> <%=Label("DAY")%> <% call WriteSearchOptions %> <%=Label("PLACE")%> <% call WriteSearchOptions %> <%=Label("Province")%> <% call WriteSearchOptions %> <%=Label("KIND")%> <% call WriteSearchOptions %> <%=Label("SOURCE")%> <% call WriteSearchOptions %> <%=Label("Number")%> <% call WriteSearchOptions %> <%=Label("UFO")%> <% call WriteSearchOptions %> <%=Label("COMMENT")%> <% call WriteSearchOptions %> <%=Label("SOURCE2")%> <% call WriteSearchOptions %>

<% Sub WriteSearchOptions Response.Write "" & _ "Contains" & _ "Equals" & _ "Starts with ..." & _ "More than ..." & _ "Less than ..." & _ "Equal or more than ..." & _ "Equal or less than ..." & _ "" End Sub %>