请达人帮忙了，结局就散分！

[jtnwl]

请达人帮忙写一个查询页面


ACCESS的 我有一个 表是“Purchase” 里面有 “蔬菜” 和 “肉” 字段 记录着采购者


我想写一个查询 输入 菜名 或者 肉名 就能知道是谁买的

[草原可可]

int 菜名
菜名 = request("")
select 谁 from Purchase where 菜名='"&菜名&"'

中文改成你表里的字段吧

[草原可可]

多表的话
select a.谁 from Purchase a,xxx b where 菜名='"&菜名&"' and a.xxx = b.xxx

[大王带我来巡山]

搜索关键字=request("搜索关键字")
select 采购者 from Purchase where 蔬菜='"&搜索关键字&"' or 肉='"&搜索关键字&"'"

[craft001wen]

如
菜名为:cm
肉名为:rm
<%
key=trim(request("key_query"))
set rs=conn.execute ("select * from table where cm like '%"&key&"%' or rm like '%"&key&"%'" )
if not rs.eof then
response.write rs("采购者")
end if
%>

[情绝书生]

keywordtype '菜,肉字段让用户选择
keyword '用户输入的关键字

set rs = Conn.Execute("Select 采购者 From Purchase where "&keywordtype&"='"&Request.Form("keyword")&"'")

if not rs.eof then response.write rs("采购者")

[oulin1983]

楼主看这样行不行：
<form method="post">
<input type="text" name="a">请输入 菜名 或者 肉名<br>
<input type="submit" value="提交">
</form>
<%
access数据库的链接不记得，我是菜鸟，楼主百度一下吧
aa=trim(request.form("a"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from purchase where 菜名='&aa&' or 肉名='aa'"
rs.open sql,连接字符串，1,1
if rs.eof or rs.bof then
response.Write("无人购买")
else
response.Write("rs("采购者")")
rs.close
set rs=nothing
%>

[jtnwl]

能给个全面点的码？

数据库联接 conn 已经有了

我不会写 游标和调用后的表格

谢谢了

[不耐烦]

<form method="post" action="1.asp">
<input type="text" name="a">请输入 菜名 或者 肉名 <br>
<input type="submit" value="提交">
</form>

1.asp

<%
'数据库连接conn
a=request("a")'获取查询值
set rs=conn.execute("select * fom [Purchase] 蔬菜 like '%"&a&"%' or 肉 like '%"&a&"%'")
do while not rs.eof
respone.write rs("蔬菜")&"--"&rs("肉")
rs.movenext
loop
set rs=nothing
%>