| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 595 人关注过本帖
标题:[求助]我想在页面显示图片却错误!请高手帮帮!急用啊!
只看楼主 加入收藏
守护亡灵
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2005-8-24
收藏
 问题点数:0 回复次数:6 
[求助]我想在页面显示图片却错误!请高手帮帮!急用啊!

小弟刚学ASP不久,请各位高手帮我看看应该怎么改!我的图片是以地址形式存如数据库,但在显示的时候来是提示: Microsoft VBScript 编译器错误 错误 '800a03f6' 缺少 'End' /iisHelp/common/500-100.asp,行242 ADODB.Field 错误 '80020009' 对象关闭时不允许操作 PERSON/register.asp,行0 显示图片页面的代码如下: <% Response.Buffer=True %> <!--#include file="../inc/person.inc"--> <!--#include file="../inc/html.inc"--> <% uname=session("puid") modify=request("modify") Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from person where uname='"&uname&"'" rs.open sql,conn,1,1 %> …… <SCRIPT language=JavaScript src="../inc/window.js"></SCRIPT> <% if modify<>"ture" then %><FORM name=register action=register.asp method=post> <%else%> <FORM name="register" action="register.asp?modify=ture" method="post"> <%end if%> </p> <table border="0" cellpadding="8" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" width="90%" id="AutoNumber70" bgcolor="#003366"> <tr> <td align="right" bgcolor="#D5DDE5"><p align="center"><a href="<%=rs("pic")%>" target="_blank"> <img border="0" height="160" src="<%=rs("pic")%>" width="125"></a><br> </td> </tr> </table> <p>&nbsp;</p> <div align="center"> <center> </center> </div> <div align="center"> <center> <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="770" id="AutoNumber19" bgcolor="#111111" height="1"> <tr> </tr> </table> </center> </div>

<% bday=request("bday") if bday="" then Response.End sex=request("sex") pic=request("pic") iname=request("iname") code=request("code") mzhu=request("mzhu") guoji=request("guoji") shengao=request("shengao") tizhong=request("tizhong") nianling=request("nianling") hkb=request("hkb") edus=request("edus") marry=request("marry") byday=request("byday") hka=request("hka") zye=request("zye") zyes=request("zyes") zyms=request("zyms") zym=request("zym") edu=request("edu") school=request("school") zzmm=request("zzmm") zcheng=request("zcheng") if iname="" then iname=rs("iname") end if rs.close Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from person where uname='"&uname&"'" rs.open sql,conn,3,3 rs("iname")=iname rs("code")=code rs("mzhu")=mzhu rs("pic")=pic rs("guoji")=guoji rs("tizhong")=tizhong rs("shengao")=shengao rs("byday")=byday rs("edus")=edus rs("zym")=zym rs("hkb")=hkb rs("nianling")=nianling rs("marry")=marry rs("zzmm")=zzmm rs("zcheng")=zcheng rs("bday")=bday rs("sex")=sex rs("hka")=hka rs("zye")=zye rs("zyes")=zyes rs("zyms")=zyms rs("edu")=edu rs("school")=school rs.update rs.close if modify<>"ture" then Response.Redirect "register2.asp" else Response.Redirect "modify.asp" end if %> 我不知道到底是那里错!请帮我看看该如何修改!我也知道有很多不好的地方!只能说谢谢各位了!

[此贴子已经被作者于2005-8-24 1:25:59编辑过]

搜索更多相关主题的帖子: 页面 
2005-08-24 01:24
hxfly
Rank: 5Rank: 5
等 级:贵宾
威 望:17
帖 子:5810
专家分:118
注 册:2005-4-7
收藏
得分:0 
以下是引用守护亡灵在2005-8-24 1:24:35的发言:

小弟刚学ASP不久,请各位高手帮我看看应该怎么改!我的图片是以地址形式存如数据库,但在显示的时候来是提示: Microsoft VBScript 编译器错误 错误 '800a03f6' 缺少 'End' /iisHelp/common/500-100.asp,行242 ADODB.Field 错误 '80020009' 对象关闭时不允许操作 PERSON/register.asp,行0 显示图片页面的代码如下: <% Response.Buffer=True %> <!--#include file="../inc/person.inc"--> <!--#include file="../inc/html.inc"--> <% uname=session("puid") modify=request("modify") Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from person where uname='"&uname&"'" rs.open sql,conn,1,1 %> …… <SCRIPT language=JavaScript src="../inc/window.js"></SCRIPT> <% if modify<>"ture" then %><FORM name=register action=register.asp method=post> <%else%> <FORM name="register" action="register.asp?modify=ture" method="post"> <%end if%> </p> <table border="0" cellpadding="8" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" width="90%" id="AutoNumber70" bgcolor="#003366"> <tr> <td align="right" bgcolor="#D5DDE5"><p align="center"><a href="<%=rs("pic")%>" target="_blank"> <img border="0" height="160" src="<%=rs("pic")%>" width="125"></a><br> </td> </tr> </table> <p>&nbsp;</p> <div align="center"> <center> </center> </div> <div align="center"> <center> <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="770" id="AutoNumber19" bgcolor="#111111" height="1"> <tr> </tr> </table> </center> </div>

<% bday=request("bday") if bday="" then Response.End end if sex=request("sex") pic=request("pic") iname=request("iname") code=request("code") mzhu=request("mzhu") guoji=request("guoji") shengao=request("shengao") tizhong=request("tizhong") nianling=request("nianling") hkb=request("hkb") edus=request("edus") marry=request("marry") byday=request("byday") hka=request("hka") zye=request("zye") zyes=request("zyes") zyms=request("zyms") zym=request("zym") edu=request("edu") school=request("school") zzmm=request("zzmm") zcheng=request("zcheng") if iname="" then iname=rs("iname") end if rs.close Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from person where uname='"&uname&"'" rs.open sql,conn,3,3 rs("iname")=iname rs("code")=code rs("mzhu")=mzhu rs("pic")=pic rs("guoji")=guoji rs("tizhong")=tizhong rs("shengao")=shengao rs("byday")=byday rs("edus")=edus rs("zym")=zym rs("hkb")=hkb rs("nianling")=nianling rs("marry")=marry rs("zzmm")=zzmm rs("zcheng")=zcheng rs("bday")=bday rs("sex")=sex rs("hka")=hka rs("zye")=zye rs("zyes")=zyes rs("zyms")=zyms rs("edu")=edu rs("school")=school rs.update rs.close if modify<>"ture" then Response.Redirect "register2.asp" else Response.Redirect "modify.asp" end if %> 我不知道到底是那里错!请帮我看看该如何修改!我也知道有很多不好的地方!只能说谢谢各位了!


2005-08-24 08:23
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
收藏
得分:0 
是不是conn没有open
2005-08-24 10:54
守护亡灵
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2005-8-24
收藏
得分:0 
哦!我去看看!谢谢班主哦!

老婆~我想买部车和你去兜兜风!然后对你说:我爱你~~宝贝!我想我们要结婚了~~~~~~~~~~!!
2005-08-24 15:39
守护亡灵
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2005-8-24
收藏
得分:0 
55555,还是不行!加上end if 后就提示加上的这行有问题!conn也已经有open了!真晕了!

老婆~我想买部车和你去兜兜风!然后对你说:我爱你~~宝贝!我想我们要结婚了~~~~~~~~~~!!
2005-08-24 15:48
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
收藏
得分:0 
检查一下所有rs和conn是不是有open以前就update、close的地方
2005-08-24 16:05
守护亡灵
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2005-8-24
收藏
得分:0 
都有啊!算了!我去找个现成的来用算了!谢谢你了!如有什么问题我还得再麻烦大家!

老婆~我想买部车和你去兜兜风!然后对你说:我爱你~~宝贝!我想我们要结婚了~~~~~~~~~~!!
2005-08-24 16:12
快速回复:[求助]我想在页面显示图片却错误!请高手帮帮!急用啊!
数据加载中...
 
   



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

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