📄 anli_show.asp
字号:
<%@ LANGUAGE = VBScript CodePage = 936 LCID=2052%>
<!--#include file="conn.asp"-->
<!--#include file="newsConvert.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=web_name%></title>
<STYLE type=text/css>
TABLE {
FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
BODY {
FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
INPUT {
FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
SELECT {
FONT-FAMILY: "宋体"; FONT-SIZE: 9pt
}
A {
COLOR: #000000; FONT-SIZE: 9pt; LINE-HEIGHT: 1.2; TEXT-DECORATION: none
}
A:active {
FONT-SIZE: 9pt; TEXT-DECORATION: none
}
A:hover {
COLOR: #ff0000; FONT-SIZE: 9pt; TEXT-DECORATION: none
}
.tit {
FONT-SIZE: 16px; FONT-STYLE: normal; FONT-WEIGHT: bold; TEXT-DECORATION: none
}
BODY {
background-image: url(img/id02.gif);
}
TABLE {
LINE-HEIGHT: 16px
}
.style1 {color: #990000}
</STYLE>
</head>
<BODY leftMargin=0 topMargin=0>
<table width="759" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width=6 bgcolor="#FFFFFF"></td>
<td width="774" valign="top" bgcolor="#FFFFFF">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="778" height="208">
<param name="movie" value="1.swf">
<param name="quality" value="High">
<embed src="1.swf" quality="High" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="778" height="208"></embed>
</object>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="170" valign="top" bgcolor="#FFFFFF">
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height=1></TD>
</TR>
<TR>
<TD height=20 vAlign=top width=170><IMG height=20 src="img/left_08.gif" width=170></TD>
</TR>
<TR>
<TD height=128 vAlign=top>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD bgColor=#ffffff height=128 width=170>
<TABLE border=0 cellPadding=0 cellSpacing=0 height=128
width=170>
<TBODY>
<TR>
<TD height=128 vAlign=top width=170><div align="center">
<%
sql="select * from class2"
res.Open sql,con,1,1
if res.eof or res.bof then
response.write "分类不存在！<br>"
else
do while not res.eof
Response.Write(" ")
Response.Write("<a href=anli.asp?Sort_ID="&res("Sort_ID")&">")
Response.Write(""&res("sort")&"</a><br>")
res.movenext
loop
end if
res.close
%>
</div></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD height=20 vAlign=top><IMG height=20 src="img/left_09.gif" width=170></TD>
</TR>
<TR>
<TD height=90 vAlign=top>
<TABLE bgColor=#ffffff border=0 cellPadding=0 cellSpacing=0
width="100%">
<!--DWLayoutTable-->
<TBODY>
<TR>
<TD height=90 width=170>
<FORM action="anli.asp" method=post name="myform">
<DIV align=center>
<CENTER>
<TABLE border=0 cellPadding=0 cellSpacing=0 height=87
width="88%">
<!--DWLayoutTable-->
<TBODY>
<TR vAlign=bottom>
<TD align=right height=25 width=63>
<DIV align=center><FONT color=#000000>分类:</FONT></DIV></TD>
<TD width=92>
<DIV align=left>
<select name="sort_id">
<option selected value="">选择分类</option>
<% sql="select * from class2"
res.open sql,con,1,1
do while not res.eof
%>
<option value="<%=res("sort_id")%>"><%=res("sort")%></option>
<% res.movenext
loop
res.close
%>
</select>
</DIV></TD>
</TR>
<TR vAlign=bottom>
<TD align=right height=31>
<DIV align=center><FONT color=#000000>关键字:</FONT></DIV></TD>
<TD>
<DIV align=left><FONT color=#000000>
<INPUT name=keyword type=text id="keyword" size=12 maxLength=50>
</FONT></DIV></TD>
</TR>
<TR>
<TD align=right></TD>
<TD><input name=B1 type=submit value="搜索"></TD>
</TR>
</TBODY>
</TABLE>
</CENTER>
</DIV>
</FORM></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD height=20 vAlign=top> </TD>
</TR>
</TBODY>
</TABLE></td>
<td width="1" background="img/line_v.gif"></td>
<td><TABLE bgColor=#ffffff border=0 cellPadding=0 cellSpacing=0
width="100%">
<!--DWLayoutTable-->
<TBODY>
<TR>
<TD rowSpan=2 vAlign=top width=10>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<!--DWLayoutTable-->
<TBODY>
<TR>
<TD bgColor=#ffffff height=447
width=10> </TD>
</TR>
</TBODY>
</TABLE></TD>
<TD bgColor=#ffffff colSpan=2 height=42 vAlign=top><img src="img/gongcheng.gif" width="586" height="42"></TD>
<TD width=11> </TD>
</TR>
<TR>
<TD height=405 width=9> </TD>
<TD vAlign=top width=577>
<% sql="select * from anli where id="&request("id")
res.open sql,con,1,3
if not res.eof then
res("click")=res("click")+1
res.update
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" align="center"><strong><%=res("title")%></strong></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td align="center"> 作者： <span class="style1"><%=res("autor")%></span> 加入时间： <span class="style1"><%=res("dateandtime")%></span> 浏览次数：<span class="style1"><%=res("click")%></span></td>
</tr>
</table>
<TABLE cellSpacing=0 cellPadding=0 width=99% border=0>
<TR>
<TD width=10> </TD>
<TD style="LINE-HEIGHT: 16pt"> <span class="unnamed1">
<%if res("pic")<>"" then%>
</span>
<TABLE cellSpacing=0 cellPadding=10 width=227 align=left border=0>
<TBODY>
<TR>
<TD class="unnamed1"><a href="pic/<%=res("pic")%>" target="_blank"><img src="pic/<%=res("pic")%>" width="200" height="180" border="0"></a></TD>
</TR>
<TBODY>
</TBODY>
</TABLE>
<span class="unnamed1">
<%end if
if res("introduce")<>"" then
%>
<%=newsConvert(res("introduce"))%>
<%end if%>
</span></TD>
<TD width=10> </TD>
</TR>
</TABLE>
<P class="unnamed1"><BR>
</P>
<% end if
res.close%>
</TD>
<TD> </TD>
</TR>
</TBODY>
</TABLE></td>
</tr>
</table>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%"><TBODY><TR><TD height=24 vAlign=top background="img/bottom.gif">
<img src="img/bottom.gif" width="778" height="72"></TD>
</TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD bgColor=#ffffff height=31 width=778><DIV align=center>地址：<%=web_address%> 电话：<%=web_tel%> 传真：<%=web_fax%> E-mail：<%=web_email%></DIV></TD>
</TR>
</TBODY>
</TABLE></td>
<td width=19 bgcolor="#FFFFFF"></td>
</tr>
</table>
</body>
</html>
<% con.close
set con=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -