other.asp

来自「打开目录ads文件夹 找到top_ads.js文件 用记事本打开后就可以」· ASP 代码 · 共 27 行

ASP
27
字号
<!--#include file="inc/St_conn.asp"-->
<!--#include file="admin/config.asp"-->
<!--#include file="inc/St_syssub.asp"-->
<!--#include file="inc/St_function.asp"-->
<!--#include file="inc/St_sysbody.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from St_other where id="&request.querystring("id")
rs.open sql,conn,1,1
title=""&rs("title")&""
rs.close
set rs=nothing
loadhead
response.write"<table border=""0""  cellspacing=""0"" cellpadding=""0"" align=""center"" class=""dabg""><tr><td class=""left""></td><td class=""width""><table width=""100%"" border=""0""  cellspacing=""0"" cellpadding=""0""><tr><td valign=""top"" align=""center"">"& vbCrLf
set rs=server.CreateObject("adodb.recordset")
sql="select * from St_other where id="&request.querystring("id")
rs.open sql,conn,1,1
shotantop="当前位置:本站首页-频道栏目-"&rs("title")&""
titletop ""&shotantop&"",100,4,0,"","","",0
response.write"<div style=""line-height:150%;padding:5px"">"&rs("content")&"</div>"& vbCrLf
titlebom 4
response.write"</td></tr></table>"& vbCrLf
br
response.write"</td><td class=right></td></tr></table>"& vbCrLf
rs.close
set rs=nothing
foot%>

⌨️ 快捷键说明

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