📄 listzt.asp
字号:
<!--
┌─9911.com.cn────────────┐
│ 动感购物 WWW.9911.com.cn 版权所有 │
│ 动感购物2005Vb 联系：web@snsn.net │
└───────────9911.com.cn──┘
-->
<!--#include file="../conn.asp"-->
<!--#include file="../webconfig.asp"-->
<!--#include file="../fuction.asp" -->
<!--#include file="webconfig.asp"-->
<html>
<head>
<title><%=webname%>--商品专题</title>
<link rel="SHORTCUT ICON" href="/shortcut.ico">
<meta name="generator" content="snsn-shop">
<meta name=keywords content="<%=webgjz%>">
<meta name="description" content="<%=webmx%>">
<meta name="MSSmartTagsPreventParsing" content="TRUE">
<meta http-equiv="MSThemeCompatible" content="Yes">
<link href="/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
.style2 {color: #0000FF}
.style4 {font-size: 18px}
-->
</style>
</head>
<script language=javascript>
function change_size(strt)
{
var font_size=14;
switch (strt)
{
case 'big':
font_size=16;
break;
case 'normal':
font_size=14;
break;
case 'small':
font_size=12;
break;
}
document.all.remark_view.style.fontSize=font_size+'px';
}
</script>
<body leftmargin=0 topmargin=0 marginwidth="0" marginheight="0"><!-- onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜欢本站,别忘了把本站介绍给您的好友哦！：）';return true">-->
<!--#include file="../webtop.asp"-->
<table width="940" align="center" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="6" colspan="3"></td>
</tr>
<tr>
<td width="17"><img src="/img/index_1.gif" width="15" height="16"></td>
<td valign="bottom">您现在的位置是：<a href="<%=weburl%>"><%=webname%></a> -> <a href="index.asp">商品专题</a> -> 查看专题</td>
<td valign="bottom"> </td>
</tr>
<tr>
<td height="6" colspan="3"></td>
</tr>
</table>
<table width="945" border="0" align="center" cellpadding="0" cellspacing="0">
<tr valign="top">
<td width="200"><!--#include file="zhuanti_left.asp"--></td>
<td><table width="730" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"> <%=infod5%> </div></td>
</tr>
</table><%set rs=server.createobject("adodb.recordset")
if Not isChkInteger(request("id")) then
%>
<script language=javascript>
alert("参数错误！");
window.close();
</script>
<%
response.end
end if
if request.QueryString("action")="next" then
rs.open "select top 1 * from shop_zhuanti where newsid < "&nosql(request.QueryString("id")),conn,1,3
elseif request.QueryString("action")="Previous" then
rs.open "select top 1 * from shop_zhuanti where newsid > "&nosql(request.QueryString("id")),conn,1,3
else
rs.open "select * From shop_zhuanti where newsid="&nosql(request("id")),conn,1,3
end if
if rs.EOF or rs.bof then
response.write"<SCRIPT language=JavaScript>alert('对不起，已经到顶了！');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
if rs.recordcount=0 then
%>
<script language='javascript'>alert('专题调用错误，请返回！');window.location.href='index.asp';</script>
<%
end if
if rs("iuser")=1 and session("username")="" then
response.write"<SCRIPT language=JavaScript>alert('对不起，该专题为会员可见请登录后查看！');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
xid=trim(rs("newsid"))
title=trim(rs("title"))
UpdateTime=trim(rs("UpdateTime"))
News_Content=rs("Content")
'News_Content=replace(News_Content,"uploadpic/","/uploadpic/")
if trim(rs("titlecolor"))<>"" then
titlecolor=trim(rs("titlecolor"))
else
titlecolor="#003399"
end if
if trim(rs("titlesize"))<>"" then
titlesize=trim(rs("titlesize"))
else
titlesize="5"
end if
if trim(rs("titleface"))<>"" then
titleface=trim(rs("titleface"))
else
titleface="楷体_GB2312"
end if
if trim(rs("titletype"))<>"" then
titletype=trim(rs("titletype"))
else
titletype="b"
end if
iname=trim(rs("iname"))
iuser=trim(rs("iuser"))
ipic=trim(rs("ipic"))
itop=trim(rs("itop"))
itj=trim(rs("itj"))
hot=trim(rs("hot"))
rs("hot")=rs("hot")+1
rs.update
rs.Close
set rs=nothing
%>
<!--#include file="top.asp"-->
<br>
<table width="95%" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td height=30 valign=bottom bordercolor=#FFFFFF><span class="style4"><font color="<%=flzhzt%>">
<%
tmp_center="<strong><font face="&titleface&" size="&titlesize&" color="&titlecolor&">"
if titletype="0" then
tmp_center=tmp_center&title
end if
if titletype="1" then
tmp_center=tmp_center&"<b><i>"&title&"</i></b>"
end if
if titletype="b" then
tmp_center=tmp_center&"<b>"&title&"</b>"
end if
if titletype="i" then
tmp_center=tmp_center&"<i>"&title&"</i>"
end if
if titletype="u" then
tmp_center=tmp_center&"<u>"&title&"</u>"
end if
tmp_center=tmp_center&"</font></strong>"&VbCrLf
response.write tmp_center
%>
</font><font color="<%=flzhzt%>">
</font></span>
<%if ipic=0 then%>
<img src="../img/img.gif" width="13" height="13">
<%end if%>
<%if itop=0 then%>
<font color="#FF0000">顶</font>
<%end if%>
<%if itj=0 then%>
<span class="style2">荐</span>
<%end if%></td>
</tr><tr>
<td height="1" bgcolor="#CCCCCC"></td>
</tr><tr>
<td height="35">发布人：<%=iname%> 发布时间：<%=year(UpdateTime)&"年"&month(UpdateTime)&"月"&day(UpdateTime)&"日"%> 此新闻已被浏览 <font color=red><%=hot%></font> 次
</td>
</tr>
<tr>
<td><%if infod6="" then%><font id=remark_view>
<%=Replace(HtmlSelfEnCode(News_Content),chr(13),"<br><br> ")%></font> </td>
</tr>
<tr>
<td colspan="2" align="left" class="lh15"><%else%>
<table border=0 cellspacing=0 cellpadding=0 align=right>
<tr>
<td> <%=infod6%> </td>
</tr>
</table>
<font id=remark_view><%=Replace(HtmlSelfEnCode(News_Content),chr(13),"<br><br> ")%></font> </td>
<%end if%></tr>
<tr>
<tr>
<td height="1" bgcolor="#cccccc"></td>
</tr>
<tr>
<td height="32" valign="bottom" bgcolor="#FFFFFF"> 【<a href='javascript:window.close()'>关闭窗口</a>】·【<a href="javascript:;" onclick="javascript:change_size('big');">大</a> <a href="javascript:;" onclick="javascript:change_size('normal');">中</a> <a href="javascript:;" onclick="javascript:change_size('small');">小</a>】·【<a href="#" onClick="javascript:window.open('tj.asp?id=<%=xid%>','pingluntj','width=325,height=200,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=no')">推荐给我的好友</a>】·【<a href="javascript:;" onclick="javascript:window.print();">打印</a>】·【<a href="#top">顶部</a>】·【<a href="?action=Previous&id=<%=xid%>">上一篇</a>】·【<a href="?action=next&id=<%=xid%>">下一篇</a>】</td>
</tr>
</table>
<p> </p>
<p>
<%
Function HtmlSelfEnCode(content)
TempContent=content
TempContent=replace(TempContent,"<IMG src=","<P align=center><IMG onload='javascript:if(this.width>screen.width-333)this.width=screen.width-333' src=")
HtmlSelfEnCode=TempContent
End Function
%>
</p>
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><div align="center"> <%=infod7%> </div></td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="../copyright.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -