//无模式的提示框
//屏蔽按键
<html>
<head>
<meta
http-equiv="Content-Type"
content="text/html;
charset=gb2312">
<noscript><meta
http-equiv="refresh"
content="0;url=about:noscript"></noscript>
<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>
<script language=javascript>
var Obj;
function MouseDown(obj)
{
Obj=obj;
Obj.setCapture();
Obj.l=event.x-Obj.style.pixelLeft;
Obj.t=event.y-Obj.style.pixelTop;
}
function MouseMove()
{
if(Obj!=null)
{
Obj.style.left = event.x-Obj.l;
Obj.style.top = event.y-Obj.t;
}
}
function MouseUp()
{
if(Obj!=null)
{
Obj.releaseCapture();
Obj=null;
}
}
</script>
2.
<div id="myDiv"
src="logo.gif"
ondrag="doDrag();"
onmouseover="this.style.cursor=‘hand‘"
style="position:absolute;left=100;top=100;"
onmousedown="doMouseDown();">
<a href="#"
onclick="return
false"><h1>wlecome</h1></a>
</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>
//文档状态改变
<iframe
src="a.html" id="f" name="f" scrolling="no" frameborder=0 marginwidth=0
marginheight=0></iframe>
<script>
var
doc=window.frames["f"].document;
function s(){
if
(doc.readyState=="complete"){
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增加参数
<script>
var _st =
window.setTimeout;
window.setTimeout = function(fRef, mDelay) {
if(typeof fRef == ‘function‘){
var argu = Array.prototype.slice.call(arguments,2);
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"))
//检查网页是否存在
function CheckURL(URL)
{
var xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
xmlhttp.Open("GET",URL, false);
try
{
xmlhttp.Send();
var
result = xmlhttp.status;
}
catch(e) {return(false); }
if(result==200)
{
return
true;
}
xmlhttp = null;
return false;
}
//连接数据库
<script
language="javascript">
//用 JavaScript 写服务器端连接数据库的代码示例
var conn = new ActiveXObject("ADODB.Connection");
conn.Open("Provider=SQLOLEDB.1; Data Source=localhost; User
ID=sa; "
+"Password=; Initial
Catalog=pubs");
var rs = new ActiveXObject("ADODB.Recordset");
var sql="select * from authors";
rs.open(sql, conn);
shtml = "<table
width=‘100%‘ border=1>";
shtml +="<tr
bgcolor=‘#f4f4f4‘><td>au_id</td><td>au_lname</td><td>au_fname</td><td>phone</td><td>address</td><td>
city</td><td>state</td><td>zip</td></tr>";
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>
//使用数据岛
<html>
<body>
srno：<input type=text datasrc=#xmldate DataFLD=srno
size="76"><BR>
times：<input type=text datasrc=#xmldate
DataFLD=times size="76"><BR>
<input id="first" TYPE=button value="<< 第一条记录"
onclick="xmldate.recordset.moveFirst()">
<input id="prev"
TYPE=button value="<上一条记录"
onclick="xmldate.recordset.movePrevious()">
<input id="next"
TYPE=button value="下一条记录>"
onclick="xmldate.recordset.moveNext()">
<input id="last"
TYPE=button value="最后一条记录>>"
onclick="xmldate.recordset.moveLast()">
<input id="Add"
TYPE=button value="添加新记录"
onclick="xmldate.recordset.addNew()">
<XML ID="xmldate">
<infolist>
<info
><srno>20041025-01</srno><times>null</times></info>
<info
><srno>20041101-09</srno><times>2004年10月1日2点22分0秒</times></info>
</infolist>
</XML>
</body>
</html>
//获得参数
<body>
<a href=
"javascript:location.href=location.href +
‘?a=1&b=2‘">search</a>
<script language="JavaScript">
<!--
var a =
location.search.substr(1);
if(a.length>0)
{
var re =
/([^&]*?)/=([^&]*)/g
var s = a.match(re);
for(var i=
0;i<s.length;i++)
{
alert(s[i]);
alert(s[i].split("=")[1]);
}
}
//-->
</script>
</body>//可编辑SELECT
<input type=text name=re_name style="width:100px;height:21px;font-size:10pt;"><span
style="width:18px;border:0px solid
red;"><select
name="r00" style="margin-left:-100px;width:118px;
background-color:#FFEEEE;" onChange="document.all.re_name.value=this.value;">
<option value="1">11111111<option>
<option value="2">222222</option>
<option value="3">333333</option>
</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;");
}
