[导入]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

转载于:https://www.cnblogs.com/pboy2925/archive/2008/01/20/1105408.html