|
3.4.2eadd.asp 1.页面中需要用户填写的html表单元素 paper51.com 页面中无需填写html表单元素。 http://www.paper51.com 2.页面所涉及的数据库表信息 http://www.paper51.com 此页涉及到用户详细注册信息数据库表larchives的操作。 内容来自www.paper51.com
3.页面代码分析 内容来自论文无忧网 www.paper51.com
此页同3.4.5 ladd.asp代码非常类似，代码分析请见3.4.5 ladd.asp代码 http://www.paper51.com 3.4.3delhy.asp http://www.paper51.com
1.页面示例 paper51.com 此页为用户删除好友列表页面，删除成功后页面跳转到个人管理首页，因此没有页面示例。 内容来自论文无忧网 www.paper51.com 2.页面中需要用户填写的html表单元素 http://www.paper51.com 此页面无需填写html表单元素。 copyright paper51.com 3.页面所涉及的数据库表信息 http://www.paper51.com 此页涉及到用户好友数据库表friend的操作。 http://www.paper51.com 4.页面代码分析 内容来自www.paper51.com <!--#includefile="conn.asp"--> http://www.paper51.com <% 内容来自论文无忧网 www.paper51.com ifrequest("id") = "" then copyright paper51.com
response.redirect"default.asp" copyright paper51.com response.end copyright paper51.com end if paper51.com set rs_id =Server.CreateObject("ADODB.Recordset") paper51.com sql ="select * from friend where id=" & request("id") copyright paper51.com rs_id.opensql,conn,3,2 copyright paper51.com rs_id.close 内容来自论文无忧网 www.paper51.com Set rs_del= Server.CreateObject("ADODB.Recordset") 内容来自www.paper51.com sql="delete from friend where id=" &request("id") 内容来自论文无忧网 www.paper51.com rs_del.opensql,conn,3,2 copyright paper51.com conn.close http://www.paper51.com response.redirect"your.asp" http://www.paper51.com response.end http://www.paper51.com
%> http://www.paper51.com
3.4.4sendphoto.asp paper51.com 1.页面中需要用户填写的html表单元素 paper51.com 该页面中仅有1个表单元素，如表3-5所示。 内容来自www.paper51.com 表3-8sendphoto.asp页的表单元素 http://www.paper51.com
名称 内容来自www.paper51.com
表单元素类型 http://www.paper51.com 含义 paper51.com big copyright paper51.com file paper51.com
相片文件 内容来自www.paper51.com 2.页面所涉及的数据库表信息 内容来自论文无忧网 www.paper51.com 此页为用户管理相片页，涉及到对图片数据库表pic的操作。 http://www.paper51.com 3.页面代码分析 paper51.com <!--#includefile="conn.asp"--><% 内容来自www.paper51.com dimrs_lar,rs http://www.paper51.com dim sql 内容来自论文无忧网 www.paper51.com dim i 内容来自论文无忧网 www.paper51.com '叛断此用户是否已经注册 内容来自论文无忧网 www.paper51.com Set rs_lar= Server.CreateObject("ADODB.Recordset") http://www.paper51.com sql="select* from larchives where user_id="& session("user_id") copyright paper51.com rs_lar.opensql,conn,3,2 paper51.com ifrs_lar.eof and rs_lar.bof then 内容来自论文无忧网 www.paper51.com ifsession("user_id")=1 then response.redirect "notreg.htm" 内容来自论文无忧网 www.paper51.com
response.redirect"notregist.htm" 内容来自www.paper51.com response.end copyright paper51.com end if 内容来自www.paper51.com
%><!--#includefile="connpic.asp"--><% 内容来自www.paper51.com
Set rs =Server.CreateObject("ADODB.Recordset") copyright paper51.com sql="select* from pic where user_id=" & session("user_id") http://www.paper51.com rs.opensql,conn,3,2 paper51.com %> 内容来自www.paper51.com 3.4.5 addpic.asp http://www.paper51.com 1.页面示例 http://www.paper51.com 此页为添加相片页面，相片添加成功后页面跳转到个人管理首页，因此没有页面示例。 paper51.com 2.页面中需要用户填写的html表单元素 paper51.com 此页无需填写html表单元素。 内容来自论文无忧网 www.paper51.com 3.页面所涉及的数据库表信息 http://www.paper51.com 此页涉及到用户相片数据库表pic 的操作。 内容来自论文无忧网 www.paper51.com 4.页面代码分析 paper51.com
<!--#includefile="conn.asp"--> 内容来自www.paper51.com
<% 内容来自www.paper51.com dim rs http://www.paper51.com dimformsize,formdata,bncrlf,divider,datastart,dataend,mydata http://www.paper51.com formsize=request.totalbytes 内容来自论文无忧网 www.paper51.com
formdata=request.binaryread(formsize) http://www.paper51.com bncrlf=chrB(13)& chrB(10) 内容来自论文无忧网 www.paper51.com divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1) http://www.paper51.com datastart=instrb(formdata,bncrlf& bncrlf)+4 内容来自www.paper51.com
dataend=instrb(datastart+1,formdata,divider)-datastart 内容来自论文无忧网 www.paper51.com mydata=midb(formdata,datastart,dataend) copyright paper51.com Set rs =Server.CreateObject("ADODB.Recordset") http://www.paper51.com rs.open"select * from larchives where user_id=" &session("user_id"),conn,3,2 内容来自论文无忧网 www.paper51.com rs("photo")=rs("photo")+1 paper51.com rs.update 内容来自论文无忧网 www.paper51.com %><!--#includefile="connpic.asp"--><% copyright paper51.com Set rs =Server.CreateObject("ADODB.Recordset") copyright paper51.com rs.Open"pic",conn,3,2 内容来自论文无忧网 www.paper51.com rs.addnew 内容来自论文无忧网 www.paper51.com
rs("big").appendchunkmydata 内容来自论文无忧网 www.paper51.com
rs("user_id")=session("user_id") 内容来自论文无忧网 www.paper51.com rs("date")=date 内容来自www.paper51.com rs.update 内容来自论文无忧网 www.paper51.com setrs=nothing paper51.com
setconn=nothing copyright paper51.com response.redirect"sendphoto.asp" 内容来自www.paper51.com %> paper51.com 3.4.6delpic.asp copyright paper51.com 1.页面示例 http://www.paper51.com 此页为用户删除相片列表页面，删除成功后页面跳转到个人相片管理首页，因此没有页面示例。 copyright paper51.com
2.页面中需要用户填写的html表单元素 内容来自论文无忧网 www.paper51.com 此页无需填写html表单元素。 http://www.paper51.com 3.页面所涉及的数据库表信息 paper51.com
此页涉及到用户相片数据库表pic的操作。 内容来自论文无忧网 www.paper51.com 4.页面代码分析 http://www.paper51.com
<% 内容来自www.paper51.com ifrequest("id") = "" then paper51.com response.redirect"default.asp" http://www.paper51.com response.end paper51.com end if copyright paper51.com
%> http://www.paper51.com
|