<%if request.cookies("godbook")("username")="" and request.cookies("godbook")("shjianame")="" then%>
<table width=100% border=0 align=center cellpadding=0 cellspacing=0>
<tr>
<td height="35" bgcolor="f1f1f1" background="../images/menu_01.gif"></td>
</tr>
<tr> 
<td height="100"> 
<div align=center> 
<SCRIPT LANGUAGE="JavaScript">
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}

  function checkuu()
{
    if(checkspace(document.userlogin.username.value)) {
	document.userlogin.username.focus();
    alert("用戶名不能為空！");
	return false;
  }
    if(checkspace(document.userlogin.userpassword.value)) {
	document.userlogin.userpassword.focus();
    alert("密碼不能為空！");
	return false;
  }
	
  }
</script>
<table width="95%" border="0" cellspacing="0" cellpadding="1" align="center">
<form name="userlogin" method="post" action="../checkuserlogin.asp">
<tr> 
<td align="center">用戶名： 
<input type="text" class=wenbenkuang name="username" size="14">
</td>
</tr>
<tr> 
<td align="center">密　碼： 
<input type="password" class=wenbenkuang name="userpassword" size="14">
</td>
</tr>
<tr> 
<td align="center">驗證碼： 
<input class=wenbenkuang name=verifycode type=text value="<%If GetCode=9999 Then Response.Write "9999"%>" maxLength=4 size=6>
<img src=../GetCode.asp>
</td>
</tr>
<tr> 
<td align="center"> 
<INPUT class=go-wenbenkuang name="imageField" value="登 陸" type=submit onFocus="this.blur()"> 
<INPUT class=go-wenbenkuang onclick="window.location='../reg.asp'" type=reset value="注 冊" name=Submit2> 
<INPUT class=go-wenbenkuang onclick="window.location='../getpwd.asp'" type=button value="忘 密" name=Submit3> 
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="35" bgcolor="f1f1f1" background="../images/menu_15.gif"></td>
</tr>
<%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%>
<tr><td height="24" class="table-xia" width="85%">　<%response.write "<a class=a4 href=../list.asp?id="&rs("bookid")&" target=_blank>"
				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>"
				%>
</td>
</tr>
<%rs.movenext
	wend
	rs.close
	%>
</table>
<br>
<%end if%>