www.gusucode.com > 绿色环保工作企业网站源码程序 > VideoNews.asp
<!--#Include File="inc/Check_Sql.asp"-->
<!--#include file="inc/conn.asp"-->
<!-- #include file="inc/config.asp" -->
<!--#include file="inc/Function.asp"-->
<!-- #include file="Head.asp" -->
<%owen=request("id")%>
<script language="JavaScript" type="text/JavaScript">
function fontZoom(size){
document.getElementById('fontZoom').style.fontSize=size+'px'
}
</SCRIPT>
<SCRIPT language=JavaScript>
var currentpos,timer;
function initialize()
{
timer=setInterval("scrollwindow()",50);
}
function sc(){
clearInterval(timer);
}
function scrollwindow()
{
currentpos=document.body.scrollTop;
window.scroll(0,++currentpos);
if (currentpos != document.body.scrollTop)
sc();
}
document.onmousedown=sc
document.ondblclick=initialize
</SCRIPT>
<%
id=cstr(request("id"))
Set rsnews=Server.CreateObject("ADODB.RecordSet")
sql="update news set hits=hits+1 where id="&id
conn.execute sql
sql="select * from news where id="&owen
rsnews.Open sql,conn,1,1
title=rsnews("title")
if rsnews.eof and rsnews.bof then
response.Write("数据库出错")
else
%>
<TABLE width=1002 height="291" border=0 align=center cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD width=210 align="center" vAlign=top><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=40 src="imgbly/lt9.gif" width=210></TD>
</TR>
<TR>
<TD align=center><TABLE
style="BORDER-RIGHT: #e9e9e9 1px solid; BORDER-TOP: #e9e9e9 1px solid; BORDER-LEFT: #e9e9e9 1px solid; BORDER-BOTTOM: #e9e9e9 1px solid"
cellSpacing=0 cellPadding=0 width=178 border=0>
<TBODY>
<TR>
<TD height=15> </TD>
</TR>
<TR>
<TD><TABLE cellSpacing=0 cellPadding=0 width=162 align=center
border=0>
<TBODY>
<TR>
<TD class=lNav1><a href="NewsClass.asp?BigClass=企业新闻">企业新闻</a></TD>
</TR>
<TR>
<TD height="5"></TD>
</TR>
<TR>
<TD class=lNav1><a href="NewsClass.asp?BigClass=业内资讯">业内资讯</a></TD>
</TR>
<TR>
<TD height="5"></TD>
</TR>
<TR>
<TD class=lNav1><a href="NewsClass.asp?BigClass=技术文档">技术文档</a></TD>
</TR>
<TR>
<TD height="5"></TD>
</TR>
<TR>
<TD class=lNav1><a href="NewsClass.asp?BigClass=视频中心">视频中心</a></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD height=15> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
<IMG height=40 src="imgbly/lt2.gif" width=210>
<TABLE
style="BORDER-RIGHT: #e9e9e9 1px solid; BORDER-TOP: #e9e9e9 1px solid; BORDER-LEFT: #e9e9e9 1px solid; BORDER-BOTTOM: #e9e9e9 1px solid"
cellSpacing=0 cellPadding=0 width=178 border=0>
<TBODY>
<TR>
<TD height=10></TD>
</TR>
<TR>
<TD><table width="178" border="0" cellpadding="0" cellspacing="0">
<form name="form1" method="get" action="News_search.asp">
<tr>
<td height="30" align="center"><input type="text" name="key" size="19" class="input">
</td>
</tr>
<tr>
<td height="30" align="center"><select name="otype" class="input">
<option value="title" selected class="input">新闻标题</option>
<option value="msg" class="input">新闻内容</option>
</select>
<input type="submit" name="Submit" value="搜索" class="input"></td>
</tr>
</form>
</table></TD>
</TR>
<TR>
<TD height=10></TD>
</TR>
</TBODY>
</TABLE></TD>
<TD style="BACKGROUND: url(imgbly/bg_body.gif) repeat-y 50% top" vAlign=top><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD background=imgbly/bg_rt.gif><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG src="imgbly/rt12.gif" width="209" height=41></TD>
<TD> </TD>
<TD class=loc
style="BACKGROUND: url(img/bg_rtjiao.gif) no-repeat right 50%; COLOR: #9f9f9f"
align=right>你现在的位置：<A href="index.asp">首页</A> > <A href="about.asp">新闻中心</A> </TD>
</TR>
</TBODY>
</TABLE></TD>
<TD width=17> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width=17 height=26> </TD>
<TD> </TD>
<TD width=17> </TD>
</TR>
<TR>
<TD> </TD>
<TD align="center" style="LINE-HEIGHT: 24px"><table Class=border width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="804" valign="top"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="50" colspan="2" align="center" class="tit"><%= rsnews("title") %></td>
</tr>
<tr align="center">
<td width="20%" height="30" class="tit" style="BORDER-RIGHT: #e9e9e9 1px solid; BORDER-TOP: #e9e9e9 1px solid; BORDER-LEFT: #e9e9e9 1px solid; BORDER-BOTTOM: #e9e9e9 1px solid" >双击自动滚屏</td>
<td width="80%" style="BORDER-RIGHT: #e9e9e9 1px solid; BORDER-TOP: #e9e9e9 1px solid; BORDER-LEFT: #e9e9e9 1px solid; BORDER-BOTTOM: #e9e9e9 1px solid" >发布者：<%= rsnews("user") %> 发布时间：<%= rsnews("AddDate") %> 阅读：<font color="#FF0000"><%= rsnews("hits") %></font>次 【字体：<A class=black href="javascript:fontZoom(16)">大</A> <A class=black href="javascript:fontZoom(14)">中</A> <A class=black href="javascript:fontZoom(12)">小</A>】</td>
</tr>
<tr>
<td colspan="2" align="center" class=black id=fontzoom><br>
<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="240" height="180">
<param name="movie" value="flash/vcastr2.swf">
<param name="quality" value="high">
<param name="FlashVars" value="vcastr_file=<%=rsnews("content") %>" />
<embed src="flash/vcastr2.swf?" FlashVars="vcastr_file=<%=rsnews("content") %>" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="240" height="180"></embed>
</object> </td>
</tr>
<tr align="right">
<td colspan="2"> </td>
</tr>
<tr align="right">
<td colspan="2"> </td>
</tr>
<%
end if
rsnews.close
set rsnews=nothing
%>
</table>
<br>
<table width="95%" height="30" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="right"><a href="javascript:window.print()">打印本页</a> || <a href="javascript:window.close()">关闭窗口</a></td>
</tr>
</table></td>
</tr>
</table></TD>
<TD> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="inc/foot.asp"-->