日期:2014-05-17 浏览次数:21405 次
<!--#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>