friend.asp
来自「本源代码为 网雷弹窗联盟程序的源代码,欢迎大家的下载,学习与交流」· ASP 代码 · 共 47 行
ASP
47 行
<html>
<!--#include file="head.asp"-->
<title><%=NetName%> - 合作伙伴</title>
<body>
<!--#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="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>
<!--#include file="foot.asp"-->
</body>
</html>
<%
Function ShowContent ()
sql="select Friend from Content"
set rs=conn.execute (sql)
if not rs.eof then
response.write rs("Friend")
rs.close
end if
End Function
%>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?