请达人帮忙了,结局就散分!

jtnwl 2008-11-25 04:46:05
请达人帮忙写一个查询页面


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


我想写一个查询 输入 菜名 或者 肉名 就能知道是谁买的
...全文
105 点赞 收藏 8
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
不耐烦 2008-11-25
<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
%>
回复
jtnwl 2008-11-25
能给个全面点的码?

数据库联接 conn 已经有了

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

谢谢了
回复
oulin1983 2008-11-25
楼主看这样行不行:
<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
%>
回复
情绝书生 2008-11-25
keywordtype '菜,肉字段让用户选择
keyword '用户输入的关键字

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

if not rs.eof then response.write rs("采购者")
回复
craft001wen 2008-11-25

菜名为: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
%>
回复
搜索关键字=request("搜索关键字")
select 采购者 from Purchase where 蔬菜='"&搜索关键字&"' or 肉='"&搜索关键字&"'"
回复
草原可可 2008-11-25
多表的话
select a.谁 from Purchase a,xxx b where 菜名='"&菜名&"' and a.xxx = b.xxx
回复
草原可可 2008-11-25
int 菜名
菜名 = request("")
select 谁 from Purchase where 菜名='"&菜名&"'

中文改成你表里的字段吧
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2008-11-25 04:46
社区公告
暂无公告