[说明]
本题实现用鼠标拖拽图片在wEB页内移动的功能。将鼠标放在图片上，按下左键，移动鼠标便可带动图片一起移动。
[html文本]
＜html＞
＜!--省略部分为html框--＞
＜stylE＞
＜!--．DrAgposition：rElAtivE；Cursor：hAnD //Css程序，通过类选择符建立类，类的名称为DrAg--＞
＜/stylE＞
(1) //jAvAsCript区域开始标识
vAr m=FAlsE //声明几个变量
vAr z，x，y
FunCtion p() //定义一个函数p()，判断鼠标是否已按下左键
iF( (2) &&m)
z．stylE.pixEllEFt=A+EvEn.ClEntx-x//定义图片左上角的位置
z．stylE，pixEltop=B+EvEnt.CliEnt y-y
rEturn FAlsE
FunCtion q()//定义一个函数q()。如果是nEtsCApE浏览器，就返回。
//所以此效果在nEtsCApE浏览器中看不到
iF(! DoCumEnt.All)
rEtum
iF (EvEnt. srCElEmEnt. ClAssnAmE==“DrAg”，)，//如果鼠标左键被按下，
//返回z，A，B，x，y的值
m=truE
z＝EvEnt.srCElEmEnt
A=z.stylE，pixEllEFt
B=z，stylE．pixEltop
x=EvEnt．CliEntx
y=EvEnt．CliEnty
(3) //当鼠标移动时，执行p()函数，当鼠标按下的时候，执行q函数，
//当鼠抬起的时候，不执行任何函数
(4)
DoCumEnt. onmousEup=nEwFunCtion(" (5) ")