加红的地方是我自己后加的，是防盗链软件用的。 我用普通方下载 好用 也达到我想要的效果，可是我把相同的代码加到ThunderDownloadUrl和FlashGetDownloadUrl 后面就不好用了 请问各位老 应该怎么加呀。

Dim RS_S:Set RS_S=Server.CreateObject("ADODB.RECORDSET")
RS_S.Open "Select IsOuter,DownloadPath,UnionID From KS_DownSer Where DownID=" & KS.ChkClng(KS.G("Sid")),conn,1,1
If Not RS_S.Eof Then
Select Case RS_S(0)
Case 0
Response.Redirect(RS_S(1) & DownArr(2) & "?urlid=" & GetURLID() & "?urlid=" & DownArr(2))
Case 2
Call ThunderDownloadUrl(RS_S(1) & DownArr(2),RS_S(2))
Case 3
Call FlashGetDownloadUrl(RS_S(1) & DownArr(2),RS_S(2))
End Select
End If
RS_S.Close:Set RS_S=Nothing
End If