|
Welcome
to the Richard H. Reynolds |
|
|
|
Input an insurance term or the first few letters to search the database.
<%
dim intX
intX = 1
rsTerm.MoveFirst
do while not rsTerm.EOF and intSearchLen > 0
if ucase(left(rsTerm.Fields("TERM"),intSearchLen)) = ucase(strSearch) then
Response.Write("" )
Response.Write( rsTerm.Fields("Term").Value )
Response.Write( "
") end if intX = intX + 1 rsTerm.MoveNext loop ' This is how I hot link from another page to a term ' ' %> |
|
Search for your term: <% 'Search Notice %> |
|
|
|
|
|
|
