常用的ASPJavaScript代码.docx

13.动网FLASH广告代码:

D27CDB6E-AE6D-11cf-96B8-444553540000"codebase="width="468"height="60">

14.VBS弹出窗口小代码:

msgbox"你还没有注册或登陆论坛","0","精品论坛"

location.href="login.asp"

15.文本提交自动分行

text=replace（text,chr（10）,"
"）

text=replace（text,chr（13）,"
"）

16.关闭子窗口时刷新父窗口

在子窗口

window.opener.location="父窗口页面"

window.close（）

17.关闭子窗口时刷新父窗口

在子窗口代码是：

--

self.opener.location.reload（）;

window.close（）

-->

----特效字------------------------------------------------------

#000088;FILTER:

glow（color=white,strength=1）shadow（color=dddddd,direction=130）;LINE-HEIGHT:

23pt;POSITION:

relative;WIDTH:

100%">***

----清空INPUT且选定---------------------------------------------

onClick="Javascript:

this.value=''"onFocus="this.select（）"onMouseOver="this.focus（）"

----全屏显示页面--------------------------------------------

history.back（）;

chatroom=window.open（"chat.asp","chatroom","toolbar=no,status=no,resizable=yes"）

chatroom.moveTo（0,0）;

chatroom.resizeTo（screen.availWidth,screen.availHeight）;

chatroom.outerWidth=screen.availWidth;

chatroom.outerHeight=screen.availHeight;

------定时关闭窗口------------------------------------------

vartid=null;tid=setTimeout（'window.close（）',300000）;

------右键屏蔽----------------------------------------------

------Boom!

Boom!

页------------------------------------------

while（true）{window.open（"bomb.htm","","fullscreen=yes,Status=no,scrollbars=no,resizable=no"）;}

---------图片重新设置按钮---------------------------------------

functionmyreset（）

{document.login.reset（）;

document.login.focus（）;}

1.将彻底屏蔽鼠标右键

oncontextmenu="window.event.returnValue=false"

no

2.取消选取、防止复制

3.不准粘贴onpaste="returnfalse"

4.防止复制oncopy="returnfalse;"oncut="returnfalse;"

5.IE地址栏前换成自己的图标

6.可以在收藏夹中显示出你的图标

7.关闭输入法

disabled">

8.永远都会带着框架

--

if（window==top）top.location.href="frames.htm";//frames.htm为框架网页

//-->

9.防止被人frame

--

if（top.location!

=self.location）top.location=self.location;

//-->

10.网页将不能被另存为

11.

onclick="window.location='view-source:

'+'

12.怎样通过asp的手段来检查来访者是否用了代理

<%ifRequest.ServerVariables（"HTTP_X_FORWARDED_FOR"）<>""then

response.write"您通过了代理服务器，"&_

"真实的IP为"&Request.ServerVariables（"HTTP_X_FORWARDED_FOR"）

endif

%>

13.取得控件的绝对位置

//Javascript

functiongetIE（e）{

vart=e.offsetTop;

varl=e.offsetLeft;

while（e=e.offsetParent）{

t+=e.offsetTop;

l+=e.offsetLeft;

}

alert（"top="+t+"\nleft="+l）;

}

//VBScript

--

functiongetIE（）

dimt,l,a,b

seta=document.all.img1

t=document.all.img1.offsetTop

l=document.all.img1.offsetLeft

whilea.tagName<>"BODY"

seta=a.offsetParent

t=t+a.offsetTop

l=l+a.offsetLeft

wend

msgbox"top="&t&chr（13）&"left="&l,64,"得到控件的位置"

endfunction

-->

14.光标是停在文本框文字的最后

functioncc（）

{

vare=event.srcElement;

varr=e.createTextRange（）;

r.moveStart（'character',e.value.length）;

r.collapse（true）;

r.select（）;

}

15.判断上一页的来源

asp:

request.servervariables（"HTTP_REFERER"）

javascript:

document.referrer

16.最小化、最大化、关闭窗口

ADB880A6-D8FF-11CF-9377-00AA003B7A11">

ADB880A6-D8FF-11CF-9377-00AA003B7A11">

adb880a6-d8ff-11cf-9377-00aa003b7a11">

本例适用于IE

将你的网站设为浏览器的首页

只要在页面适当位置加入如下语句，并将“

将你的网站添加到收藏夹

window.external.Addfavorite（'

将你的网站添加到频道

首先,你要制作自己的频道文件,然后在网页中加入以下语句,并将“

window.external.addChannel（'

查看上一页/下一页

在页面适当位置加入以下语句,可以进行页面的切换.

history.back（）">上一页

history.forward（）">下一页

定时转向页面

在页面内加入以下语句,并将“

其中,content="5;中的5为停顿时间（5秒）.

窗口的打开/关闭

在页面内加入以下语句,并将“打开一个页面的同时弹出一窗口,并在一分钟后自动关闭.

varnewWin=***********（",menu=no,resizable=no,width=400,height=300"）

if（newWin）{

setTimeout（'newWin.close（）;',60000）

}

其中,（'newWin.close（）;',60000）中的60000为等候时间（60秒）,单位为毫秒.若不想自动关闭，请将以下语句删除：

if（newWin）{

setTimeout（'newWin.close（）;',60000）

}

当前窗口的关闭

只要在页面适当位置加入如下语句.

window.close（）">关闭窗口

在状态栏中显示文字链接的说明

搜狐

当鼠标指向搜狐这一链接时，在状态栏中将显示“优秀的中文搜索引擎”信息，鼠标移走，状态栏中的信息清空。

取消文字链接的下划线

在页面内加入以下语句,所有页面上的文字链接的下划线都取消。

当鼠标指向链接时，下划线（红色）才显示（Netscape没有此功能）。

a{text-transform:

none;text-decoration:

none;}

a:

hover{text-decoration:

underline;color:

red;}

保护你的页面不被它人放在框架中

为了保护你的页面，请在页面内加入以下语句.

if（self!

=top）{top.location=self.location;}

改变行距

在页面内加入以下语句,所有以

开头以

P{line-height:

150%}

在页面如下设置：

这是第一行

这是第二行

文本框自动滚动条：

1solid#000000;background-color:

white;font-size:

9pt;width:

188;overflow:

auto"wrap=hard>

背景全屏

functionmakeIm（）{

NS4=（document.layers）;

IE4=（document.all）;

scaleWidth=true;

scaleHeight=true;

imSRC="image/200263164930.jpg";

if（NS4）{

origWidth=innerWidth;

origHeight=innerHeight;}

functionreDo（）{

if（innerWidth!

=origWidth||innerHeight!

=origHeight）

location.reload（）;}

if（NS4）onres