user_left.asp

功能介绍： 一、会员功能模块 1、站内短信发布(设计中) 2、书架收藏夹 3、发表评论(功能不完善) 4、申请作家(与添书员整合) 5、申请添书员(与作家整合) 6、申请更新员

<%
UserID=CheckSql(request.cookies("CnEndWeb_User")("log_UserID"))
UserName=CheckSql(request.cookies("CnEndWeb_User")("log_UserName"))
If UserName="" or UserID="" or IsNull(UserID) Then
	Response.Write ("<script>alert(' CnEndWeb（终点）提醒： \n\n 可能您还没有登陆或者登陆超时 \n\n 如果您没有成为会员请先进行会员注册 \n\n 如果您已经是注册会员请重新登陆 ');location.href='user_log.asp?info=in';</script>")
	Response.End
End If
set rsu=server.createobject("adodb.recordset")
sql="select ID,Name,LockUser,GOGXuser from [Userinfo] where ID="&UserID&""
rsu.open sql,conn,1,1
if rsu.eof and rsu.bof then
	Response.Write ("<script>alert(' CnEndWeb（终点）提醒： \n\n 用户不存在。');history.back();</script>")
	Response.end
End If
if rsu("LockUser")=1 then
	Response.Write ("<script>alert(' CnEndWeb（终点）提醒： \n\n 用户被锁定。');history.back();</script>")
	Response.end
End If
GOGXuser=rsu("GOGXuser")
UserID=rsu("ID")
UserName=rsu("Name")
%>
<table cellspacing="1" cellpadding="4" width="98%" border="0" align="center">
	<tr align="middle">
		<td><a href="User_index.asp?info=index"><font color="#1A53FF">控制中心</font></a></td>
	</tr>
	<tr align="middle">
		<td><a href="user_index.asp?info=box"><font color="#1A53FF">我的收藏</font></a></td>
	</tr>
	<tr align="middle">
		<td><a href="user_index.asp?info=pm"><font color="#1A53FF">我的短信</font></a></td>
	</tr>
	<%if GOGXuser=1 then %>
	<tr align="middle">
		<td><a href="user_book.asp?info=book_list"><font color="#1A53FF">更新章节</font></a></td>
	</tr>
	<% end if%>
	<tr align="middle">
		<td><a href="user_bookroom.asp"><font color="#1A53FF">我的文集</font></a></td>
	</tr>
	<tr align="middle">
		<td><a href="user_index.asp?info=profile"><font color="#1A53FF">修改资料</font></a></td>
	</tr>
	<tr align="middle">
		<td><a href="user_log.asp?info=out"><font color="#1A53FF">退出登录</font></a></td>
	</tr>
</table>
<table width="98%" height="90" border="0" cellpadding="4" cellspacing="1" align="center">
	<form name="form3" action="user_search.asp" method="post">
		<tr>
			<td class="head">&nbsp;&nbsp; <font color="#FFFFFF">输入书友昵称：</font> </td>
		</tr>
		<tr align="center">
			<td>
			<input name="nickname" type="text" class="but2" id="nickname" size="16"></td>
		</tr>
		<tr align="center">
			<td><input type="submit" name="Submit5" value="搜索"></td>
		</tr>
	</form>
</table>
<%rsu.close
set rsu=nothing%>