常用ASP函数的介绍

ASP函数在asp网页编程实现功能中是必需部分，但是你对ASP函数了解吗？其实我们只要掌握几个常用的ASP函数即可，那么我们现在就去看看常用ASP函数的介绍。

========取得带端口的URL，推荐使用================?
Function?Get_ScriptNameUrl()?
If?request.servervariables("SERVER_PORT")="80"?Then?
Get_ScriptNameUrl="http://"?&?request.servervariables("server_name")&lcase(request.servervariables("script_name"))?
Else?
Get_ScriptNameUrl="http://"?&?request.servervariables("server_name")&":"&request.servervariables("SERVER_PORT")&lcase(request.servervariables("script_name"))?
End?If?
End?Function?
上文就是常用ASP函数的介绍，看完后你对ASP函数了解了吗？


'=================用正则表达式突出显示字符串中查询到的单词的函数======================?
Function?BoldWord(strContent,word)?
If?word=""?Then?
BoldWord?=?strContent?
Exit?Function?
End?IF?
dim?objRegExp?
Set?objRegExp=new?RegExp?
objRegExp.IgnoreCase?=true?
objRegExp.Global=True?

objRegExp.Pattern="("?&?word?&?")"?
strContent=objRegExp.Replace(strContent,"<font?color=""#FF0000""><b>$1</b></font>"?)?

Set?objRegExp=Nothing?
BoldWord=strContent?
End?Function?



'===============取得用户当前IP地址===================?
Function?GetIP()?
uIP?=?Request.ServerVariables("HTTP_X_FORWARDED_FOR")?
If?uIP?=?""?Then?uIP?=?Request.ServerVariables("REMOTE_ADDR")?
GetIp?=?uIP?
End?Function?

'===============取得当前程序脚本路径==================?
Function?GetScriptName()?
ScriptAddress?=?CStr(Request.ServerVariables("SCRIPT_NAME"))'取得当前地址?
If?(Request.QueryString?<>?"")?Then?
ScriptAddress?=?ScriptAddress?&?"?"?&?Server.HTMLEncode(Request.QueryString)'取得带参数地址?
End?If?
If?Len(ScriptAddress)>250?Then?ScriptAddress?=?Left(ScirptAddress,250)&"..."?'进行路径截取，最大为250个字符?
GetScriptName?=?ScriptAddress?
End?Function?




'===========返回带参数的Url，多关键字排序时使用==============?
'?RemoveList?参数：需要从Url中去除的参数，可以是多个，中间请用逗号隔开?
Function?KeepUrlStr(RemoveList)?
ScriptAddress?=?CStr(Request.ServerVariables("SCRIPT_NAME"))&"?"'取得当前地址,并加入“?”符号?
M_ItemUrl?=?""?
For?Each?M_item?In?Request.QueryString?
If?InStr(RemoveList,M_Item)=0?Then?
M_ItemUrl?=?M_ItemUrl?&?M_Item?&"="&?Server.URLEncode(Request.QueryString(""&M_Item&""))?&?"&"?
End?If?
Next?
KeepUrlStr?=?ScriptAddress?&?M_ItemUrl?
End?Function?

原文链接:https://js.aizhan.com/develop/asp/6192.html
如有疑问请与原作者联系

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有