网页经典代码4

网页经典代码（四） 

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("Pragma: no-cache");
　
　
23. 定义数据库连接的一些常量
<%
'定义数据库连接的一些常量
Const adOpenForwardOnly　　 = 0 '游标只向前浏览记录，不支持分页、Recordset、
BookMark
Const adOpenKeyset　　　　 = 1 '键集游标，其他用户对记录说做的修改将反映到记
录集中，但其他用户增加或删除记录不会反映到记录集中。支持分页、Recordset、Boo
kMark
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">
<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
　
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" >
说明：适用于表格数据提交
如果转萜，请注明转自-=e代时光=- http://www.e3i5.com
　
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.滚动特效
<marquee scrollamount="2
" scrolldelay="0" direction="up" width="330" height="120" border="0" align="
center" id="MARQUEE1">
<p>欢迎光临阳春学生网
我们地址是http://www.ycuu.net
感谢
</marquee>