ASP download system anti-theft chain method

xiaoxiao2021-03-06  36

Take the dynamic download system:

Open file SoftDown.asp at: if Request.QueryString (ID) = TEN Response.Write Cannot Connect or not specify the above or below, add the following code below

Dim Strreferer, Domain, SPLDOMain, ISHTTP ISHTTP = FALSE

'This site downloads the system URL list, do not bring http: // Domain = Sron.Net, 61.156.14.223, 61.156.14.227

splDomain = split (domain ,,) strReferer = Request.ServerVariables (HTTP_REFERER) for iii = 0 to ubound (splDomain) if instr (strReferer, trim (splDomain (iii)))> 0 then isHttp = True next if isnull (strReferer) OR ISHTTP = false The response.write download link from other websites, this is not allowed, CloseDatabase Response.end endiff

Use ASP to achieve anti-theft chain technology (with automatic return function)

Source file code: ---------------------------------------------- -------------------------------------------------- ------------------------- <% from_URL = cstr (Request.ServerVariables) Serv_url = CSTR (Request.ServerVariables ("Server_name" )) IF MID (from_url, 8, len (serv_url)) <> serv_url tellense.write " illegal link!
3 Second After the system will automatically return home ... "response.write" "response.write"