常用js代码大全2常用js代码大全2二，高级应用（一）????????? 页面跳转： window.location.href(地址) win
常用js代码大全2
常用js代码大全2
二，高级应用（一）
????????? 页面跳转：
window.location.href('地址') window.open('地址', '_self')打开新窗口： window.open('地址', '_blank') 只显示地址栏：window.open('地址', 'title', 'location=1, height=200, width=500') 只显示状态栏：window.open('地址', 'title', 'status=1') 只显示工具栏：window.open('地址', 'title', 'toolbar=1') 只显示菜单栏：window.open('地址', 'title', 'menubar=1') 一个不少：window.open('地址', 'title) 光棍但可以调整大小：window.open('地址', 'title', 'resizable=1')去掉所有空格： Object.replace(/^\s+|\s+$/g, "")屏蔽鼠标： ncontextmenu="window.event.returnValue=false"取消选取： nselectstart="return false"不允许粘贴： npaste="return false"关闭输入法： <input style="ime-mode:disabled">不允许另存为： <noscript><iframe. src=*.html></iframe></noscript>得到上一页来源： document.referrer弹出窗口总在最上： <body >弹出确认对话框： comfirm('文本')" <script>if(confirm('文本')){//确定}else{//取消}回车转换Tab键： if(window.event.keyCode==13){event.keyCode=9}返回上一页： history.go(-1)重新加载页面： window.location.reload()子页面中调父页面中的方法： window.opener.function()子页面中访问父页面中名为name的控件值： window.opener.name.value子页面中访问父页面中表单中名为name的控件值： window.opener.formName.nam.value得到控件的绝对位置： function getIE() {
var t = e.offsetTop;
var l = e.offsetLeft;
while (e = e.offsetParent) {
t += e.offsetTop;
l += e.offsetLeft;
}
alert("top=" + t + " and left=" + l);
}光标停在文本框文字的最后： function toEnd() {
var e = event.srcElement;
var r = e.createTextRange();
r.moveStart("character", e.value.length);
r.collapse(true);
r.select();
}
<input type="text" value="end" >屏蔽功能键(Shift, Alt, Ctrl) function testKey() {
if (event.shiftKey) { // altKey; ctrlKey
alert("Shift");
}
}不要滚动条： <body scroll="no">让竖条没有： <body style="overflow:scroll; overflow-y: hidden">让横条没有： <body style="overflow:scroll; overflow-x: hidden">去掉图片链接点击后图片周围的虚线： <a href="#" ><img src="test.jpg"></a>在子窗体中刷新父窗体： window.opener.location.reload()设置打开窗口的大小： <body 100)">设置打开窗口的位置： <body 100)">得到窗体大小： document.body.clientWidth; document.body.clientHeight;TEXTAREA自适应文字行数： <textarea rows="1" cols="17" npropertychange="this.style.posHeight=this.scrollHeight></textarea>屏蔽脚本错误： function killErrors() {
return true;
}
window.onerror=killErrors();判断是否是字符： if (/[^/x00-/xff]/g.test(str)) {
alert("有汉字");
} else {
alert("全是字符");
}?screen.属性： availHeight 获取系统屏幕的工作区域高度，排除 Microsoft® Windows® 任务栏。 availWidth 获取系统屏幕的工作区域宽度，排除 Windows 任务栏。 bufferDepth 设置或获取用于画面外位图缓冲颜色的每像素位数。 colorDepth 获取用于目标设置或缓冲区的颜色每像素位数。 deviceXDPI 设置或获取系统屏幕水平每英寸点数(DPI)的数值。 deviceYDPI 设置或获取系统屏幕垂直每英寸点数(DPI)的数值。 fontSmoothingEnabled 获取用户是否在控制面板的显示设置中启用了圆整屏幕字体边角的选项。 height 获取屏幕的垂直分辨率。 logicalXDPI 获取系统屏幕水平每英寸点数(DPI)的常规数值。 logicalYDPI 获取系统屏幕垂直每英寸点数(DPI)的常规数值。 updateInterval 设置或获取屏幕的更新间隔。 width 获取屏幕的垂直分辨率。?得到div的height值： div.offsetHeight(带滚动条的完整高度) div.clientHeight(内容的高度)
//各种尺寸?
s??+=??"\r\n网页可见区域宽："+??document.body.clientWidth;? ?
s??+=??"\r\n网页可见区域高："+??document.body.clientHeight;? ?
s??+=??"\r\n网页可见区域高："+??document.body.offsetWeight??+"??(包括边线的宽)";? ?
s??+=??"\r\n网页可见区域高："+??document.body.offsetHeight??+"??(包括边线的宽)";? ?
s??+=??"\r\n网页正文全文宽："+??document.body.scrollWidth;? ?
s??+=??"\r\n网页正文全文高："+??document.body.scrollHeight;? ?
s??+=??"\r\n网页被卷去的高："+??document.body.scrollTop;? ?
s??+=??"\r\n网页被卷去的左："+??document.body.scrollLeft;? ?
s??+=??"\r\n网页正文部分上："+??window.screenTop;? ?
s??+=??"\r\n网页正文部分左："+??window.screenLeft;? ?
s??+=??"\r\n屏幕分辨率的高："+??window.screen.height;? ?
s??+=??"\r\n屏幕分辨率的宽："+??window.screen.width;? ?
s??+=??"\r\n屏幕可用工作区高度："+??window.screen.availHeight;? ?
s??+=??"\r\n屏幕可用工作区宽度："+??window.screen.availWidth;? ?
//过滤数字?
<input type=text nkeypress="return event.keyCode>=48&&event.keyCode<=57||(this.value.indexOf('.')<0?event.keyCode==46:false)"?onpaste="return !clipboardData.getData('text').match(/\D/)"?ondragenter="return false">?
//特殊用途?
<input type=button value=导入收藏夹 nclick="window.external.ImportExportFavorites(true,'http://localhost');">?
<input type=button value=导出收藏夹 nclick="window.external.ImportExportFavorites(false,'http://localhost');">?
<input type=button value=整理收藏夹 nclick="window.external.ShowBrowserUI('OrganizeFavorites', null)">?
<input type=button value=语言设置? ?onclick="window.external.ShowBrowserUI('LanguageDialog', null)">?
<input type=button value=加入收藏夹 nclick="window.external.AddFavorite('http://www.google.com/', 'google')">?
<input type=button value=加入到频道 nclick="window.external.addChannel('http://www.google.com/')">?
<input type=button value=加入到频道 nclick="window.external.showBrowserUI('PrivacySettings',null)">?
//不缓存?
<META. HTTP-EQUIV="pragma"?CONTENT="no-cache">?
<META. HTTP-EQUIV="Cache-Control"?CONTENT="no-cache, must-revalidate">?
<META. HTTP-EQUIV="expires"?CONTENT="0">?
//正则匹配?
匹配中文字符的正则表达式： [\u4e00-\u9fa5]?
匹配双字节字符(包括汉字在内)：[^\x00-\xff]?
匹配空行的正则表达式：\n[\s| ]*\r?
匹配HTML标记的正则表达式：/<(.*)>.*<\/\1>|<(.*) \/>/??
匹配首尾空格的正则表达式：(^\s*)|(\s*$)（像vbscript那样的trim函数）?
匹配Email地址的正则表达式：\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*?
匹配网址URL的正则表达式：http://([\w-]+\.)+[\w-]+(/[\w- ./?%&=]*)??
以下是例子：?
利用正则表达式限制网页表单里的文本框输入内容：?
用正则表达式限制只能输入中文：onkeyup="value=value.replace(/[^\u4E00-\u9FA5]/g,'')"onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\u4E00-\u9FA5]/g,''))"?
1.用正则表达式限制只能输入全角字符： nkeyup="value=value.replace(/[^\uFF00-\uFFFF]/g,'')"onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\uFF00-\uFFFF]/g,''))"?
2.用正则表达式限制只能输入数字：onkeyup="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"?
3.用正则表达式限制只能输入数字和英文：onkeyup="value=value.replace(/[\W]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"?
//消除图像工具栏<IMG SRC="mypicture.jpg"?HEIGHT="100px"?WIDTH="100px"GALLERYIMG="false">??
or?
<head>?
<meta. http-equiv="imagetoolbar"?content="no">?
</head>?
//无提示关闭?
function?Close()?
{?
var?ua=navigator.userAgent?
var?ie=navigator.appName=="Microsoft Internet Explorer"?true:false?
if(ie)?
{?
? ?? ?var?IEversion=parseFloat(ua.substring(ua.indexOf("MSIE ")+5,ua.indexOf(";",ua.indexOf("MSIE "))))?
??if(IEversion< 5.5)?
??{?
? ?var?str??= '<object id=noTipClose classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">'?
? ?? ? str += '<param name="Command"?value="Close"></object>';?
? ?? ? document.body.insertAdjacentHTML("beforeEnd", str);?
? ?? ? document.all.noTipClose.Click();?
??}?
? ?? ?else?
??{?
? ?? ? window.opener =null;?
? ?? ? window.close();?
? ?? ?}?
? ?}?
else?
{?
??window.close()?
? ?}?
}?
//取得控件得绝对位置(1)?
<script. language="javascript">??
function?getoffset(e)?
{??
var?t=e.offsetTop;??
var?l=e.offsetLeft;??
while(e=e.offsetParent)?
{??
??t+=e.offsetTop;??
??l+=e.offsetLeft;??
}??
var?rec =?new?Array(1);?
rec[0]??= t;?
rec[1] = l;?
return?rec?
}??
</script>?
//获得控件的绝对位置(2)?
oRect = obj.getBoundingClientRect();?
oRect.left?
oRect.?
//最小化,最大化,关闭<object id=min classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">??
<param name="Command"?value="Minimize"></object>??
<object id=max classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">??
<param name="Command"?value="Maximize"></object>??
<OBJECT id=close classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">??
<PARAM NAME="Command"?value="Close"></OBJECT>??
<input type=button value=最小化 nclick=min.Click()>??
<input type=button value=最大化 nclick=max.Click()>??
<input type=button value=关闭 nclick=close.Click()>??
//光标停在文字最后?
<script. language="javascript">?
function?cc()?
{?
var?e = event.srcElement;?
var?r =e.createTextRange();?
r.moveStart('character',e.value.length);?
r.collapse(true);?
r.select();?
}?
</script>?
<input type=text name=text1 value="123"?onfocus="cc()">?
//页面进入和退出的特效?
进入页面<meta. http-equiv="Page-Enter"?content="revealTrans(duration=x, transition=y)">?
推出页面<meta. http-equiv="Page-Exit"?content="revealTrans(duration=x, transition=y)">??
这个是页面被载入和调出时的一些特效。duration表示特效的持续时间，以秒为单位。transition表示使?
用哪种特效，取值为1-23:?
0 矩形缩小??
1 矩形扩大??
2 圆形缩小?
3 圆形扩大??
4 下到上刷新??
5 上到下刷新?
6 左到右刷新??
7 右到左刷新??
8 竖百叶窗?
9 横百叶窗??
10 错位横百叶窗??
11 错位竖百叶窗?
12 点扩散??
13 左右到中间刷新??
14 中间到左右刷新?
15 中间到上下?
16 上下到中间??
17 右下到左上?
18 右上到左下??
19 左上到右下??
20 左下到右上?
21 横条??
22 竖条??
23??
//网页是否被检索?<meta. name="ROBOTS"?content="属性值">?
其中属性值有以下一些:?
属性值为"all": 文件将被检索，且页上链接可被查询；?
属性值为"none": 文件不被检索，而且不查询页上的链接；?
属性值为"index": 文件将被检索；?
属性值为"follow": 查询页上的链接；?
属性值为"noindex": 文件不检索，但可被查询链接；?
属性值为"nofollow":??
//打印分页?<p??style="page-break-after:always">page1</p>? ?
<p??style="page-break-after:always">page2</p>? ?
//设置打印?
<object id="factory"?style="display:none"?viewastext?
??classid="clsid:1663ed61-23eb-11d2-b92f-008048fdd814"?
??codebase="http://www.meadroid.com/scriptx/ScriptX.cab#Version=5,60,0,360"?
></object>?
<input type=button value=页面设置 nclick="factory.printing.PageSetup()">?
<input type=button value=打印预览 nclick="factory.printing.Preview()">
??
<script. language=javascript>?
function?window.onload()?
{?
? ?// -- advanced features?
? ?factory.printing.SetMarginMeasure(2)?// measure margins in inches?
? ?factory.printing.SetPageRange(false, 1, 3)?// need pages from 1 to 3?
? ?factory.printing.printer =?"HP DeskJet 870C"?
? ?factory.printing.copies = 2?
? ?factory.printing.collate = true?
? ?factory.printing.paperSize =?"A4"?
? ?factory.printing.paperSource =?"Manual feed"?
? ?// -- basic features?
? ?factory.printing.header =?"居左显示&b居中显示&b居右显示页码，第&p页/共&P页"?
? ?factory.printing.footer =?"（自定义页脚）"?
? ?factory.printing.portrait = false?
? ?factory.printing.leftMargin = 0.75?
? ?factory.printing.topMargin = 1.5?
? ?factory.printing.rightMargin = 0.75?
? ?factory.printing.bottomMargin = 1.5?
}?
function?Print(frame) {?
??factory.printing.Print(true, frame)?// print with prompt?
}?
</script>?
<input type=button value="打印本页"onclick="factory.printing.Print(false)">?
<input type=button value="页面设置"onclick="factory.printing.PageSetup()">?
<input type=button value="打印预览"onclick="factory.printing.Preview()"><br>?
<a href="http://www.meadroid.com/scriptx/docs/printdoc.htm?static"??target=_blank>具体使用手册，更多信息，点这里</a>?
//自带的打印预览?
WebBrowser.ExecWB(1,1) 打开??
Web.ExecWB(2,1) 关闭现在所有的IE窗口，并打开一个新窗口??
Web.ExecWB(4,1) 保存网页??
Web.ExecWB(6,1) 打印??
Web.ExecWB(7,1) 打印预览??
Web.ExecWB(8,1) 打印页面设置??
Web.ExecWB(10,1) 查看页面属性??
Web.ExecWB(15,1) 好像是撤销，有待确认??
Web.ExecWB(17,1) 全选??
Web.ExecWB(22,1) 刷新??
Web.ExecWB(45,1) 关闭窗体无提示??
<style. media=print>??
.Noprint{display:none;}<!--用本样式在打印时隐藏非打印项目-->??
.PageNext{page-break-after: always;}<!--控制分页-->??
</style>??
<object??id="WebBrowser"??width=0??height=0??classid="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2">? ???
</object>? ???
??
<center class="Noprint"?>?
<input type=button value=打印 nclick=document.all.WebBrowser.ExecWB(6,1)>??
<input type=button value=直接打印 nclick=document.all.WebBrowser.ExecWB(6,6)>??
<input type=button value=页面设置 nclick=document.all.WebBrowser.ExecWB(8,1)>??
</p>??
<p> <input type=button value=打印预览 nclick=document.all.WebBrowser.ExecWB(7,1)>??
</center>?
//去掉打印时的页眉页脚?
<script??language="JavaScript">? ?
var?HKEY_Root,HKEY_Path,HKEY_Key;?
HKEY_Root="HKEY_CURRENT_USER";?
HKEY_Path="\\Software\\Microsoft\\Internet Explorer\\PageSetup\";?
//设置网页打印的页眉页脚为空?
function?PageSetup_Null()?
{?
try?
{?
??var?Wsh=new?ActiveXObject("WScript.Shell");?
??HKEY_Key="header";?
??Wsh.RegWrite(HKEY_Root+HKEY_Path+HKEY_Key,"");?
??HKEY_Key="footer";?
??Wsh.RegWrite(HKEY_Root+HKEY_Path+HKEY_Key,"");?
}?
catch(e){}?
}?
//设置网页打印的页眉页脚为默认值?
function??PageSetup_Default()?
{? ?
try?
{?
??var?Wsh=new?ActiveXObject("WScript.Shell");?
??HKEY_Key="header";?
??Wsh.RegWrite(HKEY_Root+HKEY_Path+HKEY_Key,"&w&b页码,&p/&P");?
??HKEY_Key="footer";?
??Wsh.RegWrite(HKEY_Root+HKEY_Path+HKEY_Key,"&u&b&d");?
}?
catch(e){}?
}?
</script>?
<input type="button"?value="清空页码"?onclick=PageSetup_Null()>?
<input type="button"?value="恢复页码"?onclick=PageSetup_Default()>?
//浏览器验证?
function?checkBrowser()?
{??
? ?this.ver=navigator.appVersion??
? ?this.dom=document.getElementById?1:0??
? ?this.ie6=(this.ver.indexOf("MSIE 6")>-1 &&?this.dom)?1:0;??
? ?this.ie5=(this.ver.indexOf("MSIE 5")>-1 &&?this.dom)?1:0;??
? ?this.ie4=(document.all && !this.dom)?1:0;??
? ?this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;??
? ?this.ns4=(document.layers && !this.dom)?1:0;??
? ?this.mac=(this.ver.indexOf('Mac') > -1) ?1:0;??
? ?this.ope=(navigator.userAgent.indexOf('Opera')>-1);??
? ?this.ie=(this.ie6 ||?this.ie5 ||?this.ie4)??
? ?this.ns=(this.ns4 ||?this.ns5)??
? ?this.bw=(this.ie6 ||?this.ie5 ||?this.ie4 ||?this.ns5 ||?this.ns4 ||?this.mac ||?this.ope)??
? ?this.nbw=(!this.bw)??
? ?return?this;?
}?
//计算内容宽和高<SCRIPT??language="javascript">? ?
function??test(obj)? ?
{? ?
? ?? ??var??range??=??obj.createTextRange();? ?
? ?? ? alert("内容区宽度:??"??+??range.boundingWidth?
?????????????+??"px\r\n内容区高度:??"??+??range.boundingHeight??+??"px");???
}? ?
</SCRIPT>? ?
<BODY>? ?
<Textarea id="txt"height="150">sdf</textarea><INPUT??type="button"??value="计算内容宽度"??onClick="test(txt)">? ?
</BODY>?
//无模式的提示框?function?modelessAlert(Msg)?
{?
? ?window.showModelessDialog("javascript.:alert(""+escape(Msg)+"");window.close();","","status:no;resizable:no;help:no;dialogHeight:height:30px;dialogHeight:40px;");?
}?
//屏蔽按键?
<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;?
??}?
? ???/* 注：这还不是真正地屏蔽 Alt+ 方向键，?
? ???因为 Alt+ 方向键弹出警告框时，按住 Alt 键不放，?
? ???用鼠标点掉警告框，这种屏蔽方法就失效了。以后若?
? ???有哪位高手有真正屏蔽 Alt 键的方法，请告知。*/?
??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' nmousedown=MouseDown(this) nmousemove=MouseMove() nmouseup=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();?
? ? bj=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>?
//刷新后不变的文本框?<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>?
//访问剪贴板?
event.dataTransfer.setData("URL", oImage.src);?
sImageURL = event.dataTransfer.getData("URL")?
(2)普通访问?
window.clipboardData.setData("Text",oSource.innerText);?
window.clipboardData.getData("Text");?
//操作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.split("=");?
??if?(sName == aCrumb[0])??
??return?unescape(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 =?"argu["?+ i +?"]";?
var?r;?
eval("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;?
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("下载完成.");?
}?
//检验连接是否有效?
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 Req = 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=完成
