日期:2014-05-17 浏览次数:21561 次
<!--#Include File="inc/Check_Sql.asp"-->
<!--#include file="inc/conn.asp"-->
<!-- #include file="inc/config.asp" -->
<!--#include file="inc/Function.asp"-->
<%owen=request("id")%>
<!--------------------读数据库放前面,要放到head.asp前面------------------------------->
<%
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
%>
<!-- #include file="Head.asp" -->
<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()a
{
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>