| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1855 人关注过本帖
标题:[求助]关于下拉列表传值的问题
只看楼主 加入收藏
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
<html>
<body>
<% ID=request.form("idA")%>
<%
dim con,DBPath
set con=server.CreateObject("ADODB.Connection")
DBPath=server.MapPath("data.mdb")
con.open "driver={Microsoft Access Driver(*.mdb)};dbq="&DBPath
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from data"
sql=sql & "where 产品编号 like '%"& ID &"%'"
con.execute sql
rs.open sql,con,1,3
%>
<% if not rs.eof and not rs.bof then %>
<table width="861" height="71" border="1">
<tr>
<th width="64" height="35">产品编号</th>
<th width="61" scope="col">产品名称</th>
<th width="33" scope="col">主频</th>
<th width="49" scope="col">单双核</th>
<th width="32" scope="col">内存</th>
<th width="77" scope="col">硬盘</th>
<th width="77" scope="col">光驱</th>
<th width="77" scope="col">显卡</th>
<th width="77" scope="col">显示器</th>
<th width="77" scope="col">操作系统</th>
<th width="77" scope="col">类型</th>
<th width="84" scope="col">价格</th>
</tr>
<tr>
<td height="28">&nbsp;<%= rs("ID") %></td>
<td>&nbsp;<%= rs("name") %></td>
<td>&nbsp;<%= rs("zp") %></td>
<td>&nbsp;<%= rs("dsh") %></td>
<td>&nbsp;<%= rs("nc") %></td>
<td>&nbsp;<%= rs("yp") %></td>
<td>&nbsp;<%= rs("xk") %></td>
<td>&nbsp;<%= rs("xsq") %></td>
<td>&nbsp;<%= rs("system") %></td>
<td>&nbsp;<%= rs("lx") %></td>
<td>&nbsp;<%= rs("jg") %></td>
<td>&nbsp;<%= rs("jg1") %></td>
</tr>
</table>
</body>
</html>
<% else %>
对不起,没有您要查找的数据
<%
rs.close
set rs=nothing
con.close
set con=nothing
%>
<% end if %>
如果是这样不应该该缺少end
2007-10-10 20:29
sldtk1
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:20
帖 子:624
专家分:258
注 册:2006-5-4
收藏
得分:0 

刚才又出现了这个错误,请问是怎么回事?
还有这段代码<input type="hidden" name="idA" >,按钮看不见了提交不了

2007-10-10 20:32
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&DBPath&";Persist Security Info=False"
这样试试。
2007-10-10 20:36
sldtk1
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:20
帖 子:624
专家分:258
注 册:2006-5-4
收藏
得分:0 
图片附件: 游客没有浏览图片的权限,请 登录注册

我的Acess文件名为data,里面的数据库名也是data,这样可以吗?
连数据的时候是用Acess的文件名还是直接用里面的数据库名?
我的文件都是在同一目录下的
2007-10-10 20:43
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
sql="select * from [data]"
加[]区分.
2007-10-10 20:52
sldtk1
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:20
帖 子:624
专家分:258
注 册:2006-5-4
收藏
得分:0 
谢谢,已经可以跳转了,但总是查不到数据,这是为什么呢?
我的表是这样
图片附件: 游客没有浏览图片的权限,请 登录注册

还有这句代码<input type="hidden" name="idA" >,没有显示提交,要不要再加一个submit

[此贴子已经被作者于2007-10-10 21:00:58编辑过]

2007-10-10 20:58
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
where 产品编号="& ID
这样写
再不行
where 产品编号='"& ID &"'"
这样写
2007-10-10 21:01
sldtk1
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:20
帖 子:624
专家分:258
注 册:2006-5-4
收藏
得分:0 
sql=sql & "where 产品编号="&ID

图片附件: 游客没有浏览图片的权限,请 登录注册


sql=sql & "where 产品编号='"& ID &"'"
图片附件: 游客没有浏览图片的权限,请 登录注册


sql=sql & "where 产品编号 like '%"&ID&"%'"


图片附件: 游客没有浏览图片的权限,请 登录注册

好像都不行
2007-10-10 21:15
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
Response.Write ID
看看这个ID返回什么数据
2007-10-10 21:52
sldtk1
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:20
帖 子:624
专家分:258
注 册:2006-5-4
收藏
得分:0 
返回的是ID的值和逗号,是不是前面的下拉列表传过来的?
2007-10-10 21:55
快速回复:[求助]关于下拉列表传值的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.026108 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved