|
程序代码:
look.asp
<form name="myform" action="over.asp" method="post">
<input name="search1" type="text"/>
<input type="submit" value="查询"/>
</form>
在文本框里面输入HA04,HI03然后点查询就会进入over.asp查询
代码如下:
程序代码:
<!--#include file="conn.asp"-->
<% dim pname
pname=gerform("search1")
Str=split(pname,",")
For i=0 to ubound(Str)
StrTemp=Str(i)
Next
Set Rs=Server.CreateObject("Adodb.Recordset")
Rs.Open "Select * from mbcomp Where proname Like '%"&StrTemp&"%'",dbconn,1,1
Do while not Rs.eof
Response.write"<a href=''>"&Rs("proname")&"</a>"
Rs.movenext
loop
Rs.close : Set Rs=Nothing
%>
现在出现错误.就是不能查询到HA04.能找到HI03.能请问什么地方出现了问题.请指导一下.谢谢. |
|