userinfo.asp

BJXSHOP购物管理系统是一个功能完善、展示信息丰富的电子商店销售平台；针对企业与个人的网上销售系统；开放式远程商店管理；完善的订单管理、销售统计、结算系统；强力搜索引擎支持；提供网上多种在线支付方

<% 
function getName(str) '//获得返回地址函数
dim re
set re=New RegExp
re.IgnoreCase=true
re.Global=True  
re.pattern=".*\/"
getName=re.replace(str,"")
end function
'response.write getName(Request.ServerVariables("SCRIPT_NAME"))

dim grttss '//判断用户类别
select case int(Request.Cookies("bookshop")("grtt"))
case 0 
grttss="用户类型：个人"
case 1
grttss="用户类型：团体"
case 2
grttss="用户类型：团体（未审核）"
end select
response.write "<table width=100% border=0 align=center cellpadding=0 cellspacing=0>"
response.write "<tr><td height=41 style='padding-left:1px'>"
response.write "<div align=left>"
if request.cookies("bookshop")("username")="" then

response.write "<table width=100% border=0 cellspacing=3 cellpadding=0>"
response.write "<form name=loginform method=post action=chkUser.asp><input name=comeurl type=hidden value=book123 >"
response.write "<tr><td><div align=center>用户名：</div></td>"
response.write "<td><div align=center><input name=username type=text size=10 class=input1></div></td></tr>"
response.write "<tr><td><div align=center>密&nbsp;&nbsp;码：</div></td>"
response.write "<td><div align=center><input name=userpassword type=password size=10 class=input1></div></td></tr>"
response.write "<tr><td colspan=2><div align=center>" 
response.write "<input id=image1 name=submit src=images/user_login.gif type=image onclick='return checkloginInfo()'> "

response.write "<a href=reg.asp><img src=images/user_submit.gif border=0></a></div></td></tr>"
response.write "<tr><td colspan=2><div align=center><a href=myuser.asp?action=repass>忘记密码？</a></div></td></tr></form></table>"

else

set rs=server.CreateObject("adodb.recordset")
rs.open "select shop_books.huiyuanjia,shop_books.tuantijia,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

if ckxp.recordcount=0 then
response.write "<div align=left>欢迎<font color=#ff6600>"&Request.Cookies("bookshop")("username")&"</font>惠顾本站<br>"&grttss&"<br>您没有未处理订单<br>共计:0.00 RMB</div>"
else
dim shopjiage
do while not rs.eof
if request.cookies("bookshop")("grtt")=1 then
shopjiage=round(shopjiage+rs("tuantijia")*rs("bookcount"),2)
else
shopjiage=round(shopjiage+rs("huiyuanjia")*rs("bookcount"),2)
end if
rs.movenext
loop
response.write "<div align=left>欢迎<font color=#ff6600>"&request.cookies("bookshop")("username")&"</font>惠顾本站<br>"&grttss&"<br>您目前有"&ckxp.recordcount&"笔未处理订单<br>共计："&shopjiage&" RMB<br>（不含邮费）</div>"
end if
ckxp.Close
set ckxp=nothing
rs.close
set rs=nothing
end if
if request.cookies("bookshop")("username")<>"" then
response.write "<a href=myuser1.asp><font color=#ff6600>我的账户</font></a>&nbsp;&nbsp;<a href=logout.asp><font color=#ff6600>注销登陆</font></a>"
end if
response.write "</div></td></tr></table>"
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}

function checkloginInfo()
{
   if(checkspace(document.loginform.username.value)) {
	document.loginform.username.focus();
    alert("请填写您的用户名！");
	return false;
  }
     if(checkspace(document.loginform.userpassword.value)) {
	document.loginform.userpassword.focus();
    alert("密码？");
	return false;
  }
    
  }
//-->
</script>
</body>
</html>