特效代码收集……_ by 野汉子（转落伍，供大家伙学习）(页 1) - 电脑手机数码 - 石家庄论坛 -sjzbbs.com,石家庄论坛,交友,民生关注,体育健身,聚会,

跟我一起狂 发表于 2006-3-26 13:58

特效代码收集……_ by 野汉子（转落伍，供大家伙学习）

滚动条

CODE:[Copy to clipboard]1．overflow内容溢出时的设置（设定被设定对象是否显示滚动条）
overflow-x水平方向内容溢出时的设置
overflow-y垂直方向内容溢出时的设置
以上三个属性设置的值为visible(默认值)、scroll、hidden、auto。

2．scrollbar-3d-light-color立体滚动条亮边的颜色（设置滚动条的颜色）
scrollbar-arrow-color上下按钮上三角箭头的颜色
scrollbar-base-color滚动条的基本颜色
scrollbar-dark-shadow-color立体滚动条强阴影的颜色
scrollbar-face-color立体滚动条凸出部分的颜色
scrollbar-highlight-color滚动条空白部分的颜色
scrollbar-shadow-color立体滚动条阴影的颜色

我们通过几个实例来讲解上述的样式属性：
1.让浏览器窗口永远都不出现滚动条
没有水平滚动条
<body style="overflow-x:hidden">
没有垂直滚动条
<body style="overflow-y:hidden">
没有滚动条
<body style="overflow-x:hidden;overflow-y:hidden">或<body
style="overflow:hidden">

2.设定多行文本框的滚动条

没有水平滚动条
<textarea style="overflow-x:hidden"></textarea>

没有垂直滚动条
<textarea style="overflow-y:hidden"></textarea>

没有滚动条
<textarea style="overflow-x:hidden;overflow-y:hidden"></textarea>
或<textarea style="overflow:hidden"></textarea>

3.设定窗口滚动条的颜色
设置窗口滚动条的颜色为红色<body style="scrollbar-base-color:red">
scrollbar-base-color设定的是基本色，一般情况下只需要设置这一个属性就可以达到改变滚动条颜色的目的。
加上一点特别的效果：
<body style="scrollbar-arrow-color:yellow;scrollbar-base-color:lightsalmon">

4.在样式表文件中定义好一个类，调用样式表。
<style>
.coolscrollbar{scrollbar-arrow-color:yellow;scrollbar-base-color:lightsalmon;}
</style>
这样调用：
<textarea class="coolscrollbar"></textarea>
无边框窗口代码
制作无边框页面的代码

CODE:[Copy to clipboard]//第一步:把如下代码加入<head></head>区域中
<script language=javascript>
minimizebar="minimize.gif"; //视窗右上角最小化「按钮」的图片
minimizebar2="minimize2.gif"; //滑鼠悬停时最小化「按钮」的图片
closebar="close.gif"; //视窗右上角关闭「按钮」的图片
closebar2="close2.gif"; //滑鼠悬停时关闭「按钮」的图片
icon="icon.gif"; //视窗左上角的小图标

function noBorderWin(fileName,w,h,titleBg,moveBg,titleColor,titleWord,scr) //定义一个弹出无边视窗的函数，能数意义见下面「参数说明」，实际使用见最後的实例。
/*
------------------参数说明-------------------
fileName ：无边视窗中显示的文件。
w　　　　：视窗的宽度。
h　　　　：视窗的高度。
titleBg ：视窗「标题栏」的背景色以及视窗边框颜色。
moveBg ：视窗拖动时「标题栏」的背景色以及视窗边框颜色。
titleColor ：视窗「标题栏」文字的颜色。
titleWord ：视窗「标题栏」的文字。
scr ：是否出现卷轴。取值yes/no或者1/0。
--------------------------------------------
*/
{
var contents="<html>"+
"<head>"+
"<title>"+titleWord+"</title>"+
"<META http-equiv=\"Content-Type\" content=\"text/html; charset=gb2312\">"+
"<object id=hhctrl type='application/x-oleobject' classid='clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11'><param name='Command' value='minimize'></object>"+
"</head>"+
"<body topmargin=0 leftmargin=0 scroll=no onselectstart='return false' ondragstart='return false'>"+
" <table height=100% width=100% cellpadding=0 cellspacing=1 bgcolor="+titleBg+" id=mainTab>"+
" <tr height=18 style=cursor:default; onmousedown='x=event.x;y=event.y;setCapture();mainTab.bgColor=\""+moveBg+"\";' onmouseup='releaseCapture();mainTab.bgColor=\""+titleBg+"\";' onmousemove='if(event.button==1)self.moveTo(screenLeft+event.x-x,screenTop+event.y-y);'>"+
" <td width=18 align=center><img height=12 width=12 border=0 src="+icon+"></td>"+
" <td width="+w+"><span style=font-size:12px;color:"+titleColor+";font-family:宋体;position:relative;top:1px;>"+titleWord+"</span></td>"+
" <td width=14><img border=0 width=12 height=12 alt=最小化 src="+minimizebar+" onmousedown=hhctrl.Click(); onmouseover=this.src='"+minimizebar2+"' onmouseout=this.src='"+minimizebar+"'></td>"+
" <td width=13><img border=0 width=12 height=12 alt=关闭 src="+closebar+" onmousedown=self.close(); onmouseover=this.src='"+closebar2+"' onmouseout=this.src='"+closebar+"'></td>"+
" </tr>"+
" <tr height=*>"+
" <td colspan=4>"+
" <iframe name=nbw_v6_iframe src="+fileName+" scrolling="+scr+" width=100% height=100% frameborder=0></iframe>"+
" </td>"+
" </tr>"+
" </table>"+
"</body>"+
"</html>";
pop=window.open("","_blank","fullscreen=yes");
pop.resizeTo(w,h);
pop.moveTo((screen.width-w)/2,(screen.height-h)/2);
pop.document.writeln(contents);
if(pop.document.body.clientWidth!=w||pop.document.body.clientHeight!=h) //如果无边视窗不是出现在纯粹的IE视窗中
{
temp=window.open("","nbw_v6");
temp.close();
window.showModalDialog("about:<"+"script language=javascript>window.open('','nbw_v6','fullscreen=yes');window.close();"+"</"+"script>","","dialogWidth:0px;dialogHeight:0px");
pop2=window.open("","nbw_v6");
pop2.resizeTo(w,h);
pop2.moveTo((screen.width-w)/2,(screen.height-h)/2);
pop2.document.writeln(contents);
pop.close();
}
}
</script>
//第二步:把如下代码加入<body></body>区域中
<a href=#none onclick=noBorderWin('rate.htm','400','240','#000000','#333333','#CCCCCC','一个无边视窗的测试例子','yes');>open〈/a〉
让新窗口总在一个窗口弹出
新开一个的窗口（name=screen）
再在这个窗口内打开链接（target=screen）

网页内容顶格

CODE:[Copy to clipboard]<BODY leftMargin=0 topMargin=0 marginwidth="0" marginheight="0" >

[[i] 本帖最后由 shenfeng 于 2006-3-26 14:00 编辑 [/i]]

跟我一起狂 发表于 2006-3-26 13:59

横向不间断滚动广告

CODE:[Copy to clipboard]<script language="JavaScript">
imgArr=new Array()
imgArr[0]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/l/lisababy6617.gif border=0></a>"
imgArr[1]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/t/testool4434.gif border=0></a>"
imgArr[2]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/s/sxyuda6549.gif border=0></a>"
imgArr[3]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/q/qeji4041.gif border=0></a>"
imgArr[4]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/i/ieasytraining3984.gif border=0></a>"
imgArr[5]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/t/trainings1442.gif border=0></a>"
imgArr[6]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/r/renhebj002indexasp2486.gif border=0></a>"
imgArr[7]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/e/efeedlink6085.gif border=0></a>"
imgArr[8]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/k/kaixingou5811.gif border=0></a>"
imgArr[9]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/h/9happyindex8htm5912.gif border=0></a>"
imgArr[10]="<a href=# onmouseMove='javascript:outHover=true' onMouseover='javascript:outHover=true' onMouseout='javascript:outHover=false;mvStart()'><img src=http://image0.sina.com.cn/images/bizsite/promote/c/chinaroom6034.gif border=0></a>"
var moveStep=4       //步长，单位：pixel
var moveRelax=100 //移动时间间隔，单位：ms

ns4=(document.layers)?true:false

var displayImgAmount=4 //视区窗口可显示个数
var divWidth=125 //每块图片占位宽
var divHeight=60 //每块图片占位高

var startDnum=0
var nextDnum=startDnum+displayImgAmount
var timeID
var outHover=false

var startDivClipLeft
var nextDivClipRight

function initDivPlace(){
if (ns4){
      for (i=0;i<displayImgAmount;i++){
         eval("document.divOuter.document.divAds"+i+".left="+divWidth*i)
      }
      for (i=displayImgAmount;i<imgArr.length;i++){
         eval("document.divOuter.document.divAds"+i+".left="+divWidth*displayImgAmount)
      }
}else{
      for (i=0;i<displayImgAmount;i++){
         eval("document.all.divAds"+i+".style.left="+divWidth*i)
      }
      for (i=displayImgAmount;i<imgArr.length;i++){
         eval("document.all.divAds"+i+".style.left="+divWidth*displayImgAmount)
      }
}
}

function mvStart(){
timeID=setTimeout(moveLeftDiv,moveRelax)
}

function mvStop(){
clearTimeout(timeID)
}

function moveLeftDiv(){
if (ns4){
      for (i=0;i<=displayImgAmount;i++){
         eval("document.divOuter.document.divAds"+parseInt((startDnum+i)%imgArr.length)+".left=document.divOuter.document.divAds"+parseInt((startDnum+i)%imgArr.length)+".left-moveStep")
      }

      startDivClipLeft=parseInt(eval("document.divOuter.document.divAds"+startDnum+".clip.left"))
      nextDivClipRight=parseInt(eval("document.divOuter.document.divAds"+nextDnum+".clip.right"))

      if (startDivClipLeft+moveStep>divWidth){
         eval("document.divOuter.document.divAds"+nextDnum+".clip.right="+divWidth)

         eval("document.divOuter.document.divAds"+startDnum+".left="+divWidth*displayImgAmount)
         eval("document.divOuter.document.divAds"+parseInt((nextDnum+1)%imgArr.length)+".left=document.divOuter.document.divAds"+nextDnum+".left+"+divWidth)
         eval("document.divOuter.document.divAds"+parseInt((nextDnum+1)%imgArr.length)+".clip.left=0")


         startDnum=(++startDnum)%imgArr.length
         nextDnum=(startDnum+displayImgAmount)%imgArr.length

         startDivClipLeft=moveStep-(divWidth-startDivClipLeft)
         nextDivClipRight=moveStep-(divWidth-nextDivClipRight)
      }else{
         eval("document.divOuter.document.divAds"+nextDnum+".clip.left=0")
         startDivClipLeft+=moveStep
         nextDivClipRight+=moveStep
      }
      eval("document.divOuter.document.divAds"+startDnum+".clip.left="+startDivClipLeft)
      eval("document.divOuter.document.divAds"+nextDnum+".clip.right="+nextDivClipRight)
}else{
      for (i=0;i<=displayImgAmount;i++){
         eval("document.all.divAds"+parseInt((startDnum+i)%imgArr.length)+".style.left=document.all.divAds"+parseInt((startDnum+i)%imgArr.length)+".style.pixelLeft-moveStep")
      }

      startDivClipLeft=parseInt(eval("document.all.divAds"+startDnum+".currentStyle.clipLeft"))
      nextDivClipRight=parseInt(eval("document.all.divAds"+nextDnum+".currentStyle.clipRight"))

      if (startDivClipLeft+moveStep>divWidth){
         eval("document.all.divAds"+nextDnum+".style.clip='rect(0,"+divWidth+","+divHeight+",0"+")'")

         eval("document.all.divAds"+startDnum+".style.left="+divWidth*displayImgAmount)
         eval("document.all.divAds"+parseInt((nextDnum+1)%imgArr.length)+".style.left=document.all.divAds"+nextDnum+".style.pixelLeft+"+divWidth)

         startDnum=(++startDnum)%imgArr.length
         nextDnum=(startDnum+displayImgAmount)%imgArr.length

         startDivClipLeft=moveStep-(divWidth-startDivClipLeft)
         nextDivClipRight=moveStep-(divWidth-nextDivClipRight)
      }else{
         startDivClipLeft+=moveStep
         nextDivClipRight+=moveStep
      }
      eval("document.all.divAds"+startDnum+".style.clip='rect(0,"+divWidth+","+divHeight+","+startDivClipLeft+")'")
      eval("document.all.divAds"+nextDnum+".style.clip='rect(0,"+nextDivClipRight+","+divHeight+",0)'")
}

if (outHover){
      mvStop()
}else{
      mvStart()
}

}

function writeDivs(){
if (ns4){
      document.write("<ilayer name=divOuter width=750 height="+divHeight+">")

      for (i=0;i<imgArr.length;i++){
         document.write("<layer name=divAds"+i+">")
         document.write(imgArr[i]+" ")
         document.write("</layer>")
      }
      document.write("</ilayer>")
      document.close()
      for (i=displayImgAmount;i<imgArr.length;i++){
         eval("document.divOuter.document.divAds"+i+".clip.right=0")
      }
}else{
      document.write("<div id=divOuter style='position:relative' width=750 height="+divHeight+">")

      for (i=0;i<imgArr.length;i++){
         document.write("<div id=divAds"+i+" style='position:absolute;clip:rect(0,"+divWidth+","+divHeight+",0)'>")
         document.write(imgArr[i]+" ")
         document.write("</div>")
      }
      document.write("</div>")
      for (i=displayImgAmount;i<imgArr.length;i++){
         eval("document.all.divAds"+i+".style.clip='rect(0,0,"+divHeight+",0)'")
      }
}
}
</script>
<BODY onload=javascript:mvStart()>
<SCRIPT language=JavaScript>writeDivs();initDivPlace();</SCRIPT>

跟我一起狂 发表于 2006-3-26 13:59

电击图片弹出无边自定义窗口

CODE:[Copy to clipboard]<a href="#"><img src="image/tx.gif" alt="更换头像" width="16" height="16" hspace=10 border=0 onClick="MM_openBrWindow('tx.htm','tx','status=yes,scrollbars=yes,width=280,height=45')"></a>

跟我一起狂 发表于 2006-3-26 14:01

无边框对话框窗口可以在myie中弹出

CODE:[Copy to clipboard]<script Language="JavaScript">
function 页面名称(WINwidth, WINheight) {
      showx = event.screenX - event.offsetX - 4 - WINwidth ; // + deltaX;
      showy = event.screenY - event.offsetY + 18; // + deltaY;

      newWINwidth = WINwidth + 4 + 18;
      var features =
            'dialogWidth:'  + newWINwidth  + 'px;' +
            'dialogHeight:' + WINheight + 'px;' +
            'dialogLeft:' + showx    + 'px;' +
            'dialogTop:' + showy    + 'px;' +
            'directories:no; localtion:no; menubar:no; status=no; toolbar=no;scrollbars:no;Resizeable=no';

      var endtarget = "弹出页面.htm";

//       window.open(endtarget, '', '');
      window.showModalDialog(endtarget, " ", features);
}
</script>

CODE:[Copy to clipboard]<input name="image" type=image onClick="页面名称(230, 35);return false;" src="代替按扭的图片.gif" alt="鼠标经过显示的文字" width="16" height="16" >

跟我一起狂 发表于 2006-3-26 14:01

Java代码容错

CODE:[Copy to clipboard]<SCRIPT LANGUAGE="JavaScript">

</SCRIPT>

跟我一起狂 发表于 2006-3-26 14:01

flash透明

CODE:[Copy to clipboard]<PARAM NAME="wmode" VALUE="transparent">

跟我一起狂 发表于 2006-3-26 14:02

状态栏 +在body中就ok

QUOTE:
Originally posted by justray at 2004-3-23 09:14 AM:
有状态栏的特效吗？？
<script language="JavaScript">
var MESSAGE  = "  欢迎来到落伍者论坛谢谢! "
var POSITION = 150
var DELAY = 10
var scroll = new statusMessageObject()
function statusMessageObject(p,d) {
  this.msg = MESSAGE
  this.out = " "
  this.pos = POSITION
  this.delay = DELAY
  this.i    = 0
  this.reset = clearMessage}
function clearMessage() {
  this.pos = POSITION}
function scroller() {
  for (scroll.i = 0; scroll.i < scroll.pos; scroll.i++) {
scroll.out += " "}
  if (scroll.pos >= 0)
scroll.out += scroll.msg
  else scroll.out = scroll.msg.substring(-scroll.pos,scroll.msg.length)
  window.status = scroll.out
  scroll.out = " "
  scroll.pos--
  if (scroll.pos < -(scroll.msg.length)) {
scroll.reset()}
  setTimeout ('scroller()',scroll.delay)}
function snapIn(jumpSpaces,position) {
  var msg = scroll.msg
  var out = ""
  for (var i=0; i<position; i++)
{out += msg.charAt(i)}
  for (i=1;i<jumpSpaces;i++)
{out += " "}
  out += msg.charAt(position)
  window.status = out
  if (jumpSpaces <= 1) {
position++
if (msg.charAt(position) == ' ')
   {position++ }
jumpSpaces = 100-position
  } else if (jumpSpaces >  3)
   {jumpSpaces *= .75}
  else
{jumpSpaces--}
  if (position != msg.length) {
var cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
  } else { window.status=""
jumpSpaces=0
position=0
cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
return false }
  return true}
snapIn(100,0);
</script>

跟我一起狂 发表于 2006-3-26 14:02

同页面的超级连接不同颜色

CODE:[Copy to clipboard]<html>
<head>
<style>
a.a1:link {
font-size: 9pt;
color: #000000;
text-decoration: none;
}
a.a1:visited {
font-size: 9pt;
color: #999999;
text-decoration: none;
}
a.a1:hover {
font-size: 9pt;
color: #FF6600;
position: relative;
top: 1px;

}
a.a1:active {
font-size: 9pt;
color: #333333;
text-decoration: none;
}
a.a2:link {
font-size: 9pt;
color: #00ff00;
}
a.a2:hover {
font-size: 10pt;
color: #FF3300;
position: relative;
top: 5px;

}
a.a2:active {
font-size: 9pt;
color: #fffff;
text-decoration: none;
}
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>
<center>
<br>
<br>
<br>
<br>
<a href="" class="a1">123456</a>
<a href="" class="a2">000000</a>
</center>
</body>
</html>

跟我一起狂 发表于 2006-3-26 14:03

1.页面自动刷新：把如下代码加入<head>区域中

CODE:[Copy to clipboard] <meta http-equiv="refresh" content="20">
其中20指每隔20秒刷新一次页面。

2.页面自动跳转：把如下代码加入<head>区域中

CODE:[Copy to clipboard] <meta http-equiv="refresh" content="20;url=http://kingsnet.126.com">

跟我一起狂 发表于 2006-3-26 14:03

asp 随机图片显示百变美女asp代码

asp 随机图片显示百变美女asp代码

CODE:[Copy to clipboard]<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
'----------------------------------------------------------------------------------------
'转发时请保留此声明信息,这段声明不并会影响你的显示速度!
'************************* 随机图片显示 ****************************
'代码设计:野汉子
'使用实例:img.asp?list=图片存放目录
'网站:[url]http://yjj.con.cn[/url]
'声明:版权没有,随意使用!^_^不过如果各位不介意给我做个小小的连接,在下将感激不尽!
'----------------------------------------------------------------------------------------
Function AllPath()
Dim Domain,GFilePath
Domain = Request.ServerVariables("SERVER_NAME")
GFilePath = Request.ServerVariables("PATH_INFO")
GFilePath = lcase(left(GFilePath,instrRev(GFilePath,"/")))
AllPath = "http://"&Domain&GFilePath
End Function

Function ShowFileList(folderspec)
Dim Path,objFSO,objFolder,count,objFile,nume,S
Path = Server.MapPath(folderspec)
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FolderExists(Path) Then
   Set objFolder = objFSO.GetFolder(Path)
   count = 0
   For Each objFile in objFolder.Files
         count = count+1
   Next
   randomize
   nume = Int((count*rnd)+1)
   S = 0
   ShowFileList = ""
   For Each objFile in objFolder.Files
   S = S + 1
      If S = nume Then
      ShowFileList = objFile.Name
      Exit For
      End If
   Next
   Set objFolder = Nothing
Else
ShowFileList = "NO"
End If
Set objFSO = Nothing
End Function

Dim list,filename,address,str

list = trim(Request.QueryString("list"))
if list = "" then
Response.write "本页需要正确参数引入,您缺少相关的参数！正确格式如下："&AllPath&"img.asp?list=图片存放目录"
Response.End()
end if

filename = ShowFileList("./"&list&"/")
if filename = "NO" then
Response.write "您指定的目录<b>"&list&"</b>不存在，请重新指定！"
Response.End()
end if

if filename = "" then
Response.write "您指定的目录<b>"&list&"</b>没有相关的图片文件存在，请重新指定！"
Response.End()
end if

str = right(filename,3)
if str<>"jpg" and str<>"gif" then
filename = "erro.gif"
end if

address = AllPath&list&"/"
address = address&filename
%>
<%Response.redirect(address)%>

跟我一起狂 发表于 2006-3-26 14:04

鼠标经过显示不同图片

CODE:[Copy to clipboard]<SCRIPT LANGUAGE="JavaScript">
var a = new Image();
var b = new Image();
var c = new Image();

a.src = "../../../yanyanyan/me/me/4.jpg";
b.src = "../../../yanyanyan/me/me/3.jpg";
c.src = "../../../yanyanyan/me/me/2.jpg";

function doButtons(picimage) {
eval("document['picture'].src = " + picimage + ".src");
}
</script>

</head>

<body>

<table width="407" height="201" border=0 cellpadding="0" cellspacing="0" bgcolor="#333333">
<tr><td width="110" align="center">
<p>
<a href="#" onmouseover="doButtons('a')">PHOTO 1</a><p>

<a href="#" onmouseover="doButtons('b')">PHOTO 2</a><p>

<a href="#" onmouseover="doButtons('c')">PHOTO 3</a><p>
<td width="297"><img name=picture src="../../../yanyanyan/me/me/4.jpg" width=294 height=345 border=0></td>
</tr>
</table>

跟我一起狂 发表于 2006-3-26 14:05

CODE:[Copy to clipboard]<style>
.jc{
position:relative;
}
</style>

<script language="JavaScript1.2">

var ns6=document.getElementById&&!document.all
var ie=document.all

var customcollect=new Array()
var i=0

function jiggleit(num){
if ((!document.all&&!document.getElementById)) return;
customcollect[num].style.left=(parseInt(customcollect[num].style.left)==-1)? customcollect[num].style.left=1 : customcollect[num].style.left=-1
}

function init(){
if (ie){
while (eval("document.all.jiggle"+i)!=null){
customcollect[i]= eval("document.all.jiggle"+i)
i++
}
}
else if (ns6){
while (document.getElementById("jiggle"+i)!=null){
customcollect[i]= document.getElementById("jiggle"+i)
i++
}
}

if (customcollect.length==1)
setInterval("jiggleit(0)",80)
else if (customcollect.length>1)
for (y=0;y<customcollect.length;y++){
var tempvariable='setInterval("jiggleit('+y+')",'+'100)'
eval(tempvariable)
}
}

window.onload=init

</script>

<span id="jiggle0" class="jc"><b>抖动的字<a href="http://yjj.con.cn">Website 俊杰网络!</a></b></span>
</head>

跟我一起狂 发表于 2006-3-26 14:06

标题拦特效

CODE:[Copy to clipboard]<SCRIPT>

//change title text to your own
var titletext="Welcome to Dynamic Drive"
var thetext=""
var started=false
var step=0
var times=1

function welcometext()
{
   times--
   if (times==0)
   {
      if (started==false)
      {
      started = true;
      document.title = titletext;
      setTimeout("anim()",1);
      }
      thetext = titletext;
   }
}

function showstatustext(txt)
{
   thetext = txt;
   setTimeout("welcometext()",4000)
   times++
}

function anim()
{
   step++
   if (step==7) {step=1}
   if (step==1) {document.title='>==='+thetext+'===<'}
   if (step==2) {document.title='=>=='+thetext+'==<='}
   if (step==3) {document.title='>=>='+thetext+'=<=<'}
   if (step==4) {document.title='=>=>'+thetext+'<=<='}
   if (step==5) {document.title='==>='+thetext+'=<=='}
   if (step==6) {document.title='===>'+thetext+'<==='}
   setTimeout("anim()",200);
}

if (document.title)
window.onload=onload=welcometext
</SCRIPT>

跟我一起狂 发表于 2006-3-26 14:07

文字不同颜色闪烁

<span style=behavior:url(font.htc)>这里是要闪烁的字颜色可以很多</span>

font.htc 代码

CODE:[Copy to clipboard]*************************************************
<PUBLIC:COMPONENT URN="rainbow" name="darainbow()"/>
<PUBLIC:ATTACH  EVENT = "oncontentready" ONEVENT ="beginIt()"/>
<SCRIPT language="JAVASCRIPT">
var Kill_ID=null;
var internalValue;
var originalValue;
function putValue(){
      element.innerHTML=internalValue;
      encapsulate();
      startSwirl();
}
function eventHandler(){
      clearInterval(Kill_ID);
      internalValue=element.value;
      element.detachEvent("onpropertychange",eventHandler);
      if(event.propertyName=="value"){
            element.innerHTML=internalValue;
            putValue();
      } else startSwirl();
      element.attachEvent("onpropertychange",eventHandler);
}
function swirl(){
      var I;
      I=ran(internalValue.length-1,0);
      if(element.children(I) != null)element.children(I).style.color=randomColor();
}
function startSwirl(){
      if (element.swirlInterval == null)
            element.swirlInterval=50;
      if ((internalValue!=null) && (element.swirlInterval!=0))
            Kill_ID=setInterval(swirl,element.swirlInterval);
}
function encapsulate(){
      var I;
      var tempStr="";
      for (I=0; I < internalValue.length; I++){
                     tempStr += "<SPAN style=\"color:"+randomColor()+"\">" + internalValue.substr(I,1) + "</SPAN>";
            }
      innerHTML=tempStr;
}
function ran(upperbound, lowerbound){
      return(parseInt((upperbound - lowerbound + 1) * Math.random() + lowerbound));
}
function randomColor(){
      var R=ran(255,0);
      var G=ran(255,0);
      var B=ran(255,0);
      R=R.toString(16);
      G=G.toString(16);
      B=B.toString(16);
      if (R.length==1)R="0"+R;
      if (G.length==1)G="0"+G;
      if (B.length==1)B="0"+B;
      return("#"+R+G+B);
}
function beginIt(){
      internalValue=element.value;
      originalValue=element.innerHTML;
      if (internalValue==null)
            internalValue=element.innerHTML;
      putValue();
      element.attachEvent("onpropertychange",eventHandler);
}
function clearIt(){
      clearInterval(Kill_ID);
      element.detachEvent("onpropertychange",eventHandler);
      element.innerHTML=originalValue;
}
</script>
***************************************

跟我一起狂 发表于 2006-3-26 14:08

让连接不停的变色

<SCRIPT language=Javascript src="fade.js"></SCRIPT>
演示 [url]http://www.wooshow.com/dw/demo/ln/1.htm[/url]

fade.js代码

CODE:[Copy to clipboard]/*************

**** <config>

**/

startColor = "#4D4D4D"; // 颜色可以该

endColor = "#ffffff"; // MouseOver link color

stepIn = 10; // delay when fading in

stepOut = 20; // delay when fading out

/*

** set to true or false; true will

** cause all links to fade automatically

***/

autoFade = true;

/*

** set to true or false; true will cause all CSS

** classes with "fade" in them to fade onmouseover

***/

sloppyClass = true;

/**

**** </config>

**************/

/*************

**** <install>

**

**

**** </install>

**************/

hexa = new makearray(16);

for(var i = 0; i < 10; i++)

hexa[i] = i;

hexa[10]="a"; hexa[11]="b"; hexa[12]="c";

hexa[13]="d"; hexa[14]="e"; hexa[15]="f";

document.onmouseover = domouseover;

document.onmouseout = domouseout;

startColor = dehexize(startColor.toLowerCase());

endColor = dehexize(endColor.toLowerCase());

var fadeId = new Array();

var timerID = 0;

var theElement,theTagName,theClassName,theUniqueID

function dehexize(Color){

var colorArr = new makearray(3);

for (i=1; i<7; i++){

for (j=0; j<16; j++){

if (Color.charAt(i) == hexa[j]){

if (i%2 !=0)

colorArr[Math.floor((i-1)/2)]=eval(j)*16;

else

colorArr[Math.floor((i-1)/2)]+=eval(j);

}

}

}

return colorArr;

}

function domouseover() {

if(document.all) {

clearTimeout(timerID);

theElement = event.srcElement;

theTagName = theElement.tagName;

theClassName = theElement.className;

theUniqueID = theElement.uniqueID;

if ((theTagName == "A" && autoFade) || theClassName == "fade" || (sloppyClass && theClassName.indexOf("fade") != -1)) {

//alert(theElement);

fade(startColor,endColor,theUniqueID,stepIn);

timerID = setTimeout('pulsedown()',500);

}

}

}

function pulseup() {

if(document.all) {

clearTimeout(timerID);

if ((theTagName == "A" && autoFade) || theClassName == "fade" || (sloppyClass && theClassName.indexOf("fade") != -1)) {

//alert(theElement);

fade(startColor,endColor,theUniqueID,stepIn);

timerID = setTimeout('pulsedown(theElement)',500);

}

}

}

function pulsedown(theElement) {

if (document.all) {

clearTimeout(timerID);

if ((theTagName == "A" && autoFade) || theClassName == "fade" || (sloppyClass && theClassName.indexOf("fade") != -1)) {

//alert(theElement);

fade(endColor,startColor,theUniqueID,stepOut);

timerID = setTimeout('pulseup()',500);

}

}

}

function domouseout() {

if (document.all) {

clearTimeout(timerID);

var srcElement = event.srcElement;

if ((srcElement.tagName == "A" && autoFade) || srcElement.className == "fade" || (sloppyClass && srcElement.className.indexOf("fade") != -1))

fade(endColor,startColor,srcElement.uniqueID,stepOut);

}

}

function makearray(n) {

this.length = n;

for(var i = 1; i <= n; i++)

this[i] = 0;

return this;

}

function hex(i) {

if (i < 0)

return "00";

else if (i > 255)

return "ff";

else

return "" + hexa[Math.floor(i/16)] + hexa[i%16];}

function setColor(r, g, b, element) {

var hr = hex(r); var hg = hex(g); var hb = hex(b);

element.style.color = "#"+hr+hg+hb;

}

function fade(s,e, element,step){

var sr = s[0]; var sg = s[1]; var sb = s[2];

var er = e[0]; var eg = e[1]; var eb = e[2];

if (fadeId[0] != null && fade[0] != element){

setColor(sr,sg,sb,eval(fadeId[0]));

var i = 1;

while(i < fadeId.length){

clearTimeout(fadeId[i]);

i++;

}

}

for(var i = 0; i <= step; i++) {

fadeId[i+1] = setTimeout("setColor(Math.floor(" +sr+ " *(( " +step+ " - " +i+ " )/ " +step+ " ) + " +er+ " * (" +i+ "/" +

step+ ")),Math.floor(" +sg+ " * (( " +step+ " - " +i+ " )/ " +step+ " ) + " +eg+ " * (" +i+ "/" +step+

")),Math.floor(" +sb+ " * ((" +step+ "-" +i+ ")/" +step+ ") + " +eb+ " * (" +i+ "/" +step+ ")),"+element+");",i*step);

}

fadeId[0] = element;

}

跟我一起狂 发表于 2006-3-26 14:08

要使背景图案不随文字“滚动”的CSS是这样的：

CODE:[Copy to clipboard]〈style type="text/css"〉
〈!--
BODY { background: purple url(bg.jpg);
　　　 background-repeat:repeat-y;
　　　 background-attachment:fixed 　
　　　　}
--〉
〈/style〉

跟我一起狂 发表于 2006-3-26 14:09

页面过滤渐变加到<head>中

CODE:[Copy to clipboard]<meta http-equiv="Page-Exit" content="revealTrans(Duration=1,Transition=23)">

跟我一起狂 发表于 2006-3-26 14:09

鼠标移动到版块图标产生的渐变效果

1.inc\main.js末尾增加如下代码：

//渐隐渐现函数
nereidFadeObjects = new Object();
nereidFadeTimers = new Object();

function nereidFade(object, destOp, rate, delta) {
if (!document.all) {return;}
if (object != "[object]"){
  setTimeout("nereidFade("+object+","+destOp+","+rate+","+delta+")",0);
  return;
}
clearTimeout(nereidFadeTimers[object.sourceIndex]);
diff = destOp-object.filters.alpha.opacity;
direction = 1;
if (object.filters.alpha.opacity > destOp){
  direction = -1;
}
delta=Math.min(direction*diff,delta);
object.filters.alpha.opacity+=direction*delta;
if (object.filters.alpha.opacity != destOp){
  nereidFadeObjects[object.sourceIndex]=object;
  nereidFadeTimers[object.sourceIndex]=setTimeout("nereidFade(nereidFadeObjects["+object.sourceIndex+"],"+destOp+","+rate+","+delta+")",rate);
}
}
2.index模板html(7):

function showboard

.......

if (indexIMG!='')
{
  str = str.replace(/{\$indexIMG}/gi,'<table align="left"><tr><td><a href="list.asp?boardid='+BoardID+'"> <img src='+indexIMG+' align="top" border="0" style="FILTER: alpha(opacity=40)" onMouseOut=nereidFade(this,40,10,10) onMouseOver=nereidFade(this,100,0,10) ></a></td><td width="20"></td></tr></table>');
}
else
{
  str = str.replace(/{\$indexIMG}/gi,'');
}

......

增加以上红色部分。

跟我一起狂 发表于 2006-3-26 14:10

任何连接滑过就点击

CODE:[Copy to clipboard]<script>
function mClk2() {var source=event.srcElement;if (source.tagName=="A"){source.click();self.focus();}}
document.write("<div onmouseover=mClk2();>");
   </script>

跟我一起狂 发表于 2006-3-26 14:11

不错的向上滚动广告代码

演示 [url]http://gong.88qq.com/88qq_468-60-lun.htm[/url]

CODE:[Copy to clipboard]<SCRIPT language=JavaScript1.2>

</SCRIPT>
<ILAYER id=main bgcolor="&{scrollerbgcolor};"
height="&{scrollerheight};" width="&{scrollerwidth};"><LAYER id=first
width="&{scrollerwidth};" top="1" left="0">
<SCRIPT language=JavaScript1.2>
if (document.layers)
document.write(slideimages[0])
</SCRIPT>
</LAYER><LAYER id=second width="&{scrollerwidth};" top="0" left="0"
visibility="hide">
<SCRIPT language=JavaScript1.2>
if (document.layers)
document.write(slideimages[1])
</SCRIPT>
</LAYER></ILAYER>
<SCRIPT language=JavaScript1.2>

</SCRIPT>

跟我一起狂 发表于 2006-3-26 14:12

在艺龙看到40个

1. oncontextmenu="window.event.returnvalue=false" 将彻底屏蔽鼠标右键
<table border oncontextmenu=return(false)><td>no</table> 可用于table

2. <body onselectstart="return false"> 取消选取、防止复制

3. onpaste="return false" 不准粘贴

4. oncopy="return false;" oncut="return false;" 防止复制

5. <link rel="shortcut icon" href="favicon.ico"> ie地址栏前换成自己的图标

6. <link rel="bookmark" href="favicon.ico"> 可以在收藏夹中显示出你的图标

7. <input style="ime-mode:disabled"> 关闭输入法

8. 永远都会带着框架
<script language="javascript"></script>

9. 防止被人frame
<script language=javascript></script>

10. 网页将不能被另存为
<noscript><iframe src=*.html></iframe></noscript>

11. <input type=button value=查看网页源代码
onclick="window.location = 'view-source:'+ 'http://www.51js.com/'">

12.删除时确认
<a href='javascript:if(confirm("确实要删除吗?"))location="boos.asp?&areyou=删除&page=1"'>删

除</a>

13. 取得控件的绝对位置
//javascript
<script language="javascript">
function getie(e){
var t=e.offsettop;
var l=e.offsetleft;
while(e=e.offsetparent){
t+=e.offsettop;
l+=e.offsetleft;
}
alert("top="+t+"/nleft="+l);
}
</script>

//vbscript
<script language="vbscript"></script>

14. 光标是停在文本框文字的最后
<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()">

15. 判断上一页的来源
javascript:
document.referrer

16. 最小化、最大化、关闭窗口
<object id=hh1 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
<param name="command" value="minimize"></object>
<object id=hh2 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
<param name="command" value="maximize"></object>
<object id=hh3 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
<param name="command" value="close"></object>

<input type=button value=最小化 onclick=hh1.click()>
<input type=button value=最大化 onclick=hh2.click()>
<input type=button value=关闭 onclick=hh3.click()>
本例适用于ie

17.屏蔽功能键shift,alt,ctrl
<script>
function look(){
if(event.shiftkey)
alert("禁止按shift键!"); //可以换成alt　ctrl
}
document.onkeydown=look;
</script>

18. 网页不会被缓存
<meta http-equiv="pragma" content="no-cache">
<meta http-equiv="cache-control" content="no-cache, must-revalidate">
<meta http-equiv="expires" content="wed, 26 feb 1997 08:21:57 gmt">
或者<meta http-equiv="expires" content="0">

19.怎样让表单没有凹凸感？
<input type=text style="border:1 solid #000000">
或
<input type=text style="border-left:none; border-right:none; border-top:none; border-bottom:

1 solid #000000"></textarea>

20.<div><span>&<layer>的区别？
<div>(division)用来定义大段的页面元素，会产生转行
<span>用来定义同一行内的元素，跟<div>的唯一区别是不产生转行
<layer>是ns的标记，ie不支持，相当于<div>

21.让弹出窗口总是在最上面:
<body onblur="this.focus();">

22.不要滚动条?
让竖条没有:
<body style='overflow:scroll;overflow-y:hidden'>
</body>
让横条没有:
<body style='overflow:scroll;overflow-x:hidden'>
</body>
两个都去掉？更简单了
<body scroll="no">
</body>

23.怎样去掉图片链接点击后，图片周围的虚线？
<a href="#" onfocus="this.blur()"><img src="logo.jpg" border=0></a>

24.电子邮件处理提交表单
<form name="form1" method="post" action="mailto:****@***.com" enctype="text/plain">
<input type=submit>
</form>

25.在打开的子窗口刷新父窗口的代码里如何写？
window.opener.location.reload()

26.如何设定打开页面的大小
<body onload="top.resizeto(300,200);">
打开页面的位置<body onload="top.moveby(300,200);">

27.在页面中如何加入不是满铺的背景图片,拉动页面时背景图不动
<style>
body
{background-image:url(logo.gif); background-repeat:no-repeat;

background-position:center;background-attachment: fixed}
</style>

28. 检查一段字符串是否全由数字组成
<script language="javascript"></script>

29. 获得一个窗口的大小
document.body.clientwidth; document.body.clientheight

30. 怎么判断是否是字符
if (/[^/x00-/xff]/g.test(s)) alert("含有汉字");
else alert("全是字符");

31.textarea自适应文字行数的多少
<textarea rows=1 name=s1 cols=27 onpropertychange="this.style.posheight=this.scrollheight">
</textarea>

32. 日期减去天数等于第二个日期
<script language=javascript>
function cc(dd,dadd)
{
//可以加上错误处理
var a = new date(dd)
a = a.valueof()
a = a - dadd * 24 * 60 * 60 * 1000
a = new date(a)
alert(a.getfullyear() + "年" + (a.getmonth() + 1) + "月" + a.getdate() + "日")
}
cc("12/23/2002",2)
</script>

33. 选择了哪一个radio
<html><script language="vbscript">
function checkme()
for each ob in radio1
if ob.checked then window.alert ob.value
next
end function
</script><body>
<input name="radio1" type="radio" value="style" checked>style
<input name="radio1" type="radio" value="barcode">barcode
<input type="button" value="check" onclick="checkme()">
</body></html>

34.脚本永不出错
<script language="javascript">

</script>

35.enter键可以让光标移到下一个输入框
<input onkeydown="if(event.keycode==13)event.keycode=9">

36. 检测某个网站的链接速度：
把如下代码加入<body>区域中:
<script language=javascript>
tim=1
setinterval("tim++",100)
b=1

var autourl=new array()
autourl[1]="www.njcatv.net"
autourl[2]="javacool.3322.net"
autourl[3]="www.sina.com.cn"
autourl[4]="www.nuaa.edu.cn"
autourl[5]="www.cctv.com"

function butt(){
document.write("<form name=autof>")
for(var i=1;i<autourl.length;i++)
document.write("<input type=text name=txt"+i+" size=10 value=测试中……> =》<input type=text

name=url"+i+" size=40> =》<input type=button value=go

onclick=window.open(this.form.url"+i+".value)>
")
document.write("<input type=submit value=刷新></form>")
}
butt()
function auto(url){
document.forms[0]["url"+b].value=url
if(tim>200)
{document.forms[0]["txt"+b].value="链接超时"}
else
{document.forms[0]["txt"+b].value="时间"+tim/10+"秒"}
b++
}
function run(){for(var i=1;i<autourl.length;i++)document.write("<img

src=http://"+autourl+"/"+math.random()+" width=1 height=1

onerror=auto('http://";;+autourl+"')>")}
run()</script>

37. 各种样式的光标
auto ：标准光标
default ：标准箭头
hand ：手形光标
wait ：等待光标
text ：i形光标
vertical-text ：水平i形光标
no-drop ：不可拖动光标
not-allowed ：无效光标
help ：?帮助光标
all-scroll ：三角方向标
move ：移动标
crosshair ：十字标
e-resize
n-resize
nw-resize
w-resize
s-resize
se-resize
sw-resize

38.页面进入和退出的特效
进入页面<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 以上22种随机选择一种

39.在规定时间内跳转
<meta http-equiv=v="refresh" content="5;url=http://www.51js.com">

40.网页是否被检索
<meta name="robots" content="属性值">
　　其中属性值有以下一些:
　　属性值为"all": 文件将被检索，且页上链接可被查询；
　　属性值为"none": 文件不被检索，而且不查询页上的链接；
　　属性值为"index": 文件将被检索；
　　属性值为"follow": 查询页上的链接；
　　属性值为"noindex": 文件不检索，但可被查询链接；
　　属性值为"nofollow": 文件不被检索，但可查询页上的链接

我能该吗？

[[i] Last edited by 野汉子 on 2004-7-15 at 16:54 [/i]]

跟我一起狂 发表于 2006-3-26 14:13

点广告才可以下载的代码

这样写点了广告就在新页面自动下载了

CODE:[Copy to clipboard]<table onclick="window.open('下载地址','_blank','width=0,height=0')"><tr><td><广告代码></td></tr></table>

跟我一起狂 发表于 2006-3-26 14:13

站长站弹出广告代码

CODE:[Copy to clipboard]<SCRIPT language=javascript>window.showModelessDialog("http://www.chinaz.com/A-Ddi.htm","CHINAZDindexP","center:no;dialogLeft:5px;dialogTop:5px;scroll:0;status:0;help:0;resizable:0;dialogWidth:305px;dialogHeight:325px")</SCRIPT>

跟我一起狂 发表于 2006-3-26 14:13

总在最下的广告代码

CODE:[Copy to clipboard]

<script language="javascript">

</script>
<span id="bar" style="position:absolute; left:68px; top:455px; width:614px; height:45px; z-index:9" >
<table align="center" border="1" hspace="1" cellpadding="1" bordercolor="#000000" bgcolor="#FFFFFF">
<tr align="center">

<td > <a href="http://remotion.myetang.com">网页特效梦工厂</a></td>
<td > <a href="http://www.skycn.com">天空下载</a></td>
</tr></table></span>

跟我一起狂 发表于 2006-3-26 14:14

定时更换超级连接的代码

CODE:[Copy to clipboard]


<style>

</style>
<div id="tickertape">
<div id="subtickertape" class="subtickertapefont">初始化...</div>
</div>
<script language="JavaScript1.2">

var speed=4500

var news=new Array()
news[0]="<a href='http://remotion.myetang.com'>网页特效梦工厂</a>"
news[1]="<a href='http://www.skycn.com'>天空下载</a>"
news[2]="<a href='http://www.delphibbs.com'>大富翁论坛</a>"

i=0
if (document.all)
tickerobject=document.all.subtickertape.style
else
tickerobject=document.tickertape.document
function regenerate(){
window.location.reload()
}
function regenerate2(){
if (document.layers)
setTimeout("window.onresize=regenerate",450)
}

function update(){
BgFade(0xff,0xff,0xff, 0x00,0x00,0x00,10);
if (document.layers){
document.tickertape.document.subtickertape.document.write('<span class="subtickertapefont">'+news[i]+'</span>')
document.tickertape.document.subtickertape.document.close()
}
else
document.all.subtickertape.innerHTML=news[i]

if (i<news.length-1)
i++
else
i=0
setTimeout("update()",speed)
}

function BgFade(red1, grn1, blu1, red2,
grn2, blu2, steps) {
sred = red1; sgrn = grn1; sblu = blu1;
ered = red2; egrn = grn2; eblu = blu2;
inc = steps;
step = 0;
RunFader();
}
function RunFader() {
var epct = step/inc;
var spct = 1 - epct;
if (document.layers)
tickerobject.bgColor =
Math.floor(sred * spct + ered *
epct)*256*256 +
Math.floor(sgrn * spct + egrn * epct)*256 +
Math.floor(sblu * spct + eblu * epct);
else
tickerobject.backgroundColor=
Math.floor(sred * spct + ered *
epct)*256*256 +
Math.floor(sgrn * spct + egrn * epct)*256 +
Math.floor(sblu * spct + eblu * epct);
if ( step < inc ) {
setTimeout('RunFader()',50);
}
step++;
}

</script>
</tr></table>

跟我一起狂 发表于 2006-3-26 14:14

星空背景

CODE:[Copy to clipboard]

<SCRIPT language=JavaScript>

</SCRIPT>

跟我一起狂 发表于 2006-3-26 14:14

时间特效。js读取时间

CODE:[Copy to clipboard]
<script language="JavaScript">

</script>

跟我一起狂 发表于 2006-3-26 14:15

鼠标经过图片加亮显示

CODE:[Copy to clipboard]

<SCRIPT language="JavaScript">

</SCRIPT>

<img src="image\flag.gif"
style="filter:alpha(opacity=20)"
onMouseOver="makevisible(this,0)"
onMouseOut="makevisible(this,1)">

跟我一起狂 发表于 2006-3-26 14:15

设为首页+加入收藏夹+打印网页

CODE:[Copy to clipboard][code]<a href=# onClick="this.style.behavior='url(#default#homepage)';this.setHomePage
('http://');">将本站设为首页</a>

CODE:[Copy to clipboard]<script language="JavaScript">
function bookmarkit(){window.external.addFavorite('http://tt88.info','俊杰网络')}
if (document.all)document.write('<a href="http://tt88.info" onClick="bookmarkit()">我很喜欢俊杰网络方便下次进入所以将本站加入收藏夹</a>')
</script>

CODE:[Copy to clipboard]

<SCRIPT LANGUAGE="JavaScript">

</script>
[ Last edited by 野汉子 on 2004-9-13 at 13:52 ]

跟我一起狂 发表于 2006-3-26 14:16

超级连接很酷的变色

<script src="fade.js"></script>
fade.js

CODE:[Copy to clipboard]/*************
**** <config>
**/
startColor = "#000000"; // MouseOut link color
endColor = "#FFFFFF"; // MouseOver link color

stepIn = 20; // delay when fading in
stepOut = 23; // delay when fading out

/*
** set to true or false; true will
** cause all links to fade automatically
***/
autoFade = true;
/*
** set to true or false; true will cause all CSS
** classes with "fade" in them to fade onmouseover
***/
sloppyClass = true;
/**
**** </config>
**************/
/*************
**** <install>
**
**
**** </install>
**************/

hexa = new makearray(16);
for(var i = 0; i < 10; i++)
hexa[i] = i;
hexa[10]="a"; hexa[11]="b"; hexa[12]="c";
hexa[13]="d"; hexa[14]="e"; hexa[15]="f";

document.onmouseover = domouseover;
document.onmouseout = domouseout;

startColor = dehexize(startColor.toLowerCase());
endColor = dehexize(endColor.toLowerCase());

var fadeId = new Array();

function dehexize(Color){
var colorArr = new makearray(3);
for (i=1; i<7; i++){
for (j=0; j<16; j++){
if (Color.charAt(i) == hexa[j]){
if (i%2 !=0)
colorArr[Math.floor((i-1)/2)]=eval(j)*16;
else
colorArr[Math.floor((i-1)/2)]+=eval(j);
}
}
}
return colorArr;
}

function domouseover() {
if(document.all){
var srcElement = event.srcElement;
if ((srcElement.tagName == "A" && autoFade) || srcElement.className == "fade" || (sloppyClass && srcElement.className.indexOf("fade") != -1))
fade(startColor,endColor,srcElement.uniqueID,stepIn);
}
}

function domouseout() {
if (document.all){
var srcElement = event.srcElement;
if ((srcElement.tagName == "A" && autoFade) || srcElement.className == "fade" || (sloppyClass && srcElement.className.indexOf("fade") != -1))
fade(endColor,startColor,srcElement.uniqueID,stepOut);
}
}

function makearray(n) {
this.length = n;
for(var i = 1; i <= n; i++)
this[i] = 0;
return this;
}

function hex(i) {
if (i < 0)
return "00";
else if (i > 255)
return "ff";
else
return "" + hexa[Math.floor(i/16)] + hexa[i%16];}

function setColor(r, g, b, element) {
var hr = hex(r); var hg = hex(g); var hb = hex(b);
element.style.color = "#"+hr+hg+hb;
}

function fade(s,e, element,step){
var sr = s[0]; var sg = s[1]; var sb = s[2];
var er = e[0]; var eg = e[1]; var eb = e[2];

if (fadeId[0] != null && fade[0] != element){
setColor(sr,sg,sb,eval(fadeId[0]));
var i = 1;
while(i < fadeId.length){
clearTimeout(fadeId[i]);
i++;
}
}

for(var i = 0; i <= step; i++) {
fadeId[i+1] = setTimeout("setColor(Math.floor(" +sr+ " *(( " +step+ " - " +i+ " )/ " +step+ " ) + " +er+ " * (" +i+ "/" +
step+ ")),Math.floor(" +sg+ " * (( " +step+ " - " +i+ " )/ " +step+ " ) + " +eg+ " * (" +i+ "/" +step+
")),Math.floor(" +sb+ " * ((" +step+ "-" +i+ ")/" +step+ ") + " +eb+ " * (" +i+ "/" +step+ ")),"+element+");",i*step);
}
fadeId[0] = element;
}

跟我一起狂 发表于 2006-3-26 14:17

图片幻灯片显示效果

CODE:[Copy to clipboard]<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>图片幻灯片显示效果</title>
<SCRIPT LANGUAGE="JavaScript">

// Set slideShowSpeed (milliseconds)
var slideShowSpeed = 5000;
// Duration of crossfade (seconds)
var crossFadeDuration = 3;
// Specify the image files
var Pic = new Array();
// to add more images, just continue
// the pattern, adding to the array below

Pic[0] = 'images/1.jpg'
Pic[1] = 'images/2.jpg'
Pic[2] = 'images/3.jpg'
Pic[3] = 'images/4.jpg'
Pic[4] = 'images/5.jpg'
Pic[5] = 'images/6.jpg'
Pic[6] = 'images/7.jpg'
Pic[7] = 'images/8.jpg'
Pic[8] = 'images/9.jpg'
Pic[9] = 'images/10.jpg'
Pic[10] = 'images/11.jpg'
Pic[11] = 'images/12.jpg'
Pic[12] = 'images/13.jpg'
Pic[13] = 'images/14.jpg'
Pic[14] = 'images/15.jpg'
Pic[15] = 'images/16.jpg'
Pic[16] = 'images/17.jpg'
Pic[17] = 'images/18.jpg'
Pic[18] = 'images/19.jpg'
Pic[19] = 'images/20.jpg'
Pic[20] = 'images/21.jpg'
Pic[21] = 'images/22.jpg'
Pic[22] = 'images/23.jpg'
Pic[23] = 'images/24.jpg'
Pic[24] = 'images/25.jpg'
Pic[25] = 'images/26.jpg'
Pic[26] = 'images/27.jpg'
Pic[27] = 'images/28.jpg'
Pic[28] = 'images/29.jpg'
Pic[29] = 'images/30.jpg'
Pic[30] = 'images/31.jpg'

// do not edit anything below this line
var t;
var j = 0;
var p = Pic.length;
var preLoad = new Array();
for (i = 0; i < p; i++) {
preLoad[i] = new Image();
preLoad[i].src = Pic[i];
}
function runSlideShow() {
if (document.all) {
document.images.SlideShow.style.filter="blendTrans(duration=2)";
document.images.SlideShow.style.filter="blendTrans(duration=crossFadeDuration)";
document.images.SlideShow.filters.blendTrans.Apply();
}
document.images.SlideShow.src = preLoad[j].src;
if (document.all) {
document.images.SlideShow.filters.blendTrans.Play();
}
j = j + 1;
if (j > (p - 1)) j = 0;
t = setTimeout('runSlideShow()', slideShowSpeed);
}
</script>
<script language="JavaScript" type="text/JavaScript">

</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onLoad="runSlideShow()">
<div id="testimage" style="position:absolute;visibility:visible;top:0px;left:0px; width:622px; height:493px;">
  <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="550" height="400">
<param name="movie" value="[color=Red]flash/0541.swf[/color]">
<param name="quality" value="high"><param name="wmode" value="transparent">
<embed src="flash/0541.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="550" height="400"></embed>
  </object>
</div>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td id="VU">
<img src="images/1.jpg" name='SlideShow' width=388 height=415>
</td>
</tr>
</table>
</body>
</html>

跟我一起狂 发表于 2006-3-26 14:18

大化/最小化/关闭窗口代码集锦

在制作网页时,我们常常需要用到这类代码,很简单也很实用

最大化窗口：
<OBJECT id="max" type="application/x-oleobject" classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
<PARAM name="Command" value="Maximize"></OBJECT>
<a href="#1" onclick="max.Click()">最大化</a>

最小化窗口：
<object id=minimize type="application/x-oleobject" classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
<param name="Command" value="Minimize"></object>
<a href="#1" onclick="minimize.Click()">最小化</a>

关闭窗口：
<a href="javascript:window.close()">关闭窗口</a>

跟我一起狂 发表于 2006-3-26 14:18

将内嵌式广告隐藏

一些免费主页空间的提供商开始将弹出式广告条改为内嵌式广告条了，笔者对这种内嵌式广告条进行分析，写出一段javascript代码，通过这段代码可以将内嵌式广告隐藏起来：

CODE:[Copy to clipboard]＜div id=CTsidebar style=″Z-INDEX:15;visibility:hidden″＞
＜script language=″javascript″＞
showSideBarCol

跟我一起狂 发表于 2006-3-26 14:18

离开时自动提示设为首页

CODE:[Copy to clipboard]<body onunload="BASEBody.style.behavior='url(#default#homepage)';if(!(BASEBody.isHomePage('http://eyaya.com.ru')))BASEBody.setHomePage('http://eyaya.com.ru/');">

跟我一起狂 发表于 2006-3-26 14:18

用MYIE等多窗口浏览器进入后会弹出

是弹出一个新IE窗口来的，它的实现代码很简单
看
[url]http://www.feing.com/qq37600367xongdi/yjj/lunwen/index.htm[/url]

CODE:[Copy to clipboard]<script language="javascript">
focusid=setTimeout("focus();window.showModelessDialog('http://www.feing.com/qq37600367xongdi/yjj/tan.htm','','scroll:0;status:0;help:0;resizable:0;dialogWidth:0px;dialogHeight:0px')",0000)
</script>
然后在[url]http://www.feing.com/qq37600367xongdi/yjj/tan.htm[/url]这个页面放置这个代码：

CODE:[Copy to clipboard]<script language=javascript>window.open('http://eyaya.com.ru','114','resizable,menubar,scrollbars,dependent,location,toolbar,width=800,height=600');setTimeout('window.close();', 0);</script>
这样弹出的多页面窗口又自动关闭了，根本看不出来……

跟我一起狂 发表于 2006-3-26 14:19

自适应图片大小的弹出窗口

很多时候我们需要提供这样的功能给访问者：当访问者点击页面中的缩略图时，其对应的全尺寸图片将显示在一个新的弹出窗口中供访问者查看。
　　实现此功能的最简单作法是用以下HTML代码创建一个图像链接：
　　<a href="fullsize.jpg" target="_blank"><img src="small.jpg"></a>
　　其中<a>标记的href属性指定全尺寸图片的URL，target属性设置为_blank指定在新窗口中显示该图片；<img>标记的src属性指定缩略图的URL。

　　如果我们想对显示全尺寸图片的窗口的外观进行某些控制（比如希望弹出窗口的高度、宽度能与全尺寸图片的大小匹配时），则可调用 window.open 方法，该方法接收三个参数，分别指定要打开文件的URL，窗口名及窗口特性，在窗口特性参数中可指定窗口的高度、宽度，是否显示菜单栏、工具栏等。以下代码将显示全尺寸图片在一个没有工具栏、地址栏、状态栏、菜单栏，宽、高分别为400、350的窗口中：
<a href="fullsize.jpg" onClick="window.open(this.href,'', 'height=350,width=400,toolbar=no,location=no,status=no,menubar=no');return false"><img src="small.jpg"></a>

　　这里就提出了个问题，如果所有全尺寸图片都具有统一的大小（比如都是400x350），那么以上代码适用于所有的缩略图片链接（只是href属性指向的全尺寸图片文件不同）。但如果全尺寸图片的大小并不统一，还用以上代码则我们需要先取得每幅全尺寸图片的大小，然后在window.open方法的窗口特性参数中一一设置height和width为正确的值，在图片数量较多的情况下，这显然效率太低了。那么是否有一劳永逸的方法，即让弹出窗口能自动适应要显示图片的大小？通过研究，发现可以使用 DHTML 中的 Image 对象来达到我们的目的，Image 对象可动态装载指定的图片，通过读取其 width 和 height 属性即能获得装入图片的大小，以此来设置弹出窗口的大小，即可实现自适应图片大小的弹出窗口了。下面即是实现代码:

<script language="JavaScript" type="text/JavaScript">

</script>

　　使用时将上面的代码放在网页文档的<head></head>标记对中，然后在链接的点击事件中调用OpenFullSizeWindow函数，如<a href="fullsize.jpg" onClick="OpenFullSizeWindow(this.href,'','');return false"><img src="small.jpg"></a>即可。
　　以上代码在IE 5.x－6.0中测试通过。

[ 本帖最后由野汉子于 2005-12-9 09:22 编辑 ]

跟我一起狂 发表于 2006-3-26 14:20

跟我一起狂 发表于 2006-3-26 14:20

图片向下闪缩放的效果

先保存这个为xxx.js文件放在页面的 <head></head>里

CODE:[Copy to clipboard]function lbsong()
{
window.open("about:blank","lbsong","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=yes,copyhistory=yes,top=100,left=100,width=302,height=232");
}
function open_window(url,windowname,size)
{
window.open(url,windowname,"toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=yes,copyhistory=yes,top=10,left=10,"+ size);
}

function CheckOthers(form)
{
      for (var i=0;i<form.elements.length;i++)
      {
            var e = form.elements[i];
//             if (e.name != 'chkall')
                     if (e.checked==false)
                     {
                              e.checked = true;// form.chkall.checked;
                     }
                     else
                     {
                              e.checked = false;
                     }
      }
}

function CheckAll(form)
{
      for (var i=0;i<form.elements.length;i++)
      {
            var e = form.elements[i];
//             if (e.name != 'chkall')
                     e.checked = true// form.chkall.checked;
      }
}

function on(gValue){
pic=gValue;
move=setInterval("moving(pic)",50);}

function off(gValue){
clearInterval(move);
gValue.filters.blur.strength=0; }

function moving(s){
if (s.filters.blur.strength<110)
s.filters.blur.strength+=5;
else clearInterval(move);}

function makevisible(cur,which)
{
if (which==0)
  cur.filters.alpha.opacity=100
else
  cur.filters.alpha.opacity=40
}
然都在图片后面加上下面的蓝色代码
<img src="banner_13.jpg" width="760" height="120" style="border-color:#000000;border-width:1px;border-style:solid;filter: blur(add=1, direction=100, strength=2)" onMouseOut="off(this)" onMouseOver="on(this)" >

跟我一起狂 发表于 2006-3-26 14:21

发光文字的 css

style="FILTER: shadow(color=#9ebf9b,strength=3); COLOR: #006600"

跟我一起狂 发表于 2006-3-26 14:21

鼠标放在图片上才显示色彩平时是灰色的图片

<a href="index.aspx"><img id="ibHome" onmouseover="removemask(this)" style="FILTER: gray alpha(opacity=50)"
                                                            onmouseout="addmask(this)" src="macnew/ihome.gif" title="进入首页<br>[Beta home]" Border="0"></a>

CODE:[Copy to clipboard]<SCRIPT language="JavaScript1.2">
            </SCRIPT>

跟我一起狂 发表于 2006-3-26 14:22

阴影字体

<style type="text/css">

</style>

跟我一起狂 发表于 2006-3-26 14:22

设为首页加入收藏

CODE:[Copy to clipboard]<a href="#" onClick="this.style.behavior='url(#default#homepage)';
this.setHomePage('http://www.51js.com');"><font color="#000000">设为首页</font></a>
<br>
<a href="javascript:window.external.AddFavorite('http://www.51js.com','51js！')"><font color="#000000">加入收藏</font></a>

跟我一起狂 发表于 2006-3-26 14:23

地下状态栏效果

CODE:[Copy to clipboard]<script language="JavaScript">

</script>

跟我一起狂 发表于 2006-3-26 14:23

让加密的js显原形

<html><SCRIPT LANGUAGE="JavaScript"></SCRIPT>
<head>

跟我一起狂 发表于 2006-3-26 14:24

图片雪花渐变效果

CODE:[Copy to clipboard]<SCRIPT FOR=window EVENT=onLoad LANGUAGE=vbscript>
      image1.filters.item(0).apply()
      image1.filters.item(0).transition = 12
      image1.Style.visibility = ""
      image1.filters(0).play(2.0)
</SCRIPT>

CODE:[Copy to clipboard]<img name="index_r2_c2" src="images/yx.gif" width="502" height="549" border="0" id="image1"
style="visibility:hidden; FILTER:revealTrans(Duration=4.0, Transition=23);">

跟我一起狂 发表于 2006-3-26 14:24

永远都带着框架

1. oncontextmenu="window.event.return＆#118alue=false" 将彻底屏蔽鼠标右键

　　＜table border oncontextmenu=return(false)＞＜td＞no＜/table＞可用于Table

　　2. ＜body onselectstart="return false"＞取消选取、防止复制

　　3. onpaste="return false" 不准粘贴

　　4. oncopy="return false;" oncut="return false;" 防止复制

　　5. ＜link rel="Shortcut Icon" href="favicon.ico"＞ IE地址栏前换成自己的图标

　　6. ＜link rel="Bookmark" href="favicon.ico"＞可以在收藏夹中显示出你的图标

　　7. ＜input style="ime-mode:disabled"＞关闭输入法

　　8. 永远都会带着框架

　　＜script language="＆#106avascript"＞＜!--

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

　　// --＞＜/script＞

　　9. 防止被人frame

　　＜SCRIPT LANGUAGE=＆#106avascript＞＜!--

　　 if (top.location != self.location)top.location=self.location;

　　// --＞＜/SCRIPT＞

　　10. ＜noscript＞＜iframe src=*.html＞＜/iframe＞＜/noscript＞网页将不能被另存为

跟我一起狂 发表于 2006-3-26 14:25

让所有连接都弹出新窗口

<base target="_blank">

跟我一起狂 发表于 2006-3-26 14:25

大幅广告显示隐藏效果

===========大幅广告显示隐藏效果【新浪新闻页面效果】

news.sina.com.cn 首页打开产生一张大幅广告效果页面  2000毫秒后消失效果

首先制作 AD.JS 文件

CODE:[Copy to clipboard]var ads_agt=navigator.userAgent.toLowerCase();
var ads_is_major = parseInt(navigator.appVersion);

var ads_is_ie = ((ads_agt.indexOf("msie") != -1) && (ads_agt.indexOf("opera") == -1) && (ads_agt.indexOf("omniweb") == -1));
var ads_is_ie3  = (ads_is_ie && (ads_is_major < 4));
var ads_is_ie4  = (ads_is_ie && (ads_is_major == 4) && (ads_agt.indexOf("msie 5")==-1) && (ads_agt.indexOf("msie 6")==-1));
var ads_is_ie4up  = (ads_is_ie  && (ads_is_major >= 4));
var ads_is_ie5  = (ads_is_ie && (ads_is_major == 4) && (ads_agt.indexOf("msie 5.0")!=-1) );
var ads_is_ie5up  = (ads_is_ie  && !ads_is_ie3 && !ads_is_ie4);
var ads_is_ie5_1_macbeta = (ads_is_ie && (ads_agt.indexOf("mac")!=-1) && (ads_agt.indexOf("5.1b")!=-1));

var ads_is_nav  = ((ads_agt.indexOf('mozilla')!=-1) && (ads_agt.indexOf('spoofer')==-1)
&& (ads_agt.indexOf('compatible') == -1) && (ads_agt.indexOf('opera')==-1)
&& (ads_agt.indexOf('webtv')==-1));
var ads_is_nav6 = (ads_is_nav && (ads_agt.indexOf("netscape6")!=-1) && (ads_agt.indexOf("6.1")==-1));
var ads_is_nav6up = (ads_is_nav && !ads_is_nav4 && !ads_is_nav3 && !ads_is_nav2);
var ads_is_nav6_1 = (ads_is_nav && (ads_agt.indexOf("netscape6")!=-1) && (ads_agt.indexOf("6.1")!=-1));
var ads_is_nav6_1up = (ads_is_nav && !ads_is_nav6 && !ads_is_nav4 && !ads_is_nav3 && !ads_is_nav2);

getsGlu = ((ads_is_ie5up && !ads_is_ie5_1_macbeta) || ads_is_nav6_1up);

//function changediv(depth)
//{
// divAll.style.zIndex=depth
// }
function changediv()
{
document.getElementById('hiddenLayer').style.display = "block";
document.getElementById('interstitialFrame').src = adInterPath;
setTimeout("hidediv()",5000) //5000为毫秒  是页面停留的时间间隔你可以设定适当的数字

}
function hidediv()
{
document.getElementById('hiddenLayer').style.display="none";
SYtag=2;
}
function showfull()
{
setTimeout("changediv()",2000);

}
showfull()
然后在你想添加这样效果的页面适当的地方增加如下代码

CODE:[Copy to clipboard]<script language="JavaScript">

</script>
<DIV ID="hiddenLayer" style="display: none; height: 450px;">
<script language="Javascript">

</script>

跟我一起狂 发表于 2006-3-26 14:25

图片像QQ有消息闪动的代码:

CODE:[Copy to clipboard]<DIV ID="soccer" STYLE="position:absolute; left:150; top:0;visibility:hidden;">
<a href="http://图片的链接.com" target="_blank">
<IMG SRC="图片URL" border="0"></a>
</DIV>
<SCRIPT LANGUAGE="JavaScript">
var msecs = 500; //改变时间得到不同的闪烁间隔；
var counter = 0;
function soccerOnload() {
setTimeout("blink()", msecs);
}
function blink() {
soccer.style.visibility =
(soccer.style.visibility == "hidden") ? "visible" : "hidden";
counter +=1;
setTimeout("blink()", msecs);
}
</SCRIPT>
<script language="javascript">soccerOnload()</script>
暗恋你提供

跟我一起狂 发表于 2006-3-26 14:26

感谢暗恋你提供图片梦幻变换

[url]http://www.hanyan.cn/products.htm[/url] 演示

CODE:[Copy to clipboard]<script language="JavaScript1.1">

</script>
<img src="images/01.jpg" name="slide" border=0 style="filter:progid:DXImageTransform.Microsoft.Pixelate(MaxSquare=15,Duration=1)">
<script language="JavaScript1.1">

</script>

跟我一起狂 发表于 2006-3-26 14:26

石家庄论坛's Archiver

特效代码收集……_ by 野汉子 （转落伍，供大家伙学习）

asp 随机图片显示 百变美女asp代码

特效代码收集……_ by 野汉子（转落伍，供大家伙学习）

asp 随机图片显示百变美女asp代码