[code]<%
PIC_Url="http://a4.att.hudong.com/71/81/01300000168389121137816955836.jpg||1.jpg"
TheChar="||"'分隔字符
ipy=split(PIC_Url,TheChar)
ipy_S=ubound(ipy)
if inStr(PIC_Url,TheChar)>0 then
Randomize
Pic_Url=ipy(int(ipy_S*rnd))
end if
If UCase(Cstr(Request.ServerVariables("HTTP_REFERER")))<>"" Then
Response.Redirect Pic_Url
Else
Response.Redirect "Http://Www.KenQiao.Net"
End if
%>[/code]