[求助]这段ASP站内搜索的代码无法精确搜索？

→莲佳

请高手帮我看看这段站内搜索的代码
如何修改才能使搜索精确呢？
就是能够按照文章的标题进行搜索，而且可以同时搜索几个关键字
谢谢！



<!--#include file="head.asp" -->
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<TABLE width=778 border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD width="100%"> <TABLE cellSpacing=0 cellPadding=0 width=778 align=center border=0>
<TBODY>
<TR bgColor=#ffffff>
<TD colSpan=3 height=2></TD>
</TR>
<TR>

<TD width="19" height=22 align=right><img src="Img/Ew_Guide.gif" width="11" height="11"></TD>

<TD width="748"><FONT color=#333333>&nbsp;您的位置：&nbsp;</FONT><a href="Default.asp">网站的首页</a></TD>
<TD width="11">&nbsp;</TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=778 border=0>
<TBODY>
<TR>
<TD vAlign=top colSpan=2> <table width="778" border="0" align="center" cellpadding="0" cellspacing="0" style="BORDER-Top: #d8d8d8 1px solid;BORDER-RIGHT: #d8d8d8 1px solid;BORDER-left: #d8d8d8 1px solid">
<tr>
<td width="28" height="22" bgcolor="#FFFFFF" align="right">
<img src="Img/Announce.gif" width="18" height="24"></td>
<td width="69" bgcolor="#FFFFFF" align="right">滚动公告：</td>
<td width="653" bgcolor="#FFFFFF">
<% Call Marquee()%>
</td>
<td width="26" bgcolor="#FFFFFF" valign="top" align="right"><img src="Img/Ew-Ar.gif" width="13" height="11"></td>
</tr>
</table></TD>
</TR>
<TR>
<TD style="BORDER-RIGHT: #d8d8d8 1px solid;BORDER-left: #d8d8d8 1px solid" vAlign=top width=185
bgColor=#f6f6f6>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD background=""> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD height=34><TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="Img/Ew_Menu212.gif">
<TBODY>
<TR>
<TD height=32><strong>&nbsp;&nbsp;&nbsp;
用 户 登 陆</strong></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD height=40><TABLE width=95% height="100" border=0 align=center cellPadding=0 cellSpacing=1 bgColor=#e8e8e8>
<TBODY>
<TR>
<TD height="53" bgColor=#FFFFFF> <% Call UserLogin() %> </TD>
</TR>
</TABLE></TD>
</TR>
<TR>
<TD></TD>
</TR>
<TR>
<TD></TD>
</TR>
<TR>
<TD>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="Img/Ew_Menu212.gif">
<TBODY>
<TR>
<TD height=32><strong>&nbsp;&nbsp;&nbsp; 热 门 信 息</strong></TD>
</TR>
</TBODY>
</TABLE>

</TD>
</TR>
<TR>
<TD vAlign=top><TABLE cellSpacing=0 cellPadding=5 width=99% align=center bgColor=#e8e8e8 border=0>
<TBODY>
<TR>
<TD width="100%" bgColor=#FFFFFF> <% Call Ew_ShowInfo(1,10,26,0,0) %> </TD>
</TR>
</TABLE></TD>
</TR>
<TR>
<TD></TD>
</TR>
<TR>
<TD>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="Img/Ew_Menu212.gif">
<TBODY>
<TR>
<TD height=32><strong>&nbsp;&nbsp;&nbsp; 网 站 调 查</strong></TD>
</TR>
</TBODY>
</TABLE>

</TD>
</TR>
<TR>
<TD vAlign=top><TABLE style="WORD-BREAK: break-all" height="100%" cellPadding=4 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top height=80> <TABLE width=99% height="100%" border=0 align=center cellPadding=0 cellSpacing=1 bgColor=#e8e8e8>
<TBODY>
<TR>
<TD width="100%" height="52" bgColor=#FFFFFF>
<% Call Ew_FlashVote() %>
</TD>
</TR>
</TABLE></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD></TD>
</TR>
<TR>
<TD></TD>
</TR>
<TR>
<TD></TD>
</TR>
</TBODY>
</TABLE></TD>
<TD vAlign=top align=left width=593 style="BORDER-RIGHT: #d8d8d8 1px solid">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><form name="form" method="post" action="Search.asp">
<TABLE cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
<TBODY>
<TR>
<TD align=middle width=55 background=Img/Ew_BarBg.gif height=34><img src="Img/Ew_Bar.gif" width="55" height="34"></TD>
<TD width="535" background=Img/Ew_BarBg.gif> &nbsp;&nbsp; 查找关键字:
<input name="txtitle" type="text" class=smallInput id="txtitle" size="13">
&nbsp;
<input type="submit" value="查 询" name="title" class="buttonface">
</TD>
</TR>
</TBODY>
</TABLE>
</form></td>
</tr>
</table>
<%
const MaxPerPage=20
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
dim idlist
dim txtitle

if not isempty(request("page")) then
currentPage=Trim(request("page"))
else
currentPage=1
end if
if not isempty(request("selAnnounce")) then
idlist=request("selAnnounce")
if instr(idlist,",")>0 then
dim idarr
idArr=split(idlist)
dim id
for i = 0 to ubound(idarr)
id=clng(idarr(i))
call deleteannounce(id)
next
else
call deleteannounce(clng(idlist))
end if
end if
%>
<table border="0" width="100%" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="100%" align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> <%
txtitle=request.form("txtitle")
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from info where"
if txtitle<>"" then
sql=sql&" title like '%"&txtitle&"%' or content like '%"&txtitle&"%'"
else
sql = "select * from info order by id desc "
end if
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<br><br><p align='center'>没有找到任何信息...</p>"

else
totalPut=rs.recordcount
if currentpage<1 then
currentpage=1
end if
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if currentPage=1 then
showpage totalput,MaxPerPage,"Search.asp"
showContent
showpage totalput,MaxPerPage,"Search.asp"
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (curr