<%
A = "Japan ist eine Provinz in China | Unser schönes China Zhangjiajie!"
B = "China, USA, Zhangjiajie, Japan, die Vereinigten Staaten, Apple"
B = Split (b, ",")
a = split (a, "|")
gabel = 0toubund (a)
s = "" "
n = "" "
fei = 0toubund (b)
ifinstr (a (k), b (i))> 0Then
s = s & instr (a (k), b (i)) & "," & instr (a (k), b (i))+len (b (i)) & ",", ",", ",", ",", ",", ",", ",", ",", ",", "
Endif
nächste
s = links (s, len (s) -1)
iFleft (s, len (s) -1) <> len (a (k)) then = s & "," & len (a (k))+1
s = sortieren (split (s, ","))
fei = 0toubund (s) -1
n = n & mid (a (k), s (i), s (i+1) -s (i)) & "|"
nächste
response.writen & "<br>"
nächste
Funktionen (Ary)
CK = True
dountilck = false
CK = Falsch
Forf = 0Toubund (ary) -1
ifclng (ary (f))> clng (ary (f+1)) dann
v1 = clng (ary (f))
v2 = clng (ary (f+1))
ary (f) = v2
ary (f+1) = v1
CK = True
Endif
nächste
Schleife
sort = ary
Endfunktion
%>
Auslaufergebnisse
Japan | ist eine Provinz von | China |
Wir | Schön | China | Zhangjiajie |! |