JavaScript事件大全3

//无模式的提示框

//屏蔽按键

<title>屏蔽鼠标右键、Ctrl+N、Shift+F10、Alt+F4、F11、F5刷新、退格键</title>

</head>
<body>
<script language="Javascript"><!--

//屏蔽鼠标右键、Ctrl+N、Shift+F10、F11、F5刷新、退格键

//Author: meizz(梅花雨) 2002-6-18
function
document.oncontextmenu(){event.returnValue=false;}//屏蔽鼠标右键
function
window.onhelp(){return
false} //屏蔽F1帮助
function
document.onkeydown()
{
  if
((window.event.altKey)&&

((window.event.keyCode==37)||   //屏蔽
Alt+ 方向键 ←

(window.event.keyCode==39)))   //屏蔽
Alt+ 方向键 →
   {

alert("不准你使用ALT+方向键前进或后退网页！");

event.returnValue=false;
   }

if
((event.keyCode==8)
|| //屏蔽退格删除键

(event.keyCode==116)||                 //屏蔽
F5 刷新键

(event.ctrlKey &&
event.keyCode==82)){ //Ctrl +
R

event.keyCode=0;

event.returnValue=false;

}
  if
(event.keyCode==122){event.keyCode=0;event.returnValue=false;}  //屏蔽F11

if (event.ctrlKey
&& event.keyCode==78)
event.returnValue=false;   //屏蔽
Ctrl+n
  if (event.shiftKey
&&
event.keyCode==121)event.returnValue=false;  //屏蔽
shift+F10
  if (window.event.srcElement.tagName ==
"A"
&& window.event.shiftKey)

window.event.returnValue = false;             //屏蔽
shift 加鼠标左键新开一网页
  if
((window.event.altKey)&&(window.event.keyCode==115))             //屏蔽Alt+F4

{

window.showModelessDialog("about:blank","","dialogWidth:1px;dialogheight:1px");
      return
false;
   }
}
</script>
屏蔽鼠标右键、Ctrl+N、Shift+F10、Alt+F4、F11、F5刷新、退格键
</body>
</html>

//屏蔽打印
<style>
@media print{
* {display:none}
}
</style>

//移动的图层，拖动

1.<span
style='position:absolute;width:200;height:200;background:red'
onmousedown=MouseDown(this)
onmousemove=MouseMove()
onmouseup=MouseUp()>meizz</span>

</div>
<script language="JavaScript" type="text/javascript">
var orgMouseX;
var orgMouseY;
var orgObjX;
var orgObjY;
function doDrag()
{
var
myObject=document.all.myDiv;

var x=event.clientX;
var y=event.clientY;
myObject.style.left=x-(orgMouseX-orgObjX);
myObject.style.top=y-(orgMouseY-orgObjY);

}
function doMouseDown()
{
orgMouseX=event.clientX;
orgMouseY=event.clientY;
orgObjX=parseInt(document.all.myDiv.style.left);
orgObjY=parseInt(document.all.myDiv.style.top);
}

</script>

//文档状态改变

document.all.f.style.height=doc.body.scrollHeight

document.all.f.style.width=doc.body.scrollWidth
}
}
doc.onreadystatechange=s
</script>

//刷新后不变的文本框

//访问剪贴板

//操作COOKIE

function SetCookie(sName, sValue)
{
document.cookie = sName + "=" +
escape(sValue) + "; ";
}
function GetCookie(sName)
{
var aCookie =
document.cookie.split(";
");
for (var i=0; i
< aCookie.length; i++)
{

  var aCrumb = aCookie[i].split("=");
  if (sName == aCrumb[0])
  return (aCrumb[1]);
}

}
function DelCookie(sName)
{
document.cookie = sName + "=" +
escape(sValue) + "; expires=Fri, 31
Dec 1999 23:59:59 GMT;";
}

//setTimeout增加参数

var f = (function(){ fRef.apply(null, argu); });
return _st(f, mDelay);
}
return _st(fRef,mDelay);
}
function test(x){
alert(x);
}
window.setTimeout(test,1000,'fason');
</script>

//自定义的apply,call

Function.prototype.apply = function (obj, argu) {
if (obj)
obj.constructor.prototype._caller = this;
var argus = new Array();
for (var
i=0;i<argu.length;i++)
   argus[i] = "argu[" + i + "]";
var r;
eval_r("r = " + (obj ?
("obj._caller(" +
argus.join(",") + ");") : ("this(" + argus.join(",") + ");")));
return r;
};
Function.prototype.call = function (obj) {
var argu = new Array();
for (var
i=1;i<arguments.length;i++)
   argu[i-1] =
arguments[i];
return this.apply(obj, argu);
};

//下载文件

function
DownURL(strRemoteURL,strLocalURL)
{
try
{
  var xmlHTTP=new ActiveXObject("Microsoft.XMLHTTP");
   xmlHTTP.open("Get",strRemoteURL,false);
   xmlHTTP.send();
  var adodbStream=new ActiveXObject("ADODB.Stream");

adodbStream.Type=1;//1=adTypeBinary

adodbStream.Open();

adodbStream.write(xmlHTTP.responseBody);

adodbStream.SaveToFile(strLocalURL,2);
   adodbStream.Close();
   adodbStream=null;
   xmlHTTP=null;

}
catch(e)
{
   window.confirm("下载URL出错!");
}
//window.confirm("下载完成.");
}

//检验连接是否有效

//组件是否安装
isComponentInstalled("{6B053A4B-A7EC-4D3D-4567-B8FF8A1A5739}",
"componentID"))

//检查网页是否存在

//连接数据库

while(!rs.EOF)
{
shtml += "<tr><td>"
+ rs("au_id") + "</td><td>"
+ rs("au_lname") + "</td><td>"
+ rs("au_fname") + "</td><td>"
+ rs("phone") + "</td><td>"
+ rs("address") + "</td><td>"
+ rs("city") + "</td><td>"
+ rs("state") + "</td><td>"
+ rs("zip") + "</td></tr>";

rs.moveNext;
}
shtml += "</table>";

document.write(shtml);
   rs.close();
   rs = null;
   conn.close();
   conn = null;
</script>

//使用数据岛

times：<input type=text datasrc=#xmldate
DataFLD=times size="76"><BR>

<input id="next"
TYPE=button value="下一条记录>"
onclick="xmldate.recordset.moveNext()">

<input id="last"
TYPE=button value="最后一条记录>>"
onclick="xmldate.recordset.moveLast()">

</infolist>
</XML>
</body>
</html>

//获得参数

<body>
<a href="javascript:location.href=location.href +
'?a=1&b=2'">search</a>

//可编辑SELECT

</select>

</span>

//设置光标位置

function getCaret(textbox)
{
var

function getXML(URL)
{
var xmlhttp = new ActiveXObject("microsoft.xmlhttp");
xmlhttp.Open("GET",URL,
false);
try
{
   xmlhttp.Send();
}
catch(e){}
finally
{
  var result = xmlhttp.responseText;
  if(result)
   {
   if(xmlhttp.Status==200)
    {
    return(true);

}
   else
    {
    return(false);

}
   }
  else
   {
   return(false);
   }
}
}

//POST代替FORM

<SCRIPT language="VBScript">
Function URLEncoding(vstrIn)

strReturn = ""

For i = 1 To Len(vstrIn)

ThisChr = Mid(vStrIn,i,1)

If Abs(Asc(ThisChr)) < &HFF
Then

strReturn = strReturn & ThisChr

Else

innerCode = Asc(ThisChr)

If innerCode < 0 Then

innerCode = innerCode + &H10000

End If

Hight8 = (innerCode   And
&HFF00)/ &HFF

Low8 = innerCode And &HFF

strReturn = strReturn & "%" & Hex(Hight8)
&  "%" & Hex(Low8)

End If

Next

URLEncoding = strReturn
End Function
Function bytes2BSTR(vIn)

strReturn = ""

For i = 1 To LenB(vIn)

ThisCharCode = AscB(MidB(vIn,i,1))

If ThisCharCode < &H80 Then

strReturn = strReturn & Chr(ThisCharCode)

Else

NextCharCode = AscB(MidB(vIn,i+1,1))

strReturn = strReturn & Chr(CLng(ThisCharCode) *
&H100 + CInt(NextCharCode))

i = i + 1

End If

Next

bytes2BSTR = strReturn
End Function
dim strA,oReq
strA = URLEncoding("submit1=Submit&text1=中文")

set oReq = CreateObject("MSXML2.XMLHTTP")
oReq.open "POST","http://ServerName/VDir/TstResult.asp",false

oReq.setRequestHeader "Content-Length",Len(strA)
oReq.setRequestHeader "CONTENT-TYPE","application/x-www-form-urlencoded"
oReq.send strA
msgbox bytes2BSTR(oReq.responseBody)
</SCRIPT>

//readyState是xmlhttp返回数据的进度，0=载入中,1=未初始化,2=已载入,3=运行中,4=完成

(1)拖拽访问
event.dataTransfer.setData("URL", oImage.src);
sImageURL = event.dataTransfer.getData("URL")
(2)普通访问
window.clipboardData.setData("Text",oSource.innerText);
window.clipboardData.getData("Text");

<HTML>
<HEAD>
<META NAME="save" CONTENT="history">
<STYLE>
.sHistory
{behavior:url(#default#savehistory);}
</STYLE>
</HEAD>
<BODY>
<INPUT class="sHistory" type=text
id=oPersistInput>
</BODY>
</HTML>

function
modelessAlert(Msg)
{

window.showModelessDialog("javascript:alert(/""+escape(Msg)+"/");window.close();","","status:no;resizable:no;help:no;dialogHeight:height:30px;dialogHeight:40px;");

}

秒客网

JavaScript事件大全3

相关文章