В качестве примера возьмем систему динамической загрузки:
откройте файл SoftDown.Asp по адресу:
если request.QueryString("ID")="" тогда
response.write «Невозможно подключиться или не указано программное обеспечение для загрузки»
ответ.конец
конец, если
dim strReferer,domain,splDomain,isHttp
выше или ниже.
isHttp=false
'Этот сайт загружает список системных URL-адресов, не добавляйте http://
домен="sron.net,61.156.14.223,61.156.14.227"
splDomain=split(домен,",")
strReferer=Request.ServerVariables("HTTP_REFERER")
для iii = 0 до ubound(splDomain)
если instr(strReferer,trim(splDomain(iii)))>0, то isHttp=True
следующий
если isnull(strReferer) или isHttp=false, тогда
Response.Write "Ссылки для скачивания приходят с других веб-сайтов, что запрещено. <a href=""./"">Пожалуйста, войдите на этот сайт перед загрузкой.</a>"
ЗакрытьБаза данных
ответ.конец
end if
Список URL-адресов системы загрузки веб-сайта предназначен для доступа к имени домена в URL-адресе вашего канала загрузки. Например, к вашему каналу загрузки можно получить доступ с помощью нескольких URL-адресов, поэтому разделите их запятыми.