asp 两个字符串比较 留下不同的

来源:百度知道 编辑:UC知道 时间:2024/07/07 00:02:51
asp
两个 字符串

第一个 1|2|3|5|
第二个 1|2|5|7|3|
比较 去掉相同的字符
比较后只留下 7|
<%
ww="1|2|3|4|5|6|7|8|"
bb="2|4|7|8|"
mylist=split(bb,"|")
For i = LBound(mylist) To UBound(mylist)
ss=replace(ww,mylist(i),"")
next
response.Write(ss)
%>
错误在哪里

<%
ww="1|2|3|4|5|6|7|8|"
bb="2|4|7|8|"
mylist=split(bb,"|")
ss=ww
For i = LBound(mylist) To UBound(mylist)
ss=replace(ss,mylist(i),"")
ss=Replace(ss,"||","|")
Next
response.Write(ss)
%>
错误出在,你每次都对ww进行了替换

看了你的觉得没戏..就重写了 费了一番力气
<%
ww="1|2|3|4|5|6|7|8|"
bb="2|4|7|8|"

a=split(bb,"|")
b=split(ww,"|")

Set dic=CreateObject("Scripting.Dictionary")

For i = 0 To UBound(a)

If a(i)<>b(i) Then
dic.Add a(i),b(i)
end if

Next

c=dic.Items

d=dic.Keys

For i= 0 To UBound(c)

Response.Write c(i)

Next

觉得合适就加分哦 难度和0悬赏分差距不小

%>