一个变量赋值问题。困扰我呀就是不懂

[chrislili]

<%
fsearch1="a"
fsearch2="b"
fsearch3="c"
for i=1 to 3
eval("requestSearch"&i&" = fSearch"&i)
next
response.write "["&requestSearch1&"]"

%>

[HHH3000]

哪里不懂~~

[chrislili]

我又改了！报错！
<%
dim fsearch1
dim fsearch2
dim fsearch3

fsearch1=1
fsearch2=2
fsearch3=3
for i=1 to 3
eval("Search"+i+" = fSearch"+i)
next
response.write "["&requestSearch1&"]"

%>

Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配: '[string: "Search"]'

/test.asp，行10

[caoshangfei]

<%

dim fsearch1
dim fsearch2
dim fsearch3

fsearch1=1
fsearch2=2
fsearch3=3
for i=1 to 3
execute("Search"&i&" = "&fSearch&i)
next
response.write Search1




%>

[chrislili]

多谢啦！！！行了