show_cgal.asp

北京商务网

<%@ codepage ="936" %>
<!--#include file="../conn/dbconn1.asp"-->
<script language="JavaScript" src="../inc/move.js"></script>
<LINK href="css/Style.css" rel=stylesheet type=text/css>
<STYLE type=text/css>
<!--
td { font-family: "宋体"; font-size: 9pt; line-height: 14pt; }
-->
</STYLE>
<script language="javascript">
function show_sader(mylink)
{
window.open(mylink,'','top=50,left=50,width=500,height=480,scrollbars=no')
}
</script>
<%
dim newsid
dim hits
newsid=request("newsid")
hits=request("hits")
dim sql
dim rs
set rs=server.createobject("adodb.recordset")
sql1="update cgal set hits=hits+1 where newsid="+cstr(newsid)+"" 
rs.open sql1,conn,1,1
%>
<%
sql="select * from cgal where newsid="+cstr(newsid)+" order by newsID desc"
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
if rs.eof and rs.bof then 
response.write "<p align='center'>对不起，没有您要查询的信息</p>" 
else 
showContent
rs.close 
end if 
set rs=nothing
conn.close
set conn=nothing 
sub showContent
%>
<title><%=rs("newstitle")%></title>
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="550" id="AutoNumber1">
<tr>
<td width="100%">
<p align="center">
<iframe src="../adshj/Ad.asp" width=482 height=62 border=0 frameborder=0 framespacing=0 marginheight=1 marginwidth=1 noResize scrolling=no vspace="0" name="I1"></iframe>
</td>
</tr>
</table>
<table border="0" cellPadding="0" cellSpacing="0" align=center>
<tr>
<td valign="top">
<table border="0" cellPadding="0" cellSpacing="1" width="550" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td align="center" bgcolor="#EEF7FF"><br><b>
<span style="background-color: #EEF7FF">
<font color="#FF6600" class="f12">
<span style="font-size: 10.5pt"><%=rs("newstitle")%></span></font><font color="#FF9B00" class="f12"><br>
</font>
</span></b><font color="gray">(发布日期：<%=rs("Date")%>)</font><font color="#FF0000">&nbsp; </font>
<font color="#808080">浏览人数：</font><font color="#FF0000"><%=rs("hits")%></font></td>
</tr>
<tr>
<TD background=../images/bg_b.gif style="color: #000; font-family: 宋体; font-size: 12px; line-height:100%" bgcolor="#EEF7FF" height="1"><IMG 
height=1 src="" width=1></TD>
</tr>
<tr><td align="cneter" bgcolor="#EEF7FF"></td></tr>
<tr>
<td align="left" class="lh13" bgcolor="#EEF7FF">
<div align="center">
<center>
<table border="0" cellpadding="2" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" width="98%" id="AutoNumber2">
<tr>
<td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=Replace(rs("content"),chr(13),"<br><br>&nbsp;&nbsp;&nbsp;")%></td>
</tr>
</table>
</center>
</div>
</td>
</tr>
<tr>
<TD background=../images/bg_b.gif style="color: #000; font-family: 宋体; font-size: 12px; line-height:100%" bgcolor="#EEF7FF"><IMG 
height=1 src="" width=1></TD>
</tr>
<tr>
<td height="20" width="302" bgcolor="#EEF7FF"></td>
</tr>
<tr>
<td align="right" bgcolor="#EEF7FF"><a href="sendmail.asp?newsid=<%=rs("newsid")%>">
<img border="0" src="../pict/emailtofriend.gif" alt="把本篇文章推荐给我的好友"></a>&nbsp;&nbsp;&nbsp;&nbsp;<a href="javascript:window.print();"><img border="0" src="../pict/print.gif" alt="打印本篇文章"></a>&nbsp;&nbsp;&nbsp;&nbsp;<a href="javascript:window.close()"><img border="0" src="../pict/back1.gif" alt="关闭窗口"></td>
</tr>
</table>
</td>
</tr>
</table>
<%
end sub
%>