推奨:人文科学ASP開発の基本の紹介ASPとは何ですか? ASPは、Active ServerページであるActive Serverページの略語です。 ASPファイルには拡張子として.ASPがあります。特別なところは、HTMLファイルで使用できるすべてのマークアップ言語をASPファイルで使用できることです。
http://www.xx.com/download/51windows.pdfなどの静的ファイルの実際のパスがわかっている場合、サーバーに特別な制限がない場合は、簡単にダウンロードできます。ウェブサイトが51Windows.pdfのダウンロードを提供している場合、ダウンローダーが実際のパスを取得しない方法!この記事では、ASPを使用してファイルの実際のダウンロードパスを非表示にする方法を紹介します。
Webサイトファイルを管理するときは、同じ拡張機能を持つファイルを同じディレクトリに配置し、特別な名前を付けることができます。たとえば、pdfファイルディレクトリをthe_pdf_file_sと配置し、次のコードをダウン.aspとして保存できます。そのオンラインパスはhttp://www.xx.com/down.aspです。 http://www.xx.com/down.asp?filename=51windows.pdfを使用してこのファイルをダウンロードできます。 Down.aspでは、ダウンロードしたファイルをログインする必要があるかどうかを設定し、ファイルが盗まれないように、ダウンロードされたソースページが外部Webサイトであるかどうかを判断することもできます。
| 以下は引用されたコンテンツです。 サンプルコード: <% from_url = cstr(request.servervariables(http_referer)) serv_url = cstr(request.servervariables(server_name)) if mid(from_url、8、len(serv_url))<> serv_url then Response.Write違法リンク! 'リンクの盗難を防ぎます Response.End ifを終了します request.cookies(logined)= thenの場合 Response.redirect /login.asp 'ログインに必要です! ifを終了します function getFileName(longName) '/folder1/folder2/file.asp => file.asp while strut(longname、/) longname = right(longname、len(longname)-1) ウェンド getFileName = longName エンド関数 薄暗いストリーム 薄暗い内容 Dim Filename Dim TrueFileName dim fileext const adtypebinary = 1 filename = request.querystring(filename) filename = thenの場合 Response.Write Invalid/Webページ/ASP/041101/24.htm! Response.End ifを終了します fileext = mid(filename、instrrev(filename、。)1) select caseucase(fileext) 症例ASP、ASA、ASPX、ASAX、MDB Response.Write違法な操作! Response.End [選択]を終了します Response.Clear lcase(right(filename、3))= gifまたはlcase(right(filename、3))= jpgまたはlcase(right(filename、3))= png then Response.contentType = image/* 'ダウンロードダイアログボックスは画像ファイルには表示されません それ以外 Response.ContentType = Application/MS-DownLoad ifを終了します Response.Adddheader Content-Disposition、Attachment; 200497141230.htm =&getFileName(request.querystring(filename)) SET STREEM = server.createObject(adodb.stream) stream.type = adtypebinary stream.open lcase(右(filename、3))= pdfの場合、pdfタイプファイルディレクトリを設定します TrueFileName = /the_pdf_file_s /&filename ifを終了します lcase(right(filename、3))= docの場合、docタイプファイルディレクトリを設定します truefileName = /my_d_o_c_file /&filename ifを終了します lcase(right(filename、3))= gifまたはlcase(right(filename、3))= jpgまたはlcase(right(filename、3))= png then truefileName = /all_images _ /&filename 'Imageファイルディレクトリを設定します ifを終了します stream.loadfromfile server.mappath(truefilename) strame.eosではありません Response.binarywrite stream.read(1024 * 64) ウェンド stream.close Set Stream = Nothing Response.Flush Response.End %> |
この記事は収集され、インターネットから編集されています。あなたが元の著者である場合は、著者とソースを変更するために書いてください
共有:ヒント:GetStringを使用してASPの速度を上げる多くのASPプログラマーは、データベースクエリを実行してからクエリの結果をHTMLテーブルに表示した経験があります。通常、これを行います。以下は引用されたコンテンツです。