请ASP高手帮我解解这段ASP代码

[yhq92701]

Urls = Replace(trim(Urls),",,",",")
if Left(Urls,1) = "," Then Urls = mid(Urls,2)
if Right(Urls,1) = "," Then Urls = left(Urls,Len(Urls)-1)

tmpUrls = Split(Urls & "," ,",")

randomize
RndNum=int(rnd()*ubound(tmpUrls))

if RndNum = ubound(tmpUrls) then RndNum =RndNum -1
ToUrl = TmpUrls(RndNum)

if left(ToUrl,7) <> "http://" then ToUrl = UrlHome & ToUrl

response.redirect ToUrl

[hookee]

' urls 变量是以 ur11,ur12,ur13,ur14 格式存储的字符串，
' 有可能中间缺少某个url， 那么格式会变成 url,,url,url(缺中间的url) 或者 ,url,url 或url,url, (缺少头尾的url)

Urls = Replace(trim(Urls),",,",",") ' 对于缺中间的情况，将,,替换为, 就是将 url,,url,url 变为url,url,url
' 对于缺 第一个url的情况，将,url,url,url 变为 url,url,url
if Left(Urls,1) = "," Then Urls = mid(Urls,2) ' 判断第一个字符是不是, 是则取除了第一个字符用外的其他字符 
' 对于缺 最后一个url的情况，将url,url,url, 变为 url,url,url
if Right(Urls,1) = "," Then Urls = left(Urls,Len(Urls)-1) ' 判断最后一个字符是不是, 是则取除了最后一个字符用外的其他字符 

' 分割urls，将每个url存入数组tmpUrls
tmpUrls = Split(Urls & "," ,",") 

'初始化随机种子
randomize 
RndNum=int(rnd()*ubound(tmpUrls)) ' 从0-最大数组下标中随机取一个数

if RndNum = ubound(tmpUrls) then RndNum =RndNum -1 ' 如果是得到数组最后一项则取前一项 

ToUrl = TmpUrls(RndNum) ' 通过下标取得数组中的url
'如果取得的地址不是http://开头的，则在地址前加UrlHome
if left(ToUrl,7) <> "http://" then ToUrl = UrlHome & ToUrl 
'转向该url地址
response.redirect ToUrl  

[街头小贩]

对url地址进行截取.tmpUrls函数在哪定义的

[mychenliang]

顶！就慢了一小会！

[小布]

[Quote=引用 2 楼 xiaofanku 的回复:]
对url地址进行截取.tmpUrls函数在哪定义的
[/Quote]
tmpUrls这只是个数组吧。

[LEGENDSCZ]

[Quote=引用 2 楼 xiaofanku 的回复:]
对url地址进行截取.tmpUrls函数在哪定义的
[/Quote]

tmpUrls是数组