% ' ' *** Modifying the Form's Search Scope. ' ' The form will search from the root of your web server's namespace and below ' (deep from "/" ). To search a subset of your server, for example, maybe just ' a PressReleases directory, modify the scope variable below to list the ' virtual path to search. The search will start at the directory you specify ' and include all sub-directories. FormScope = "\" ' ' *** Modifying the Number of Returned Query Results. ' ' You can set the number of query results returned on a single page ' using the variable below. PageSize = 10 ' ' You can set the total number of query results returned using the ' variable below. MaxResults = 300 ' ' *** Setting the Locale. ' ' The following line sets the locale used for queries. In most cases, this ' should match the locale of the server. You can set the locale below. SiteLocale = "EN-US" ' ' *** Enable saving active searches in session variables ' ' The following line enables using session state to save multi-page queries ' and avoid re-executing them when the user presses the Next Page button. ' This should be set FALSE if sessions are disabled using AspAllowSessionState. UseSessions = TRUE ' ********** END QUICK CUSTOMIZATION SECTIONS *********** %> <% ' Set Initial Conditions NewQuery = FALSE UseSavedQuery = FALSE SearchString = "" QueryForm = Request.ServerVariables("PATH_INFO") ' Did the user press a SUBMIT button to execute the form? If so get the form variables. if Request.ServerVariables("REQUEST_METHOD") = "POST" then SearchString = Request.Form("SearchString") Advanced = Request.Form("Advanced") ' NOTE: this will be true only if the button is actually pushed. if Request.Form("submitted") = "Yes" then NewQuery = TRUE RankBase=1000 NextPageNumber = -1 end if end if if Request.ServerVariables("REQUEST_METHOD") = "GET" then SearchString = Request.QueryString("qu") Advanced = Request.QueryString("Advanced") FormScope = Request.QueryString("sc") RankBase = Request.QueryString("RankBase") if Request.QueryString("pg") <> "" then NextPageNumber = Request.QueryString("pg") UseSavedQuery = UseSessions NewQuery = not UseSessions else NewQuery = SearchString <> "" NextPageNumber = -1 end if end if %>
|
||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||