ASP去除HTML标记
Function LoseHtml(ContentStr)
Dim ClsTempLoseStr,regEx
ClsTempLoseStr = Cstr(ContentStr)
Set regEx = New RegExp
regEx.Pattern = "<\/*[^<>]*>"
regEx.IgnoreCase = True
regEx.Global = True
ClsTempLoseStr = regEx.Replace(ClsTempLoseStr,"")
LoseHtml = ClsTempLoseStr
End function
相关文档：
<%
for i=1 to rs.recordCount '变量i从1循环到数据库中的全部记录数
if (i mod 1 =1) then '每个tr即每行显示1个记录,可根据需要自行修改, 将左边的1修改为2即显示两行。
response.write "<tr align='center'>"
end if
%>
此处为要循环的内容
<%if (i mod 1 = 0) then ......
IIS默认的错误页是很不友好的，很多人看到默认的错误页时都会说：网站打不开了！白白损失了这部分流量。而如果错误页直接跳转到首页又对搜索引擎很不友好，搞不好首页还会被封掉。所以根据情况，有两个方法解决这个问题：
如果是博客等内容型的网站，可以返回一个带有404错误的搜索框让访客搜索，若是电子商务型网站 ......
ASP系列函数大全-网上收集的一些ASP函数及表达式
ASP函数
大全
ASP函数与VBSCRIPT类似，以下举一些常用的函数
Array()
函数返回一个数组
表达式 Array(list)
允许数据类型: 字符，数字均可
实例： <%
Dim
myArray()
For i = 1 to 7
Redim Preser ......
最近写站内搜索，所以研究了一下算法，该算法的原理如图显示。
以下是一个用asp写的简单的分词程序主要的代码，词库我已经用access建立好了。
如果要注重效率，MarLen的选取很是重要，否则效率会十分低下，这里MarLen我选取的是5。
dim faword : faword = ""
do while (len(fword) > 0)
tword = left(fwor ......
'SQL防注入函数，调用方法，在需要防注入的地方替换以前的request("XXXX")为SafeRequest("XXXX")
'www.yongfa365.com
Function
SafeRequest(ParaValue)
ParaValue =
Trim
(
Request
(Pa ......
