请ASP高手帮我查一下错误

[jonsonzxw]

userID = Request("um")
servid = Request("servid")

if servid<>"" then
if Instr(1,servid,",",1)<>0 then
'有多个项目服务，转向第一个
tmp = Split(servid,",")
serv0 = tmp(1)
len = UBound(tmp)+1
servstr = ""

For i=1 To len-1
servstr = servstr + "&servid=" +tmp(i)
Next

select case serv0
case "1"
Response.Redirect "http://www.gdcic.net/receive.asp?um="+userID+servstr
Response.End
case "2"
Response.Redirect "http://photo.gdcic.net/Receive.aspx?um="+userID+servstr
Response.End
case "3"
Response.Redirect "http://www.gdcic.net/receive.aspx?um="+userID+servstr
Response.End
case else
end select
end if
end if

[a_zhe_20]

For i=0 To ubound(tmp)
servstr = servstr + "&servid=" +tmp(i)
Next

哪里有错误？

[tigerwen01]

把case "1"、case "2"和case "3"改为case 1、case 2和case 3

[jonsonzxw]

好象是len = UBound(tmp)+1就会出错，我一行一行调试到这里就出错了，后面的还不知

[bananasmiling]

tmp = Split(servid,",")
serv0 = tmp(1)
len = UBound(tmp)+1'这句错

[a_zhe_20]

serv0 = tmp(1)

应该是serv0 = tmp(0)

[qwater]

servstr = servstr + "&servid=" +tmp(i)
+ 换成 & 试试