A control label is showing in my search results

I am using Windows 2003 Server with IIS and Index Service. All my web pages
at the top have the same header which has a form with an input box and
button labeled "Search" for a quick search feature. When the results return
the text "Search" from that button is the first word in all my search
results. Is there a way to prevent Index Service from looking at that
button on all my html pages?

Here is what my search page returns:
===========================
1. Page Title 1
Search. My real text for page 1.......


2. Page Title 2
Search. My real text for page 2.......


1. Page Title 3
Search. My real text for page 3.......


Here is the code for the form:
===========================
<form method="POST" action="/search/searchresults.asp" name="frmSearch" >
<input type="text" maxlength="255" name="query" size="20" value>
<input class="button" type="submit" value="Search" name="B1">
</form>

Here is the code for creating the search results:
===========================
<%
Dim sSearchString
Dim oQuery
Dim TheRanking


If Request.Form("query") = "" then
sSearchString = "Blank"
Else
sSearchString = Request.Form("query")
End If

Const SEARCH_CATALOG = "Web"
%>

<%
TheRanking = 1
Set oQuery = Server.CreateObject("IXSSO.Query")

oQuery.Catalog = SEARCH_CATALOG
oQuery.Query = "@all " & sSearchString & " AND NOT #path *_* AND NOT #path
*downloads* AND NOT #path *images* AND NOT #filename *.class AND NOT
#filename *.asa AND NOT #filename *.css AND NOT #filename *.lnk AND NOT
#filename *.lck AND NOT #filename *.mno AND NOT #filename *postinfo.html"
oQuery.MaxRecords = 200
oQuery.SortBy = "rank[d]"
oQuery.Columns = "DocAuthor, vpath, doctitle, FileName, Path, Write, Size,
Rank, Create, Characterization, USN, HitCount"

Set oRS = oQuery.CreateRecordSet("nonsequential")
%>

<%
If oRS.EOF Then
Response.Write "No pages were found for the query <i>" & sSearchString &
"</i>"

Else
Response.Write "<h1>" & oRS.RecordCount & " Query results for: " &
sSearchString &"</h1><center><hr color='gray' width='95%'></center>"
Do While Not oRS.EOF

Response.write "<p><h2>" & TheRanking & ". " & oRS("doctitle") &
"</h2></p>"
Response.write "<p>" & oRS("Characterization") & "</p><br>"
Response.write "<p><strong><a href='" & oRS("vpath")& "'>" &
Request.ServerVariables("SERVER_NAME") & oRS("vpath")& "</a></strong></p>"
Response.write "<p><b>Hit Count:</b> " & oRS("HitCount") & " --
<b>Updated:</b> " & oRS("Write") & " <b> -- Score:</b> " & oRS("Rank")/10 &
"</p></td></table><br><hr color='gray' width='95%'>"

oRS.MoveNext
TheRanking = TheRanking + 1
Loop
End If
%>

<%
Set TheRanking = nothing
Set oRS = nothing
Set oQuery = nothing
%>


.

Loading