asp过滤函数
⑴ ASP中如何调用自定义函数
写函数正确，抄但调用有点错误袭
自写函数，调用不能直接写函数名调用
应该是：
call xianshi(a,b)
或者
<%=xianshi(a,b)%>
如果把你的函数改成子程序，到是可以像你那样调用，但不需要括号
如下
sub xianshi(x,y)
response.write x&“<br>”response.write y+1end sub a="asbcd"b=3xianshi a,b
⑵ ASP如何截取字符串函数
基本函数
left（要截取的字符串，要截取的长度）’从左边开始截取指定长度的字符
right（要截取的字符串，要截取的长度）’从右边开始截取指定长度的字符
MID(要截取的字符串,开始截取的位置, 要截取的长度)从任意位置开始截取指定长度的字符
函数型
'Strsub
'函数功能：字符串截取.
'参数意义：str --- 要截取的字符串. lennum--截取的字符数. s--结尾字符
Function Strsub(str,lennum,s)
If Not IsNull(str) Then
Dim p_num,x
Dim i
If strlen(str)<=lennum Then
Strsub=str
Else
p_num=0
x=0
Do While Not p_num > lennum-2
x=x+1
If Asc(Mid(str,x,1))<0 Then
p_num=Int(p_num) + 2
Else
p_num=Int(p_num) + 1
End If
Strsub=Left(Trim(str),x)&s //截取后定义超出部分内容的显示方式
Loop
End If
Else
Strsub="Null"
End If
End Function
'调用
<%=Function Strsub("aaaaaaaaaa",3,"...")%>
'将输出:aaa...
你到CSDN上面去看看有很多值得学习的东西，能帮你解决很多问题，祝你早日解决问题！
⑶ asp过滤所有的html代码函数
应该是可以过掉所有的标签的.大小写已经忽略,全局已经打开,多行也打开着,看了一下你的匹配式回也答是正确的啊.你过不掉的可能是因为中间有空间,而[^>]表示的是不包含>的所有字符.怎么会过滤不掉呢?
"<[\/]?\w+(\s+\w+\=[\"]?\w+[\"]?)*[\/]?>"
这样试试如何
⑷ asp函数中的除法
取2位是用
round()函数
round(i/365,2)
取整数的话,转为 int型 自动变了.
上面的会四舍五入.
取余数 用 mod()
i=568
x=365
i Mod x
⑸ ASP中instr函数的用法
例如a,b,c三个字符串
a="abcdefg" b="cd" c="xz"
instr(1,a,b)的返回值是3 表示b字符串出现在第3个字符开始的位置
instr(1,a,c)的返回值为回0 表示C字符串不出答现在a字符串中
instr(2,a,b)的返回值是3 表示b字符串存在于第2位开始的a字符串中，出现的位置在a字符串的第3个字符开始的位置
instr(2,a,c)的返回值为0 表示C字符串不出现在从第2位开始的a字符串中
instr(4,a,b)的返回值是0 表示b字符串不出现在从第4位开始的a字符串中
instr(4,a,c)的返回值为0 表示C字符串不出现在从第4位开始的a字符串中
由此可见
start表示从第几位开始比对
返回值如果不是0的话表示string2出现在string1的第一个字符开始算起的第n个字符的位置
⑹ asp程序，怎么可以把下面的话中间的空格全部过滤掉！不要告诉我一个一个删！！！我要的是过滤函数！
1，用记事本编辑
2，点击编辑
3，替换
4，查找内容为“空格” 替换为那里什么都不用填
5，点击“替换”
这样就好了
⑺ asp中，删除多余空格的函数是什么
百宝袋来 十级啊,高人呢.
replace还有这功自能啊,长见识了.
不过这种问题最好用正则来解决了.
======================
Function RegExpTest(strng)
Dim regEx ' 建立变量。
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = " +" ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分字符大小写。
regEx.Global = True ' 设置全局可用性。
regexptest = regEx.Replace(strng," ")
End Function
MsgBox (regexptest("dfrg refrfe eee"))
======================================
以上代码自己测试过.
正则很有用的,特别是在vb中,vb处理字符串的能力不怎么强大,但有了正则,嘿嘿,和javascript能力相仿了.
⑻ asp 截取字符串的函数怎么写
有下面3个函数：抄
mid()
left()
right()
Mid 函数从字符串中返回指定数目的字符
Mid(string,start[,length])
参数 描述
string 必选项。字符串表达式，从中返回字符。
start 必选项。string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。
length 可选项。要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。
Left(string,length)
Left 函数可返回指定数目的从字符串的左边算起的字符
参数 描述
string 必选项。字符串表达式，其最左边的字符被返回。
length 必选项。数值表达式，指明要返回的字符数目。如果是 0，返回零长度字符串 ("")；如果大于或等于 string 参数中的字符总数，则返回整个字符串。
right与left类似，只是它是从右截取。
⑼ 在ASP中如何定义函数
Function 函数名(参数名)
'函数过程语句
End Function
'注意，asp一般不考虑数据类型的概念，但在实际操作的过程要注意。在指定函数和参数的时候，不用写数据类型，但在使用的过程中要考虑这个问题。
⑽ ASP特殊字符过滤
Function ChkInvaildWord(Words)
Const InvaildWords=\"select|update|delete|insert|@|--|,\" \'\'需要过滤得字符以“|”隔开，最后结束的字符必须是|
ChkInvaildWord=True
InvaildWord=Split(InvaildWords,\"|\")
inWords=LCase(Trim(Words))
For i=LBound(InvaildWord) To UBound(InvaildWord)
If Instr(inWords,InvaildWord(i))>0 Then
ChkInvaildWord=True
Exit Function
End If
Next
ChkInvaildWord=False
End Function
你所得到的只是一个加ChkInvaildWord事件的代码
看你怎么去用了
例如 你现在接受了一个STR的值
那么就直接 ChkInvaildWord（STR）
如果STR中间有特殊字符 那么你就得到了FALSE
如果没有 那么你就得到TRUE
一般都都会在前面加上IF判断。。
然后输出 错误
完整的就如1楼的