[导入]ASP常用函数:NotInStr()

<%
'功能:返回sString1里第一个不在sString2里出现的字符位置
'来源:http://jorkin.reallydo.com/article.asp?id=443

Function NotInStr (sString1, sString2)
NotInStr = 0
For i = 1 To Len(sString1)
If InStr(sString2, Mid(sString1, i, 1)) = 0 Then NotInStr = i : Exit Function
Next
End Function
%>

文章来源:http://Jorkin.Reallydo.Com/default.asp?id=443