[导入]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
posted @ 2008-01-20 10:39  pboy2925  阅读(138)  评论(0编辑  收藏  举报