返回列表 回复 发帖

[转帖]网页制作经典代码集(2)

       20.load 进度条
<table cellspacing="0" cellpadding="0" bgcolor="#FFFFFF"          width="40%" id=""><tr><td>
         <table cellspacing="0" cellpadding="0" bgcolor="#0000FF"          height="18" id="Q"><tr><td></td></tr></table></td></tr></table>         
         </center>
         <script language=javascript>
         var R = 0; load();
         function load() {R = R + 2; Q.style.width = R + "%"; time= setTimeout("load()",50);         
         if (R > 100) {clearTimeout(time); P.style.width=0}}
         </script>
         27 全屏
         <script language=javascript>
         window.open('index.asp','','fullscreen=1');
         </script>
         21.背景图片滚动
<body scroll="no" background="images/bg.jpg" link="#00FF00"          alink="#FF0000" vlink="#00FF00" bgcolor="#000080"          topmargin="8">
         <script language="javascript">
         var backgroundOffset = 0;
         var bgObject = eval('document.body');
         function scrollBG(maxSize) {backgroundOffset = backgroundOffset + 1;
         if (backgroundOffset > maxSize) backgroundOffset = 0;
         bgObject.style.backgroundPosition = "0 " + backgroundOffset;}
         var ScrollTimer = window.setInterval("scrollBG(410)", 20)
         </script>
如果转萜,请注明转自-=e代时光=- http://www.cidu.net
22.网页不会被缓存
HTMl网页
         <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">
         ASP网页
          Response.Expires = -1
          Response.ExpiresAbsolute = Now() - 1
          Response.cachecontrol = "no-cache"
         PHP网页
         header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
         header("Cache-Control: no-cache, must-revalidate");
         header("ragma: no-cache");
         23.
<%
         '定义数据库连接的一些常量
         Const adOpenForwardOnly   = 0 '
游标只向前浏览记录,不支持分页、Recordset、BookMark
         Const adOpenKeyset     = 1 '
键集游标,其他用户对记录说做的修改将反映到记录集中,但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、BookMark         
         Const adOpenDynamic     = 2 '
动态游标功能最强,但耗资源也最多。用户对记录说做的修改,增加或删除记录都将反映到记录集中。支持全功能浏览(ACCESS不支持)。
         Const adOpenStatic     = 3 '
静态游标,只是数据的一个快照,用户对记录说做的修改,增加或删除记录都不会反映到记录集中。支持向前或向后移动
         Const adLockReadOnly    = 1 '
锁定类型,默认的,只读,不能作任何修改
         Const adLockPessimistic   = 2 '
当编辑时立即锁定记录,最安全的方式
         Const adLockOptimistic   = 3 '
只有在调用Update方法时才锁定记录集,而在此前的其他操作仍可对当前记录进行更改、插入和删除等
         Const adLockBatchOptimistic = 4 '
当编辑时记录不会被锁定,而更改、插入和删除是在批处理方式下完成的
         Const adCmdText = &H0001
         Const adCmdTable = &H0002
         %>
         24.最小化、最大化、关闭窗口
         <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">         
         <ARAM 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

25.判断上一页的来源
asp页:
         request.servervariables("HTTP_REFERER")
         javascript:
         document.referrer
         26.光标是停在文本框文字的最后
<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()">        
         说明:适用于表格数据提交
         如果转萜,请注明转自-=e代时光=- http://www.cidu.net
         27.怎样通过asp的手段来检查来访者是否用了代理
         <% if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>""          then
         response.write "<font color=#FF0000>您通过了代理服务器,"& _         
         "真实的IP为"&Request.ServerVariables("HTTP_X_FORWARDED_FOR")         
         end if
         %>
28.取得控件的绝对位置
<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>
         file://VBScript
         <script language="VBScript"><!--
         function getIE()
          dim t,l,a,b
          set a=document.all.img1
          t=document.all.img1.offsetTop
          l=document.all.img1.offsetLeft
          while a.tagName<>"BODY"
           set a = a.offsetParent
           t=t+a.offsetTop
           l=l+a.offsetLeft
          wend
          msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"         
         end function
         --></script>
说明:本例适用于JS

网页经典代码(二)
         29.滚动特效 cidu.net
         <marquee onMouseOver="this.stop()" onMouseOut="this.start()"          scrollamount="2"
scrolldelay="0"
direction="up" width="330" height="120"          border="0" align="center" id="MARQUEE1">
         <p>欢迎光临E代时光
我们地址是http://www.cidu.net
感谢
         </marquee>
         30.自动更新提示
         <body>
         <TABLE border=2 cellspacing=0 cellpadding=3>
         <TR><TD bgcolor="#000044">
         <FONT color="#4400ff" face=georgia,arial size=+1>
         <CENTER>
         <SCRIPT LANGUAGE="JavaScript">
         <!--
         document.write(document.title);
         //-->
         </SCRIPT>
         </TD></TR>
         <TR><TD bgcolor="#440000">
         <FONT size=-1 color="#ff0000" face="trebuchet MS","arial">
         <SCRIPT LANGUAGE="JavaScript">
         <!-- Begin
         function getCookieVal (offset) {
         var endstr = document.cookie.indexOf (";", offset);
         if (endstr == -1)
         endstr = document.cookie.length;
         return unescape(document.cookie.substring(offset, endstr));
         }
         function GetCookie (name) {
         var arg = name + "=";
         var alen = arg.length;
         var clen = document.cookie.length;
         var i = 0;
         while (i < clen) {
         var j = i + alen;
         if (document.cookie.substring(i, j) == arg)
         return getCookieVal (j);
         i = document.cookie.indexOf(" ", i) + 1;
         if (i == 0) break;
         }
         return null;
         }
         function SetCookie (name, value) {
         var argv = SetCookie.arguments;
         var argc = SetCookie.arguments.length;
         var expires = (argc > 2) ? argv[2] : null;
         var path = (argc > 3) ? argv[3] : null;
         var domain = (argc > 4) ? argv[4] : null;
         var secure = (argc > 5) ? argv[5] : false;
         document.cookie = name + "=" + escape (value) +
         ((expires == null) ? "" : ("; expires=" + expires.toGMTString()))          +
         ((path == null) ? "" : ("; path=" + path)) +
         ((domain == null) ? "" : ("; domain=" + domain)) +
         ((secure == true) ? "; secure" : "");
         }
         function DeleteCookie(name) {
         var exp = new Date();
         FixCookieDate (exp);
         exp.setTime (exp.getTime() - 1);
         var cval = GetCookie (name);
         if (cval != null)
         document.cookie = name + "=" + cval + "; expires="          + exp.toGMTString();
         }
         var cookie_date=new Date(document.lastModified);
         var expdate = new Date();
         expdate.setTime(expdate.getTime()+(5*24*60*60*1000));
         document.write("<Font color=ff8800>" + "上次更新时间: "+          "</font>" +document.lastModified);
         document.write("");
         if (!(cookie_date == GetCookie("cookie_date"))){
         SetCookie("cookie_date",cookie_date,expdate);
         document.write("<font color='yellow'>
         站点上次更新!</font>
         ");
         }
         // End -->
         </SCRIPT>
         </FONT>
         </TD></TR>
         </TABLE>
         </CENTER>
         </body>
31.关于表格提交的几种格式
<input type=text name=txtPostalCode onKeypress="if (event.keyCode          < 45 || event.keyCode > 57) event.returnvalue = false;">
         限制输入字符,你可以改变KEYCODE的值来限制输入。你将KEYCODE的值设为极大和极小就什么也不能输入了。这个可以屏蔽你想屏蔽的字符有一定的选择性..
         <INPUT type="text" name="username" value="james"          disabled>
         使用disabled属性后的区域的值,不能被传递给其他的程序(ASP/CGI)去处理,如果你非要传递请通过隐藏属性去做。这个比较单一,功能不强。一般用于未完成的站点。
         <INPUT type="text" name="partNumber" value="1500"          readonly>
         readonly属性顾名思义是“只读”。它将TEXT转化为一个对象,禁止对它进行编辑。你虽然可以通过TAB键在多个TEXT区域间切换,但是不能修改已经指定的TEXT区的值。
但是它不象Disabled属性那样,可以进行正常的数值传递。 :ht06:

                     我是一个呼吸着现在的空气而生活在过去的人
               这样的注定孤独,孤独的身处闹市却犹如置身于荒漠
                                     我已习惯了孤独,爱上孤独
                                 他让我看清了自我,还原了自我
                             让我再静静的沉思中得到快乐和满足
                                   再孤独的世界里我一遍又一遍
                                   不厌其烦的改写着自己的过去
                                             延伸到现在与未来
                                       然而那只是泡沫般的美梦
                                 产生的时刻又伴随着破灭的到来
                         在灰飞烟灭的瞬间我看到的是过程的美丽
                                      而不是结果的悲哀。。。
返回列表