鼠标拖动整个网页

人气：　来源：本站原创　作者：佚名　所属栏目：鼠标类　[切换到繁體中文]

介绍：类似看图软件中的小手工能，大图片网页比较合适。

演示：

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312" />
<title>站长手册_特效演示_鼠标拖动整个网页</title>
<style><!--body,td{font-size: 12px;}--></style>
<SCRIPT language=JavaScript>
<!--
var scrollcount=0;
var dragy;

var scrollarrowtop;

function initdrag() {
scrollcount=1;
dragy=event.clientY;
document.body.setCapture();
}

function startdrag() {
if (scrollcount==1) {
window.scrollBy(0,dragy-event.clientY);
document.body.style.cursor='hand';
dragy=event.clientY;
}
}

function enddrag() {
document.body.style.cursor='';
scrollcount=0;
document.body.releaseCapture();
}



// -->
</SCRIPT>
</head>
<body bgcolor="" onmouseup="enddrag()" onmousemove="startdrag()" onselectstart="return false;" onmousedown="initdrag()">
<table width="100%" height="1000" border="0" cellpadding="10" cellspacing="5">
<tr>
<td valign="top">

</td>
</tr>
</table>
</body>
</html>

[Ctrl+A全选提示：你可先修改部分代码，再按运行]

下面教你如何应用此特效：
　--------------------------------------------------------------------------------------
　　需要在<body 这里>加入的代码：onmouseup="enddrag()" onmousemove="startdrag()" onselectstart="return false;" onmousedown="initdrag()"
　--------------------------------------------------------------------------------------

以下代码加到<head>…</head>中

以下代码加到<body>…</body>中

<SCRIPT language=JavaScript>
<!--
var scrollcount=0;
var dragy;

var scrollarrowtop;

function initdrag() {
scrollcount=1;
dragy=event.clientY;
document.body.setCapture();
}

function startdrag() {
if (scrollcount==1) {
window.scrollBy(0,dragy-event.clientY);
document.body.style.cursor='hand';
dragy=event.clientY;
}
}

function enddrag() {
document.body.style.cursor='';
scrollcount=0;
document.body.releaseCapture();
}

// -->
</SCRIPT>