如何让数字串=字符串的同等位置?

[good3g]

两个字符串相对应
dim aa,bb,aid,bid
aa="123,522,66,512,222,6525"
bb="字符一,字符二,字符三,字符四,字符五,字符六,"
aid=split(aa,",")
bid=split(bb,",")

for j=0 to Ubound(aid)
if rs("ID") =aid(j) then ttt=bid(j)
next

行不通啊......

我的要求是 如果rs("id")="123"时ttt="字符一"
如果rs("id")="66"时ttt="字符三"
如果rs("id")="6525"时ttt="字符六"
也就是j相对应

[sjqzone]

dim aa,bb,aid,bid
aa="123,522,66,512,222,6525"
bb="字符一,字符二,字符三,字符四,字符五,字符六,"
aid=split(aa,",")
bid=split(bb,",")
cstr(aa)强制aa转换成字符型的！

[jingcai]

ttt要用数组唉，要不ttt的值只是你最后一次比较后赋的值

[jingcai]

dim aa,bb,aid,bid 
aa="123,522,66,512,222,6525" 
bb="字符一,字符二,字符三,字符四,字符五,字符六," 
aid=split(aa,",") 
bid=split(bb,",") 
temp="123"
redim ttt(ubound(aid))

for j=0 to Ubound(aid) 
	if temp =aid(j) then 
		ttt(j)=bid(j)
		response.Write(ttt(j))
	end if
next 

[Dogfish]

比较前，转换一下

trim(rs("id")) 或者 cint(aid(j))

[ttt2]

for j=0 to Ubound(aid)
if rs("ID") =aid(j) then ttt=bid(j)
exit for
next

[good3g]

我这还是不行啊!
这段已经在for next之间的
现在出现
Microsoft VBScript 运行时错误 (0x800A0009)
下标越界: '2'

[msd88]

for j=0 to Ubound(aid)-1

这里需要减1

[理想2017]

首先确保 rs("ID") 有值,其次类型需要转换比较

[good3g]

行了！