lianjie.asp
来自「一个WAP导航程序！动态友链！好东西！而且后台安全性很强」· ASP 代码 · 共 63 行
ASP
63 行
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %>
<%Response.ContentType = "text/vnd.wap.wml; charset=utf-8"%>
<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<!--#include file="conn.asp"-->
<!--#include file="const.asp" -->
<!--#include file="char.asp"-->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql ="SELECT * From wapqita where id="&request("id")
RS.open sql,Conn,1,1
lassid=rs("lassid")
title=rs("title")
hits=rs("hits")
hits_to=rs("hits_to")
title_quan=rs("title_quan")
jianjie=rs("jianjie")
content=rs("content")
set rs = server.createobject("adodb.recordset")
sql="select * from class where id="&lassid&""
rs.open sql,conn,1,1
if not rs.eof then
class_name=rs("name")
end if
set rs = server.createobject("adodb.recordset")
sql="select * from shezhi where id=1"
rs.open sql,conn,1,1
if not rs.eof then
mulu=rs("mulu")
end if
%>
<wml>
<head>
<meta http-equiv='Cache-Control' content='no-Cache'/>
<meta http-equiv='Cache-Control' content='max-age=0'/>
</head>
<card id='main' title='站点简介' >
<p>
网站名称：<a href='lianjie_to.asp?id=<%=request("id")%>'><%=title_quan%></a>
<br/>所属分类：<a href='fenlei.asp?id=<%=lassid%>'><%=class_name%></a>
<br/>站点简介：<%=jianjie%>
<br/>站点地址：<%=content%>
<br/><a href='lianjie_to.asp?id=<%=request("id")%>'>马上访问</a>
<%if session("admin")="" then%><br/>
<%else%>
<br/>*<!--#INCLUDE VIRTUAL="/gg/gg.asp"-->
*<!--#INCLUDE VIRTUAL="/gg/gg.asp"-->
--------------
<br/>连入次数：<%=hits%>‖连出次数<%=hits_to%>
<br/><a href='admin/lianjie_gai.asp?id=<%=request("id")%>'>修改</a>‖
<a href='admin/lianjie_shan.asp?id=<%=request("id")%>'>删除</a>‖
<br/>站点回连地址：<%=url%>/<%=mulu%>main.asp?id=<%=request("id")%>
<br/>--------------
<%end if%>
<br/><a href='fenlei.asp?id=<%=lassid%>'>返回上一级</a>
<br/><a href='index.asp'>返回首页</a>
<br/><a href='http://wap.62book.com'>返回书香首页</a>
</p>
</card>
</wml> ⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?