動的ダウンロードシステムを例として受け取ります。
| 以下はコードフラグメントです。 ファイルを開きましたsoftdown.aspで: if request.querystring( "id")= "" Response.Write「接続できないか、指定されたダウンロードソフトウェアがありません」 Response.End ifを終了します 上記または以下は、次のコードを追加します dim strreferr、ドメイン、spldomain、ishttp ishttp = false 'このサイトのダウンロードシステムURLのリスト、http://を持たないでください domain = "sron.net、61.156.14.223,61.156.14.227" splowomain = split(domain、 "、"、 ") strreferr = request.servervariables( "http_referr") iii = 0からuborder(spldomain) If strueferr、trim(spldomain(iii))>0の場合、ishttp = true 次 isnull(strrefer)またはishttp = falseの場合 response.write "ダウンロードリンクは他のWebサイトから来ていますが、許可されていません。 "" closdaTabase Response.End ifを終了します |
このサイトのダウンロードシステムURLのリストは、たとえばダウンロードチャネルのドメイン名にアクセスすることです。