摘要:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd"> <HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD><TITLE></TITLE> <META http-equiv=X-UA-Compatible content=IE=7> 阅读全文
2009年11月11日 #
摘要:
<html> <head> <title>无标题文档</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <STYLE type=text/css> #scrollerContent {POSITION: absolute} body {font-size:9pt;color:#660000;text-decoration: none} </STYLE> <scri 阅读全文
2009年11月10日 #
摘要:
持所有浏览器,包括IE8,FF和OPERA<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd"> <HTML><HEAD> <META http-equiv=Content-Type content="text/html; charset=utf-8"> <LINK media=screen 阅读全文
2009年11月9日 #
摘要:
<!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"> <head> <meta http-equiv="Content-Type" content="text/html; charset=g 阅读全文
2009年11月3日 #
摘要:
这个是由asp二级侧拉菜单改的 <script language="javascript"> // JavaScript Document startList = function() { if (document.all && document.getElementById) { navRoot = document.getElementById("nav"); for (i=0; i<navRoot.childNodes.length; i++) { node = navRoot.childNodes[i]; if 阅读全文
2009年11月1日 #
摘要:
<?php function ff_page($content,$page) { global $expert_id; $PageLength = 2000; //每页字数 $CLength = strlen($content); $PageCount = floor(($CLength / $PageLength)) + 1; //计算页数 $PageArray=array(); $Seperator = array("/n","/r","。","!","?",";" 阅读全文
2009年10月30日 #
摘要:
支持FF等所有浏览器 向左滚动,每次滚动的长度可以设置,然后暂停后继续滚动<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd"> <HTML><HEAD> <META http-equiv=Content-Type content="text/html; charset=utf-8"> <LI 阅读全文
摘要:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd"> <HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD> <META http-equiv=Content-Type content="text/html; charset=gbk"> 阅读全文
2009年10月26日 #
摘要:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd"> <HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD> <META http-equiv=Content-Type content="text/html; charset=utf-8"& 阅读全文
2009年10月21日 #
摘要:
meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <meta http-equiv="Content-Language" content="zh-CN" /> <meta content="all" name="robots" /> <meta name="author" content="盛飞, SenFe" 阅读全文
摘要:
$ip = "1.1.1.255".chr(0)."haha"; if(ereg("^[0-9]{1,3}/.[0-9]{1,3}/.[0-9]{1,3}/.[0-9]{1,3}$",$ip)) { echo $ip; } else { echo "unknown"; } 这个ereg正则限制了$ip的数据为xxx.xxx.xxx.xxx这样的形式,表面上看上面的代码应该输出"unknown",而实际却输出了"1.1.1.255haha",因为ereg函数存在NULL截断漏洞 阅读全文
2009年10月19日 #
摘要:
asp常用的正则表达式实现字符串的替换,主要包括去除html标签,去除class标签和去除script标签等 去除html标签正则<//*[^<>]*> Function LoseHtml(ContentStr) Dim ClsTempLoseStr,RegEx ClsTempLoseStr = Cstr(ContentStr) Set RegEx = New RegExp RegEx.Pattern = "<//*[^<>]*>" RegEx.IgnoreCase = True RegEx.Global = True Cls 阅读全文
摘要:
用asp实现的去除内容的html标记和空格的实现代码 function nohtml(str) dim re Set re=new RegExp re.IgnoreCase =true re.Global=True re.Pattern="(/<.[^/<]*/>)" str=re.replace(str," ") re.Pattern="(/<//[^/<]*/>)" str=re.replace(str," ") str=replace(str," ",& 阅读全文
2009年10月11日 #
摘要:
PHP正则校验email的代码相信好好学过PHP的人都应该知道下面这段用于eamil校验的语句,但是真正能看懂的就不多了 <?php if (eregi("^[_.0-9a-z-]+@([0-9a-z][0-9a-z-]+.)+[a-z]{2,3}$",$email)) { echo "您的 E-Mail 通过初步检查"; } ?> 在这句话里,首先是应用了一个eregi函数,这个函数还算好理解。随便找本书,就能给你一段解释: 语法: int ereg(string pattern, string string, array [regs]); 阅读全文
摘要:
asp下过滤重复字符串的代码,有时候我们需要过滤一些重复的字符串,下面的代码即可解决这个问题 比如 1223445677777778aabbcccccccccc 经过过滤之后就是12345678abc <% '过滤重复 Function norepeat(Str) Dim RegEx If IsNull(Str) Or Str="" Then Exit Function Set RegEx=New RegExp RegEx.Global = True RegEx.IgnoreCase=True RegEx.MultiLine = True RegEx.patt 阅读全文
2009年10月4日 #
摘要:
Function DRexPage(Str) Dim RegEx If IsNull(Str) Or Str="" Then Exit Function Set RegEx=New RegExp RegEx.IgnoreCase=True RegEx.pattern="(/&)?page=(/d)+" DRexPage=regEx.replace(Str,"") '(Str,"$1") Set RegEx=Nothing End Function 在分页系统里面用到的把page后面得东西都给丢掉 阅读全文
摘要:
这个图片正则先检查图片的地址,不是本地的则用本地的asp突破盗链,方便使用 直接用正则替换,但没有判断功能 Function FormatImg(content) dim re Set re=new RegExp re.IgnoreCase =true re.Global=True re.Pattern="(script)" Content=re.Replace(Content,"script") re.Pattern="<img.[^>]*src(=| )(.[^>]*)>" Content=re.repla 阅读全文
摘要:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=GB2312" /> <title><a href="http://www.jb51.net/list/list_ 阅读全文
2009年9月28日 #
摘要:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>20060427simulate 163</title> &l 阅读全文
2009年9月23日 #
摘要:
<!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"> <head> <meta http-equiv="Content-Type" content="text/html; charset=u 阅读全文