📄 trtctj.asp

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

💻 ASP

字号:

<html>
<!--#include file="head.asp"-->
<!--#include file="UserSession.asp"-->
<title><%=NetName%> - 弹入弹出统计</title>
<body>
<%
sql="select * from Users where Id="&cint(session("Id"))
set rs=conn.execute (sql)
if not rs.eof then
	uname=rs("UserName")
	email=rs("Email")
	qq=rs("QQ")
	sitename=rs("SiteName")
	siteurl=rs("SiteUrl")
	outtype=rs("OutType")
	intype=rs("InType")

	sitetype=rs("SiteType")
	sxid=rs("SxId")
	
	outpop=rs("OutPop")
	inpop=rs("InPop")
	remainpop=rs("RemainPop")
	
	rs.close
end if
%>
<!--#include file="toper.asp"-->
<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 align=left><br>
        <%ShowMenu%>
        <BR></td>
  </tr>
</table>
<table cellspacing="0" cellpadding="0" width="500" align="center" border="0">
	<form name="f" onSubmit="return xxg_modify()" action="modify.asp?action=modify" method="post">
		<tr>
			<td style="line-height:200%">
			<%=ShowContent%><br>
			<table width="90%" border="0" align="right" cellpadding="0" cellspacing="0">
              <tr>
                <td>
				站点名称：<%=sitename%><BR>
				站点地址：<A href="<%=siteurl%>" target=_blank><%=siteurl%></A><BR>
				站点状态：<FONT color=cc0000><%=Session("Flag")%></FONT><BR>
				站长昵称：<%=uname%> <BR>
				交换方式: <%=Session("OutType")%> <BR>
				积分模式: <%=Session("InType")%> <BR>
				弹出流量: <%=outpop%> <BR>
				弹入流量: <%=inpop%> <BR>
				<SPAN class=red>剩余流量: <%=remainpop%> </span></td>
              </tr>
            </table>
		</td>
		</tr>
	</form>
</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 trtctj from Notice"
	set rs=conn.execute (sql)
	if not rs.eof then
		response.write rs(0)
		rs.close
	end if
End Function
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -