⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 other.asp

📁 gdflsdf fkspofql owjlfkjsoijdf sdjfo
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="sub/config.asp"-->
<!--#include file="sub/conn.asp"-->
<% 
id=Request("id")
if id<>"" then
sql="select * from other where id="&id&"" 
    set rs=server.createobject("adodb.recordset")
   rs.open sql,cn,1,1
   %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=Sitename%>-<%=rs("title")%></title>
<link href="index.css" rel="stylesheet" type="text/css" />
</head>
<body>
<!--#include file="top.asp"-->
<table width="780" height="4" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td background="images/index_11.gif"></td>
  </tr>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="30" class="menuD"><img src="images/userlogin.gif" width="200" height="30" /></td>
    <td height="30" colspan="3" valign="bottom" class="menuD">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=rs("title")%></td>
  </tr>
  <tr>
    <td align="center" valign="top" bgcolor="#EEFFFF">
	  <table width="175" border="0" cellspacing="0" cellpadding="0">
	    <tr>
	      <td align="center">
	        <% '当用户在线不显示登录表单
if session("userlogin")="" then%>
	        <form id="form1" name="form1" method="post" action="usermg.asp">
	          用户名:
	          <label>
              <input name="name" type="text" class="Input" id="name" size="12" maxlength="16" />
              </label>
	          
	          <p>密__码:
	            <label>
                <input name="pwd" type="password" class="Input" id="pwd" size="12" maxlength="16" />
                </label>
              </p>
          <p>
            <label>
              <input name="Submit" type="button" class="Input" onClick="MM_goToURL('parent','reg.asp');return document.MM_returnValue" value="注册联盟用户" />
              </label>
            <label>&nbsp;
              <input name="Submit2" type="submit" class="Input" value="进入" />
            </label> </form>
		    <%else 
   dim userid,rs1,sql1
  userid = Session("id")
  set rs1=server.createobject("adodb.recordset")   '创建纪录集
  sql1="select * from ax_user where id="&userid&" " '查找用户信息
  rs1.open sql1,cn,1,2
  %>
	        <table width="175" border="0" cellspacing="0" cellpadding="0">
	          <tr>
	            <td height="20" colspan="2">尊敬的<%=rs1("name")%>您好!</td>
    </tr>
	          <tr>
	            <td width="90" height="20" class="xuxian"><a href="userinfo.asp">信息修改</a></td>
      <td height="20" class="xuxian" ><a href="userunion.asp">登记工作室</a></td>
    </tr>
	          <tr>
	            <td width="80"  height="25" class="xuxian"><a href="gbook.asp">在线留言</a></td>
	 <td class="xuxian"><a href="link.asp">友情链接</a></td>
    </tr>
	          <tr>
	            <td height="20" class="xuxian">绑定论坛用户</td>
      <td height="20" class="xuxian"><a href="userout.asp">安全退出</a></td>
    </tr>
  </table>
     <% end if%>	 </td>
	   </tr>
      </table></td>
    <td width="20" valign="top">&nbsp;</td>
    <td width="540" valign="top">
	<%=RS("content")%>
    <p>&nbsp;</p></td>
    <td width="20" valign="top">&nbsp;</td>
  </tr>
</table>
<%
end if%>
<!--#include file="bottom.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -