📄 user_inc.asp
字号:
<%set rs=server.createobject("adodb.recordset")
rs.open "select vipsq from wq_config ",conn,1,1
response.write rs("vipsq")
rs.close
set rs=nothing
%>
</td>
</tr>
<tr>
<td height=22 bgcolor=#FFFFEE> </td>
</tr>
<tr>
<td height=28 bgcolor=#FFFFFF align=center>
<%set rs=server.createobject("adodb.recordset")
rs.open "select vipid from wq_sys ",conn,1,1
vipid=rs("vipid")
rs.close
set rs=server.createobject("adodb.recordset")
rs.open "select * from wq_books where bookid="&vipid,conn,1,1%>
<table width="100%%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top" width="160">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td>
<div align="center">
<%if rs("zhuang")="" then
response.write "<a href=list.asp?id="&rs("bookid")&" target=_blank><img src=images/emptybook.gif width=150 border=0></a>"
else%>
<a href=list.asp?id=<%=rs("bookid")%> target=_blank><img src="<%=trim(rs("zhuang"))%>" width=130 border=0 height="130"></a>
<%end if%>
</div>
</td>
</tr>
<tr>
<td>
<div align="center">市场价：<s><%=rs("shichangjia")%></s></div>
</td>
</tr>
<tr>
<td>
<div align="center">会员价：<%=rs("huiyuanjia")%></div>
</td>
</tr>
<tr>
<td>
<div align="center">VIP 价：<%if Request.Cookies("cnhww")("reglx")=2 then%><%=trim(rs("Vipjia"))%>元<%else%><font color="#FF9999">更优惠！</font><%end if%></div>
</td>
</tr>
<tr>
<td>
<div align="center"><a href="javascript:;" onClick="javascript:window.open('shopcart.asp?id=<%=rs("bookid")%>&action=add','gouwu','width=450,height=350,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');"><img src="images/goumai.gif" width="40" height="18" border=0></a> <a href="javascript:;" onClick="javascript:window.open('favorites.asp?id=<%=rs("bookid")%>&action=add','shouchang','width=450,height=350,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');"><img src="images/Favorites.gif" width="40" height="18" border=0></a></div>
</td>
</tr>
</table>
</td>
<td valign="top">
<table width="100%%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td><%=rs("bookname")%></td>
</tr>
<tr>
<td><%=rs("bookcontent")%></td>
</tr>
<tr>
<td>【商品状态】
<%if rs("kucun")>0 then%>
有贷
<%else%>
缺货
<%end if%>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%rs.close
set rs=nothing%>
</td>
</tr>
</table>
<%
end sub
sub activity()
'if request.cookies("cnhww")("username")="" or request.cookies("cnhww")("reglx")=1 then 'Vip用户才可以看到
if request.cookies("cnhww")("username")=""then
response.Redirect "user.asp"
response.End
end if
%>
<table width=570 border=1 align=center cellpadding=0 cellspacing=0 bordercolor="#FFCC00">
<tr>
<td bgcolor="#FFFFEE" bordercolor="#FFFFEE">
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<%set rs=server.createobject("adodb.recordset")
rs.open "select viphd from wq_config ",conn,1,1
response.write rs("viphd")
rs.close
set rs=nothing
%>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
end sub
sub favorites()
if request.cookies("cnhww")("username")="" then
response.Redirect "user.asp"
response.End
end if
%>
<script language="JavaScript">
<!--
var newWindow = null
function windowOpener(loadpos)
{
newWindow = window.open(loadpos,'newwindow','width=450,height=350,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');
newWindow.focus();
}
//-->
</script>
<table width=570 border=0 align=center cellpadding=2 cellspacing=2><tr>
<td width=7% > </td>
<td width=93% valign=baseline>
<div align=right>您最多可以收藏十种商品</div></td></tr></table>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select wq_action.actionid,wq_action.bookid,wq_books.bookname,wq_books.shichangjia,wq_books.huiyuanjia,wq_books.vipjia,wq_books.dazhe from wq_books inner join wq_action on wq_books.bookid=wq_action.bookid where wq_action.username='"&request.cookies("cnhww")("username")&"' and wq_action.zhuangtai=6",conn,1,1
%>
<table width=570 border=0 align=center cellpadding=1 cellspacing=1 bgcolor=#FFCC00>
<form action="score_cart.asp" target="newwindow" method=post name=form1 onsubmit="windowOpener('')">
<tr bgcolor="#FFECA2">
<td width=8% height="22">
<div align=center><font color="#666666">选择</font></div>
</td>
<td width=42% height="22">
<div align=center><font color="#666666">商品名称</font></div>
</td>
<td width=14% height="22">
<div align=center><font color="#666666">市场价</font></div>
</td>
<td width=14% height="22">
<div align=center><font color="#666666">会员价</font></div>
</td>
<td width=14% height="22">
<div align=center><font color="#666666">VIP 价</font></div>
</td>
<td width=8% height="22">
<div align=center><font color="#666666">删除</font></div>
</td>
</tr>
<%do while not rs.eof%>
<tr bgcolor="#FFFFEE">
<td height="22">
<div align=center>
<input name=bookid type=checkbox checked value="<%=rs("bookid")%>" >
</div>
</td>
<td STYLE='PADDING-LEFT: 5px' height="22">
<div align=left><a href=list.asp?id=<%=rs("bookid")%> target=_blank><%=rs("bookname")%></a></div>
</td>
<td height="22">
<div align=center><s><%=rs("shichangjia")%></s>元</div>
</td>
<td height="22">
<div align=center><font color=#dd6600><%=rs("huiyuanjia")%>元</font></div>
</td>
<td height="22">
<div align=center><%if Request.Cookies("cnhww")("reglx")=2 then%><%=trim(rs("Vipjia"))%>元<%else%><font color="#FF9999">更优惠！</font><%end if%></font></div>
</td>
<td height="22">
<div align=center><a href=favorites.asp?action=del&actionid=<%=rs("actionid")%>&ll=1><img src=images/trash.gif width=15 height=17 border=0></a></div>
</td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
<tr bgcolor="#FFFFEE">
<td height=25 colspan=6>
<div align="center">
<input name="imageField" type="image" src="images/gwc.gif" width="70" height="19" border="0" onFocus="this.blur()">
</div>
</td>
</tr>
</form>
</table>
<%
end sub
sub savepass()
if request.cookies("cnhww")("username")="" then
response.Redirect "user.asp"
response.End
end if
%>
<script language=JavaScript>
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function passcheck()
{
if(document.userpass.userpassword.value.length < 5 || document.userpass.userpassword.value.length >20) {
document.userpass.userpassword.focus();
alert("密码应在5位到20位之间，请重新输入！");
return false;
}
if(document.userpass.userpassword.value!==document.userpass.userpassword2.value) {
document.userpass.userpassword.focus();
alert("对不起，两次密码输入不一样！");
return false;
}
if(checkspace(document.userpass.quesion.value)) {
document.userpass.quesion.focus();
alert("对不起，请填写密码提问！");
return false;
}
}
</script>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [wq_user] where username='"&request.cookies("cnhww")("username")&"' ",conn,1,1
%>
<table width=570 border=0 align=center cellpadding=1 cellspacing=1 bgcolor=#FFFFFF>
<form name="userpass" method="post" action="saveuserinfo.asp?action=savepass">
<tr>
<td bgcolor=#ffffff colspan=2> </td>
</tr>
<tr>
<td height=22 bgcolor=#ffffff>
<div align="right">用 户 名： </div>
</td>
<td height=22 bgcolor=#ffffff><font color=#FF6600><%=request.cookies("cnhww")("username")%></font></td>
</tr>
<tr>
<td height=22 bgcolor=#ffffff>
<div align="right">新 密 码： </div>
</td>
<td height=22 bgcolor=#ffffff>
<input name=userpassword type=password value="" size="10">
</td>
</tr>
<tr>
<td height=22 bgcolor=#ffffff>
<div align="right">密码确认： </div>
</td>
<td height=22 bgcolor=#ffffff>
<input name=userpassword2 type=password value="" size="10">
</td>
</tr>
<tr>
<td height=22 bgcolor=#ffffff>
<div align="right">密码提问： </div>
</td>
<td height=22 bgcolor=#ffffff>
<input name=quesion type=text value="<%=trim(rs("quesion"))%>">
<font color="#FF0000">*</font> </td>
</tr>
<tr>
<td height=22 bgcolor=#ffffff>
<div align="right">密码答案： </div>
</td>
<td height=22 bgcolor=#ffffff>
<input name=answer type=text value="" size="18">
(不修改请为空) </td>
</tr>
<tr align="center">
<td height=25 bgcolor=#ffffff colspan="2">
<div align="center">
<input type=image border=0 name=submit2 src=images/bc.gif width=54 height=18 onclick='return passcheck();'>
</div>
</td>
</tr>
</form>
</table>
<%rs.close
set rs=nothing
end sub
sub mydata()
if request.cookies("cnhww")("username")="" then
response.Redirect "user.asp"
response.End
end if
%>
<script language=JavaScript>
<%dim sql,i,j
set rs_s=server.createobject("adodb.recordset")
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -