JS实现页面定时跳转/自动重定向
作者:edwin 日期:2010-07-07
以下代码来源于网络，有效，可直接使用。本人亦作了一点点优化。
<script language="javascript" type="text/javascript">
var hwd;
var intSec = 3;//这里定义时间：秒
function reHandle()
{
if(intSec==0)
window.location.href = 'http://edwin.jkqun.com/blog/article.asp?id=245';
else
{
intSec--;
}
hwd = setTimeout(reHandle,1000);
}
reHandle();
document.write('<p><span id="tiao">'+intSec+'</span>秒后自动跳转…</p>')
</script>
Asp过滤HTML特定代码的函数
作者:edwin 日期:2010-03-24
Asp过滤HTML的函数：过滤图片、链接.....
Function RemoveHTML(strHTML)
Dim objRegExp, Match, Matches
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True
'取闭合的<>
objRegExp.Pattern = "<.+?>"
'进行匹 配
Set Matches = objRegExp.Execute(strHTML)
' 遍历匹配集合，并替换掉匹配的项目
For Each Match in Matches
strHtml=Replace(strHTML,Match.Value,"")
Next
RemoveHTML=strHTML
Set objRegExp = Nothing
End Function
引用举例：
