Question

ASP判断重复数

例如：
A=12345
B=45678
结果：重复2个，分别是4,5

Answer 1

<%
dim a,b,ar,cr,c,i
a = "1,2,3,4,5,6,7,8,9"
b = "1,3,5"
c=0
cr=""
ar = split(a,",")
For i = 0 to UBound(ar)
if instr(b,ar(i))>0 then
c=c+1
cr=cr&ar(i)&" "
end if
Next
response.write "重复数据有："&c&"条：<br>"
response.write cr
%>

这里是用简单的逗号分隔，

如果两个字符串都没有分隔符，就需要把一个做成有分隔符的，加一段程序

读取长度，FOR，每读一个字符加上分隔符，连成新的字符串，再用这个代码，这个的原理就是，循环A字符串，在B里比较，是不是存在，如果存在就说明是重复的

Answer 2

循环读出A的每个字符, 然后再循环与B的每个字符比对.