📄 usermx.asp

📁 1.拼客信息发布 2.在线报名 3.群组讨论 4.程序简单易用,基本设置都有后台设置,不需要专业的知识就可以建立一个拼客网站 5.其他的直接看演示吧

💻 ASP

字号:

<%
'########################################
'
'XinYou-pK(CMS)(v1.0)拼客内容管理系统
'
'使用过程中,如有问题,请联系QQ:16129825   E-mail:liuxing99@tom.com
'
'演示地址：http://www.XinYou88.net
'
'程序简单易用,基本设置都有后台设置,不需要专业的知识就可以建立一个拼客网站
'
'如有BUG,请通知一声,谢谢!!!
'
'########################################
%>
<!--#include file="inc/config.asp"-->
<!--#include file="usercookies.asp"-->
<%
dim user,urs,usql,ypwd
ypwd=request("ypwd")
user=request.cookies("xinyou88")("user")
set urs=server.CreateObject("adodb.recordset")
usql="select top 1 * from user where name = '"&user&"'"
urs.open usql,conn,1,3
'response.write usql
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="stylesheet" type="text/css">
<meta name="keywords" content="<%=rs("key")%>">
<meta name="author" content="版权所有:XINYOU(QQ:16129825 TEL:0518-5526465)连云港信友科技有限公司,诚接各种网站建设,程序编写!">
<title><%=rs("title")%>-用户面板</title>
<style type="text/css">
<!--
body {
	margin-top: 0px;
}
-->
</style>
</head>
<body>
<% call top() %>
<div align="center">
<table width="980">
      <tr>
	  <!--左侧-->
	  <td width="250" valign="top">
	  <div align="center">
	  <table width="99%">
	  <Tr><td>
	  <table width="100%" class="table">
	  <tr>
	  <td height="30" class="title">基本信息</td>
	  </tr>
	  <tr>
	  <td><li><a href="userj.asp">基本资料</a></li></td>
	  </tr>
	  <tr>
	  <td><li><a href="userm.asp">修改密码</a></li></td>
	  </tr>
	  </table>
	  </td></Tr>
	  	  <Tr><td>
	  <table width="100%" class="table">
	  <tr>
	  <td height="30" class="title">信息管理</td>
	  </tr>
	  <tr>
	  <td><li><a href="fbpk.asp" target="_blank">拼客信息发布</a> | <a href="userp.asp">管理</a></li></td>
	  </tr>
	  <tr>
	  <td><li><a href="fbmm.asp" target="_blank">买卖信息发布</a> | <a href="usermm.asp">管理</a></li></td>
	  </tr>
	  </table>
	  </td></Tr>
	  	  <Tr><td>
	  <table width="100%" class="table">
	  <tr>
	  <td height="30" class="title">圈子管理</td>
	  </tr>
	  <tr>
	  <td><li><a href="userjl.asp">我建立的圈子</a></li></td>
	  </tr>
	  <tr>
	  <td><li><a href="userjr.asp">我加入的圈子</a></li></td>
	  </tr>
	  </table>
	  </td></Tr>
	  	  <Tr><td>
	  <table width="100%" class="table">
	  <tr>
	  <td height="30" class="title"><a href="login.asp?action=out">安全退出</a></td>
	  </tr>
	  </table>
	  </td></Tr>
	  </table>
	  </div>	  </td>
	  <!--左侧结束-->
	  <!--中部-->
	  <Td width="720" align="center" valign="top"><div align="center">
	  <table width="100%" align="center">
	  <tr><td>
	  <table width="100%" class="table" >
	  <tr>
	    <td height="30" class="title" ><div align="center">修改密码</div></td>
	  </tr>
	  <tr>
	  <Td>
	    <div align="center">
	        <% if urs("pwd")<>ypwd then
	   Response.Write "<script language='javascript'>alert('密码不对,请重新修改!');history.back();</script>" 
	   else
	   urs("pwd")=request("xpwd")
	   urs.update
	   Response.Write "<script language='javascript'>alert('修改成功!');</script>" 
       response.write "<meta http-equiv=refresh content=""0;URL=user.asp"">"
	   end if%>  
	      </div></Td>
	  </tr> 
	  </table>
	  </td></tr>
	  </table>
	  </div></Td>
    </tr>
</table>
</div>
<% call foot() %>
<%
urs.close
set urs=nothing
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -