计算机应用 | 古代文学 | 市场营销 | 生命科学 | 交通物流 | 财务管理 | 历史学 | 毕业 | 哲学 | 政治 | 财税 | 经济 | 金融 | 审计 | 法学 | 护理学 | 国际经济与贸易
计算机软件 | 新闻传播 | 电子商务 | 土木工程 | 临床医学 | 旅游管理 | 建筑学 | 文学 | 化学 | 数学 | 物理 | 地理 | 理工 | 生命 | 文化 | 企业管理 | 电子信息工程
计算机网络 | 语言文学 | 信息安全 | 工程力学 | 工商管理 | 经济管理 | 计算机 | 机电 | 材料 | 医学 | 药学 | 会计 | 硕士 | 法律 | MBA
现当代文学 | 英美文学 | 通讯工程 | 网络工程 | 行政管理 | 公共管理 | 自动化 | 艺术 | 音乐 | 舞蹈 | 美术 | 本科 | 教育 | 英语 |

ASP网上购书(一)毕业论文网(7)

2013-05-30 01:39
导读:asp返回书店首页/a/td/tr/table/td/tr/table" end if end sub ‘在首页中有一个滚动栏,显示用户是否已经登陆,以及登陆后用户的一些短信息。如果用户还没有登陆
asp>返回书店首页</a></td></tr></table></td></tr></table>"
end if
end sub
‘在首页中有一个滚动栏,显示用户是否已经登陆,以及登陆后用户的一些短信息。如果用户还没有登陆
if request.cookies("bookshop")("username")="" then
    response.write "您还没有登陆!"
‘如果用户按照上面所有的正确步骤进行了注册,或登陆,那么就进行用户的资料检验,
set rs=server.CreateObject("adodb.recordset")
rs.open "select shop_books.huiyuanjia,shop_action.bookcount from shop_books inner join shop_action on shop_books.bookid=shop_action.bookid where shop_action.zhuangtai=1 and shop_action.username='"&trim(request.Cookies("bookshop")("username"))&"' ",conn,1,1
dim ckxp
set ckxp=server.CreateObject("adodb.recordset")
ckxp.Open "select distinct(dingdan) from shop_action where username='"&request.Cookies("bookshop")("username")&"' and zhuangtai=1 ",conn,1,1
‘如果是新用户,或者该用户没有未处理的订单,通过访问数据库后得出“欢迎("username")光临本站 您目前还没有未处理订单 共计:0.00元”
if ckxp.recordcount=0 then
response.write "欢迎<font color=red>"&Request.Cookies("bookshop")("username")&"</font>光临本站<br>您目前还没有未处理订单<br>共计:0.00元"
‘如果是已经注册了的用户,并且已经填写了订单,然而还没有进行处理,则会显示“欢迎("username")光临本站您目前有"&ckxp.recordcount&"笔未处理订单<br>共计:"&shopjiage&"元(除邮费)"
else
dim shopjiage
do while not rs.eof
shopjiage=round(shopjiage+rs("huiyuanjia")*rs("bookcount"),2)
rs.movenext
loop
response.write "欢迎<font color=red>"&request.cookies("bookshop")("username")&"</font>光临本站<br>您目前有"&ckxp.recordcount&"笔未处理订单<br>共计:"&shopjiage&"元(除邮费)"
end if
4.5  设计管理员登陆
从admin/login.asp进入,检查管理员的密码
<%dim admin,password
admin=replace(trim(request("admin")),"'","")
password=md5(replace(trim(request("password")),"'",""))
if admin="" or password="" then
response.Write "<center><a href=login.asp><font color=red size=2>对不起,登陆失败,请检查您的登陆名和密码</font></a></center>"
response.end
‘如果管理员的代码不填写的话,以下程序可以检测:
function check()
{
  if(checkspace(document.admininfo.admin.value)) {
 document.admininfo.admin.focus();
    alert("管理员不能为空!");
 return false;
  }
‘如果管理员的密码为空,则以下程序可以检测:
if(checkspace(document.admininfo.password.value)) {
 document.admininfo.password.focus();
    alert("密码不能为空!");
 return false;
  }
 document.admininfo.submit();

4.6 设计购买与收藏架
 为了使网站更贴近用户,在用户访问首页时,只要是登陆了的用户只需要点击购买就可以看见自己订购了的书籍。用户是否登陆,由以下程序决定:
if request.cookies("bookshop")("username")="" then
response.write "<script language=java script>alert('对不起,您还没有登陆!');window.close()</script>"
response.End
end if
dim bookid,username,action
action=request.QueryString("action")
username=trim(request.cookies("bookshop")("username"))
bookid=request.QueryString("id")
‘如果没有登陆,进入到用户注册登陆画面,如果已经登陆了,并且决定立刻购买,就直接点击“购买”、“下一步”就可以进入订单了。
onClick="java script:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"  type=button value=购买 name=Submit223> 中国大学排名
‘如果暂时还不想下订单

上一篇:ASP同学录设计asp+sql(一)毕业论文 下一篇:没有了