ASP通用函数收集_@fw2)carddcardd.-CSDN博客

本文链接：https://blog.csdn.net/anglecloudy/article/details/2277277

1.1将HTML标记转化为普通字符：
server.HtmlEncode(Content)
1.2将HTML标记转化为普通字符且转换文本中所有的超链接和电子邮件格式
<%
Function to_html(s_string)
    to_html = Replace(s_string, """", """)
    to_html = Replace(to_html, "<", "<")
    to_html = Replace(to_html, ">", ">")
    to_html = Replace(to_html, vbcrlf, "<br>")
    to_html = Replace(to_html, "/<", "<")
    to_html = Replace(to_html, "/>", ">")
    to_html = edit_hrefs(to_html)
End Function
%>

s_str = s_str.replace(//bhttp/:www(/.[/w+/./:///_]+)/gi,
"http/:¬¤¸$1");

    s_str = s_str.replace(//b(http/:/w+/.[/w+/./:///_]+)/gi,
        "<a href=/"$1/">$1<//a>");

    s_str = s_str.replace(//b(www/.[/w+/./:///_]+)/gi,
        "<a href=/"http://$1/">$1</a>");

    s_str = s_str.replace(//bhttp/:¬¤¸(/.[/w+/./:///_]+)/gi,
        "<a href=/"http/:www$1/">http/:www$1</a>");

    s_str = s_str.replace(//b(/w+@[/w+/.?]*)/gi,
        "<a href=/"mailto/:$1/">$1</a>");


    return s_str;
}
</script>
－－－－－－－－－－－－－－－－－－－－－
2、身份证号码验证函数：(javascript)
function checkCard(dcardid)

{

var pattern;

if (dcardid.length==15)

{

pattern= /^/d{15}$/;//正则表达式,15位且全是数字

if (pattern.exec(dcardid)==null)

{

alert("15位身份证号码必须为数字！")

return false;

}

if (!isdate("19"+dcardid.substring(6,8),dcardid.substring(8,10),dcardid.substring(10,12)))

{

alert("身份证号码中所含日期不正确")

return false;}

}

else if (dcardid.length==18)

{

pattern= /^/d{17}(/d|x|X)$/;//正则表达式,18位且前17位全是数字，最后一位只能数字,x,X

if (pattern.exec(dcardid)==null)

{

alert("18位身份证号码必须为数字！")

return false;

}

if (!isdate(dcardid.substring(6,10),dcardid.substring(10,12),dcardid.substring(12,14)))

{

alert("身份证号码中所含日期不正确")

return false;

}

var strJiaoYan =[ "1", "0", "X", "9", "8", "7", "6", "5", "4", "3", "2"];

var intQuan =[7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2, 1];

var intTemp=0;

for(i = 0; i < dcardid.length - 1; i++)

intTemp += dcardid.substring(i, i + 1) * intQuan[i];

intTemp %= 11;

if(dcardid.substring(dcardid.length - 1,dcardid.length).toUpperCase()!=strJiaoYan[intTemp])

{

alert("身份证末位验证码失败！")

return false;

}

else

{

alert("身份证号长度必须为15或18！")

return false;

}

return true;

}
-----------------------------------------------------------------------------------------------------------------------
3、验证必需为中文：(javascript)
var str="abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ,./'[]{}`1234567890-=/~!@#$%^&*()_+|?><:";
var errorChar
errorChar = isCharsInBag(表单需验证的参数,str)
if (errorChar != "" )
{
alert('联系人姓名必须是中文！');
postart.dusername.focus();
return false;
}
function isCharsInBag (s, bag)
{
var i,c;
for (i = 0; i < s.length; i++)
{
c = s.charAt(i);//字符串s中的字符
if (bag.indexOf(c) > -1)
return c;
}
return "";
}
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
4、创建文件
<%
wstr="文件中的文字"
Set fso=Server.CreateObject("Scripting.FileSystemObject")
set fw=fso.createtextfile(server.mappath("adpic/003.htm"),true)
fw.writeline wstr
fw.close
set rs=nothing
set fso=nothing
%>
-----------------------------------------------------------------------------------
5、禁用右键：
<script language="Javascript">
var mMsg = "你的鼠标右键被禁止了!";

Function getRndNumber(lowerbound,upperbound)
Randomize
getRndNumber=Int((upperbound-lowerbound+1)*Rnd+lowerbound)
End Function
Response.Write GetRnd(1,1000)
%>
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－