ASP计算次数出现在str1str2
countstr（str1、str2）功能TMP，I，j
如果str1 = 或空（str1）然后
J = 0
=或str2 ISNULL（str2）然后
J = 1
其他的
TMP（str1、str2）=分裂
J = 0
我= 0，UBound（TMP）
如果TMP（i），则j＝J + 1
下一个
最后如果
countstr = J
端功能
TMP，I，j
如果str1 = 或空（str1）然后
J = 0
=或str2 ISNULL（str2）然后
J = 1
其他的
TMP（str1、str2）=分裂
J = 0
我= 0，UBound（TMP）
如果TMP（i），则j＝J + 1
下一个
最后如果
countstr = J
端功能