本帖將收集和征集最全面的ASP編程應用中通用功能函數，人人為我，我為人人：） 只要大家每人獻出一兩條自己收藏已久，精典的通用函數，我想本帖將會對許許多多的ASP

去除HTML代碼中所有標簽復制代碼 代碼如下:<% ****************************** 函數：RemoveHTML_A(strT

Chr 函數 返回與指定的 ANSI 字符代碼相對應的字符。 Chr(charcode) charcode 參數是可以標

這是我自己的心得，給大家作個參考。 我的目的是讓開發變得簡單，盡可能少地考慮實現語句，更多地把精力用於思考業務邏輯。希望我的文章對大家有所啟發和幫助。 如果你對

<% ****************************** 函數：RemoveHref_A(HTMLstr) 參數：HTMLstr，待去除鏈接的字

截取字符串特定部分內容函數<% ****************************** 函數：GetKey(HTML,Start,Last) 參數：

<% ****************************** 函數：Userip() 參數：無 作者：阿裡西西 日期：2007/7/12 描述：取得

<% ****************************** 函數：GetMax(str) 參數：str，待處理的數字數組，以,分隔多了數字 作者：

<% ****************************** 函數：FormatDate(DateAndTime, para) 參數：Da

<% ****************************** 函數：MakePassword(byval maxlen) 參數：maxle

<% ****************************** 函數：comma(str) 參數：str，待處理的數字 作者：阿裡西西 日期：2007

返回上一頁，一般用在判斷信息提交是否完全之後<% ****************************** 函數：GoBack() 參數：無 作者：阿

復制代碼 代碼如下:<%Function MoveR(Rstr) Dim i,SpStr SpStr = Split(Rstr,,) For i = 0

<% ****************************** 函數：NewOrder(ArrStr) 參數：Rstr,以逗號做分隔的數字數組 作者：

核心代碼：驗證輸入網址是否有效並可以訪問<% ****************************** 函數：UrlOK(strURL) 參數：str

驗證Ip格式<% ****************************** 函數：CheckIp(paR_strIp) 參數：str 要檢測

<% ****************************** 函數：gen_key(digits) 參數：digits----要生成隨機數的位數 作

<% ****************************** 函數：formatQueryStr(str) 參數：str,SQL語句 作者：阿裡西西

<% ****************************** 函數：ShowServerVar(VarName) 參數：VarName，如提供變量名

<% ****************************** 函數：GetUserTrueIP() 參數：無 作者：阿裡西西 日期：2007/7/1