history.asp

21世纪人才www.51zy.net 网站源码

<%if request.cookies("godbook")("username")="" and request.cookies("godbook")("shjianame")="" then%>
<form name="userlogin" method="post" action="checkuserlogin.asp">
<div id="memberlogin">
<h1>会员登陆</h1>
<label>您好,购买商品请先登录</label>
<label>用户名：</label><input type="text" name="username" />
<label>密　码：</label><input type="password" name="userpassword" />
<label>验证码：</label><input class="verifycode" name="verifycode" type="text" value="<%If GetCode=9999 Then Response.Write "9999"%>" /><img src="getcode.asp" alt="" />
<div class="clear-both">&nbsp;</div>
<div class="margintop2">
<input name="imageField" value="登 陆" type="submit" onfocus="this.blur()" class="btm" />
<input onclick="window.location='reg.asp'" type="reset" value="注 册" name="Submit2" class="btm marginleft" />
<input onclick="window.location='getpwd.asp'" type="button" value="忘 密" name="Submit3" class="btm marginleft" /></div>
<div class="clear-both">&nbsp;</div>
</div>	
</form>
<%else%>
<div id="affiche">
<h1>最近浏览历史</h1>
<ul>
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_his where username='"&request.cookies("godbook")("username")&"' and lx=1 order by ltime desc",conn,1,1
while not rs.eof%>
<li><%response.write "<a href=""list.asp?id="&rs("bookid")&""">"
if len(trim(rs("bookname")))>12 then
response.write left(trim(rs("bookname")),10)&"..."
else
response.write trim(rs("bookname"))
end if
response.write "</a>"%>
</li>
<%rs.movenext
wend
rs.close%>
</ul>
<div class="clear-both">&nbsp;</div>
</div>	
<%end if%>