📄 users.asp

📁 本源代码为网雷弹窗联盟程序的源代码,欢迎大家的下载,学习与交流

💻 ASP

字号:

<html xmlns="http://www.w3.org/1999/xhtml">
<!--#include file="head.asp"-->
<title><%=NetName%> - 典型用户</title>

<body>
<!--#include file="toper.asp"-->
<table width="750" height="10" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td align=left><%
	if Session("Id")<>"" and Session("UserName")<>"" then
	  response.write "<br>"
	  call ShowMenu
	  response.write "<br>"
	end if%></td>
  </tr>
</table>
<table width="500" height="5" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
	<td valign="top"><%ShowContent()%>
	<br>
	</td>
  </tr>
</table>
<table width="750" height="5" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
	<td></td>
  </tr>
</table>
<table width="750" height="5" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
	<td></td>
  </tr>
</table>
<!--#include file="foot.asp"-->
</body>
</html>
<%
Function ShowContent ()
	sql="select Users from Content"
	set rs=conn.execute (sql)
	if not rs.eof then
		response.write rs("Users")
		rs.close
	end if
End Function
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -