| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 705 人关注过本帖
标题:急 急 急
取消只看楼主 加入收藏
透明
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-1-19
收藏
 问题点数:0 回复次数:4 
急 急 急
<%
if request("t1")="" then
response.Write"请输入证书编号!<meta http-equiv=refresh content='1;url=chaxun.asp'>"
response.end
end if

set rs=server.createobject("adodb.recordset")
Dim t1,sql
t1=trim(request.form("t1"))
sql="select * from zhengshu where bianhao='"&t1&"'"
set rs=conn.execute (sql)

if rs.eof then response.Write"没有该记录,请确认输入是否正确!<meta http-equiv=refresh content='1;url=chaxun.asp'>"
response.end
end if
%>
第一步:如果输入为空,点查询 就是显示请输入编号,说明第一部分的判断能正常运行.
第二步:在关键字里输入一串数字,点击查询,然后就运行错误,说:
变量未定义: 'rs' 31行
其中31行是:set rs=server.createobject("adodb.recordset")
搜索更多相关主题的帖子: sql request content where 
2007-01-19 11:55
透明
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-1-19
收藏
得分:0 
我去掉这句猴,提示错误:变量未定义: 'rs' 35行
即set rs=conn.execute (sql)

2007-01-19 13:16
透明
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-1-19
收藏
得分:0 
我加了试了  不好使

2007-01-19 13:55
透明
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-1-19
收藏
得分:0 
现在的代码是:
<%
'以下将判断关键字,为空等则不执行查询
if request("t1")="" then
response.Write"请输入证书编号!<meta http-equiv=refresh content='1;url=chaxun.asp'>"
response.end
end if
t1=trim(request.form("t1"))
sql="select * from zhengshu where bianhao='"&t1&"'"
set rs=conn.execute (sql)

if rs.eof then response.Write"没有该记录,请确认输入是否正确!<meta http-equiv=refresh content='1;url=chaxun.asp'>"
response.end
end if
%>
错误 '800a01a8'
缺少对象: ''
/html/result.asp,行 32

2007-01-19 16:53
透明
Rank: 1
等 级:新手上路
帖 子:14
专家分:0
注 册:2007-1-19
收藏
得分:0 

<%

if request("t1")="" then
response.Write"请输入证书编号!<meta http-equiv=refresh content='1;url=chaxun.asp'>"
response.end
end if
t1=trim(request.form("t1"))
sql="select * from zhengshu where bianhao='"&t1&"'"
set rs=conn.execute (sql)

if rs.eof then response.Write"没有该记录,请确认输入是否正确!<meta http-equiv=refresh content='1;url=chaxun.asp'>"
response.end
end if
%>

2007-01-19 16:54
快速回复:急 急 急
数据加载中...
 
   



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

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