08 2009 档案

摘要:适合平台:IE6,IE7输入你的内容来这里看看,,这个文本框能自动适应你的内容多少,自动伸缩高度输入你的内容来这里看看,,这个文本框能自动适应你的内容多少,自动伸缩高度<TEXTAREA STYLE="WIDTH:300PX;OVERFLOW-Y:VISIBLE">输入你的内容来这里看看,,这个文本框能自动适应你的内容多少,自动伸缩高度</TEXTAREA> 阅读全文

posted @ 2009-08-11 14:36 严武 阅读(192) 评论(0) 推荐(0) |

摘要:自动返回上一页并自动刷新的方法Response.redirect(request.servervariables("http_referer")) 指定刷新另外一个页面window.opener.location.reload("url"); 阅读全文

posted @ 2009-08-10 19:21 严武 阅读(242) 评论(0) 推荐(0) |

摘要:把这一句加到<HEAD></HEAD>里面,不就OK了! <meta http-equiv="refresh" content="900;url=<%=Request.ServerVariables("SCRIPT_NAME")%>"> 阅读全文

posted @ 2009-08-10 17:11 严武 阅读(161) 评论(0) 推荐(0) |

摘要:<% OptionExplicit Response.Buffer=True Response.Expires=-1 Session.TimeOut=60 CallCom_CreatValidCode("Validatecode") SubCom_CreatValidCode(pSN) ’禁止缓存 Response.Expires=-9999 Response.AddHeader"Pragma","no-cache" Response.AddHeader"Cache-Control","no-cac 阅读全文

posted @ 2009-08-09 22:00 严武 阅读(335) 评论(0) 推荐(0) |

摘要:<% Sub ImageValidCode(sName) Response.Expires = -1 Response.AddHeader "Pragma","no-cache" Response.AddHeader "cache-ctrol","no-cache" Response.ContentType = "Image/BMP" Randomize Dim i, ii, iii Const cOdds = 4 '杂点出现的机率 Const cAmount = 36 ' 阅读全文

posted @ 2009-08-09 21:56 严武 阅读(771) 评论(0) 推荐(0) |

摘要:<!--#include file="common/conn.asp"--> <!--#include file="common/sub.asp"--> <% server_v1=Cstr(Request.ServerVariables("HTTP_REFERER")) Response.Write(server_v1) server_v2=Cstr(Request.ServerVariables("SERVER_NAME")) if mid(server_v1,8,len(serve 阅读全文

posted @ 2009-08-07 17:42 严武 阅读(292) 评论(0) 推荐(0) |

摘要:if Request("表单名称")<>Session("getcode") then Response.write "<script language=javascript> alert('输入验证码不对!');</script>" Response.write "<script language=javascript> window.location.href='Login.asp';</script>" 阅读全文

posted @ 2009-08-05 00:47 严武 阅读(136) 评论(0) 推荐(0) |

摘要:ASP判断文件地址是否有效dcadsasdasfbgsfsdfasfgdfgsdfada 阅读全文

posted @ 2009-08-04 23:09 严武 阅读(110) 评论(0) 推荐(0) |

摘要:http://hi.baidu.com/vc1235/blog/item/c422889420a0451bd21b70e0.html 阅读全文

posted @ 2009-08-04 17:44 严武 阅读(156) 评论(0) 推荐(0) |

摘要:<%Call Com_CreatValidCode("ValidCode")Sub Com_CreatValidCode(pSN)' 禁止缓存Response.Expires = -9999 Response.AddHeader "Pragma","no-cache"Response.AddHeader "cache-ctrol","no-cache"Response.ContentType = "Image/BMP"RandomizeDim i, ii, ii 阅读全文

posted @ 2009-08-04 16:30 严武 阅读(562) 评论(0) 推荐(0) |

摘要:<img src="code.asp" alt="点击换一个验证码" name="Code" width="118" height="34" style="cursor:hand" onClick="this.src='code.asp'" > 阅读全文

posted @ 2009-08-04 16:26 严武 阅读(224) 评论(0) 推荐(0) |

摘要:如今你要申请一个QQ号,需要输入很复杂的验证码:验证码由若干个汉字组成,还加上了花哩唬哨的背景,使得有些汉字实在难以辨认。腾讯这么做,是为了防止有人利用软件批量获取QQ号码----每次提交都要输入随机生成的验证码,这是软件难以做到的。 最初的验证码,只是几个随机生成的数字。但是道高一尺魔高一丈,很快就有能识别数字的软件了,“收藏家”们利用这种软件批量获取帐号,或是探测密码,因为软件可以不知疲倦地不断submit。于是,出现了图片形式的验证码,还要加上无规则的背景,既然人眼都难以分辨,想来软件分辨起来就有一定的难度。但是腾讯开始采用汉字图片做验证码,是不是意味着破解验证码的技术又有了新进展,带. 阅读全文

posted @ 2009-08-04 16:23 严武 阅读(260) 评论(1) 推荐(0) |

摘要:空闲时候写的一些jquery小代码,虽然就几分钟完成的小代码,但每天保持练习,不至于头脑会生锈;1、按钮倒数10秒之后才能点击。这个效果一般在一些论坛注册时候用到比较多,废话少说,直接上代码:<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"&g 阅读全文

posted @ 2009-08-04 16:17 严武 阅读(235) 评论(0) 推荐(0) |

摘要:/*解题报告本题思路主要是用余数互补,例如:25%8,商为3,余数为1,也就是说它有3个8,多出一个1,只要它再加上一个7变成25+7=32就能被8整除,然后我们要用一个HASH[][]2维数组来存放整除和不能整除的数,例如HASH[0][8]表示存放排列数十进制数除8余数为0的排列数的十进制数,HASH[1][8]表示存放排列数十进制数除8余数为1的排列数的十进制数,以此类推,存放完毕后,就可以直接调用HASH数组即可,当输入后两个数,要是12 8,那只要用12%8,然后余数为4,也就是说只要在加上一个4凑合成另外一个8就能被8整除,因此(HASH[0][8]+8)-4,防止HASH[0][ 阅读全文

posted @ 2009-08-03 22:52 严武 阅读(281) 评论(0) 推荐(0) |

摘要:以下是引用片段: Function c2u(myText) Dim i c2u = "" For i = 1 to Len(myText) c2u = c2u & "&#x" & Hex(AscW(Mid(myText, i, 1))) & ";" Next End Function 以下是引用片段: Function cutStr(str,strlen) '去掉所有HTML标记 Dim re Set re=new RegExp re.IgnoreCase =True re.Global=Tru 阅读全文

posted @ 2009-08-03 22:49 严武 阅读(248) 评论(0) 推荐(0) |

博客园  ©  2004-2026
浙公网安备 33010602011771号 浙ICP备2021040463号-3