move.asp

来自「北京商务网」· ASP 代码 · 共 15 行

<%@ codepage ="936" %>
<script> 
var currentpos,timer; 
function initialize() 
{timer=setInterval("scrollwindow()",1);} 
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 
function New(para_URL) 
{var URL =new String(para_URL) 
window.open(URL,'','resizable,scrollbars')} 
</SCRIPT>