質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

ただいまの
回答率

90.40%

  • Windows

    1767questions

    Windowsは、マイクロソフト社が開発したオペレーティングシステムです。当初は、MS-DOSに変わるOSとして開発されました。 GUIを採用し、主にインテル系のCPUを搭載したコンピューターで動作します。Windows系OSのシェアは、90%を超えるといわれています。 パソコン用以外に、POSシステムやスマートフォンなどの携帯端末用、サーバ用のOSもあります。

  • ASP

    67questions

    ASP(Active Server Pages) あるいはClassic ASP (ASP Classic)は、マイクロソフト社開発した動的なウェブページ製作に利用可能なサーバー側のスプリクトエンジンです。

  • IIS 7

    57questions

    IIS(インターネットインフォメーションサービス) 7は、 Microsoftによって開発された、Windowsの標準ウェブサーバーです。Window Server 2008 と Windows Vista向けにリリースされました。

クラシックASPプログラムで作成したWebページから圧縮ファイルをダウンロードしたい

解決済

回答 2

投稿 編集

  • 評価
  • クリップ 1
  • VIEW 3,102

t_tanaka020

score 7

前提・実現したいこと

クラシックASP(.netではない)で、リンクをクリックするとzipファイルなどの
圧縮形式ファイルをダウンロードできるWebページを作成しているのですが、
圧縮形式ファイルをファイルとして認識してくれないらしく、ダウンロードに失敗します。
ダウンロードできるようにするにはどうすればよいでしょうか

発生している問題・エラーメッセージ

IISの設定か、もしくはサーバーそのものの設定が問題なのではないかとは思うのですが・・・

追記:
沢山のご回答誠にありがとうございます。
言葉足らずで申し訳ございません。追記させていただきます。

ASPプログラム内で、ファイルシステムオブジェクトのIsFolderを使用して
選択したリンクがファイルかフォルダかを判断しています。
デバッグしてみると、選択したzipなどの圧縮ファイルはtrue(フォルダ)として
扱われてしまっております。
また、圧縮ファイルが置いてあるフォルダ内のファイル一覧をプログラム内で表示させてみると、
zipなどの圧縮ファイルは拡張子が表示されません。
おそらく、拡張子が表示されるようになれば、問題がなくなると思うのですが・・・

試したこと

IISの「MIMEの種類」に.zipや.lzhが含まれていることは確認してあります。

補足情報(言語/FW/ツール等のバージョンなど)

サーバーはWindowsServer2012R2、IISは8.5です。

  • 気になる質問をクリップする

    クリップした質問は、後からいつでもマイページで確認できます。

    またクリップした質問に回答があった際、通知やメールを受け取ることができます。

    クリップを取り消します

  • 良い質問の評価を上げる

    以下のような質問は評価を上げましょう

    • 質問内容が明確
    • 自分も答えを知りたい
    • 質問者以外のユーザにも役立つ

    評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

    質問の評価を上げたことを取り消します

  • 評価を下げられる数の上限に達しました

    評価を下げることができません

    • 1日5回まで評価を下げられます
    • 1日に1ユーザに対して2回まで評価を下げられます

    質問の評価を下げる

    teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

    • プログラミングに関係のない質問
    • やってほしいことだけを記載した丸投げの質問
    • 問題・課題が含まれていない質問
    • 意図的に内容が抹消された質問
    • 広告と受け取られるような投稿

    評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

    質問の評価を下げたことを取り消します

    この機能は開放されていません

    評価を下げる条件を満たしてません

    評価を下げる理由を選択してください

    詳細な説明はこちら

    上記に当てはまらず、質問内容が明確になっていない質問には「情報の追加・修正依頼」機能からコメントをしてください。

    質問の評価を下げる機能の利用条件

    この機能を利用するためには、以下の事項を行う必要があります。

質問への追記・修正、ベストアンサー選択の依頼

  • kaz.Suenaga

    2016/09/01 16:11

    追記されたあたりの処理のソースコードを質問内にコードブロックとして貼り付けることはできませんか。
    上記のような内容であれば、意図とソースコードが一致していない可能性があります。

    キャンセル

  • この投稿は削除されました

  • t_tanaka020

    2016/09/01 17:04

    twckさん、ご回答ありがとうございます。
    記述いただいたエクスプローラーでファイルの拡張子が表示されるようにする作業は既に完了しております。拡張子が表示されないのは、あくまでASPプログラム内での話です。
    1.zipファイルのサイズは200KBくらいです。ちなみにIISのASP設定の
     「最大要求エンティティボディ制限」は25MBにしてあります。
    2. .xls、.xlsx、.doc .docx、.pdf、.ppt、.pptxなど、圧縮形式のもの以外は  ダウンロード可能です。
    3. 直接ファイルを示しています。
    4. Response.BinaryWriteを使用していますが、フォルダ扱いされる為ダウン  ロード用のプログラムに遷移してくれないので、問題解決には関係ないと
      思います。
    5. 「フォルダ情報が取得できない」と言われます。

    キャンセル

回答 2

checkベストアンサー

0

Scripting.FileSystemObject の IsFolder は zipをフォルダ扱いしてしまう仕様なので特に問題はありません。
↑訂正:Scripting.FileSystemObjectではなくShell.Applicationでした
IISやASPはzipを正しくファイル扱いするはずです。

エクスプローラーでファイルの拡張子が表示されるようにするには以下のようにします。
Windowsの[コントロールパネル]を開く。
->[フォルダーオプション]を開く。
->[表示]タブをクリックする。
->[登録されている拡張子は表示しない]のチェックを外す。
ただし、おそらく表示されるようになっても問題は解決しません。

そのうえで質問です。
(上の「情報の追加・修正の依頼をする」にも書きましたが改行されなくて見づらいので、こちらの回答欄で質問させていただきます。)

1.zipファイルのファイルサイズを教えてください。

2.zipファイル以外のファイルはダウンロードできますか?
できるのであればその拡張子をいくつか教えてください。

3.ダウンロードするリンクは以下のような感じで直接ファイルを示しているのでしょうか?
http://domain/folder/file.zip

それとも以下のような感じでASPのクエリーとしてファイル名を指定しているのでしょうか?
http://domain/folder/download.asp?f=file.zip

4.ASPでダウンロードの制御をするときに、以下のもので使用しているものはありますか?
Response.WriteFile
Response.BinaryWrite
Server.Transfer
ADODB.Stream

5.ダウンロードに失敗時に表示されているメッセージを教えてください。

投稿

編集

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2016/09/02 16:37

    twckさん
    たびたびご回答誠にありがとうございます。
    作成していただいたソースを実装してみました。
    ※権限がなくて、dllはレジストリから削除できませんでした。

    結果は、Set objItem = objDirItems.Item(i)のところでエラーになりました。
    その前のobjDirItems.Count をデバッグしてみたところ、フォルダ数が
    正しくとれました。何か問題があるのでしょうか?

    キャンセル

  • 2016/09/02 17:30

    ああ、すみません。ASPの実行環境がないため動作確認してませんでした。
    SubFolders と Files はインデックスによるアクセスが出来ないんですね。
    今、知りました。
    というわけで For Each を使用して以下のようになります。

    Dim objFys
    Dim objDir
    Dim objItem

    Set objFys = CreateObject("Scripting.FileSystemObject")
    Set objDir = objFys.GetFolder(ディレクトリ名)

    For Each objItem In objDir.SubFolders
    フォルダの場合のリンク表示:フォルダ名は objItem.Name で取得
    Next

    For Each objItem In objDir.Files
    ファイルの場合のリンク表示:ファイル名は objItem.Name で取得
    Next

    キャンセル

  • 2016/09/03 10:54

    twckさん
    修正誠にありがとうございます。実装してみたところ、できました!!!!
    本当に助かりました。ありがとうございました!!!勉強になりました!
    ちなみに、そのままのロジックで移設するには、DLLを削除しなければ無理そうです。

    キャンセル

0

ソースが無いので具体的な回答は難しいですが・・・

先ず、対象ファイルの圧縮(zip生成)には成功しているという理解で合っていますか?

もしそうなら、「サーバー上で動的に生成したファイル」のダウンロードが上手く行かないということなので、下記ページのサンプルを参考にしてみてはいかがでしょうか。
(既に参照済みならゴメンナサイ。また、手元にテスト環境が無いので未検証であることもお伝えしておきます。)

03-04 ファイルダウンロード(ADODB.Stream)  

以上、ご参考まで。

投稿

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2016/09/01 14:57

    ご回答ありがとうございます。
    「サーバー上で動的に生成したファイル」のダウンロードではなく、公開フォルダ内に置いてあるファイルのダウンロードになります。
    また、せっかく貼っていただいたリンクですが、会社のパソコンからなのでブロックされてみることができません・・・

    キャンセル

15分調べてもわからないことは、teratailで質問しよう!

  • ただいまの回答率 90.40%
  • 質問をまとめることで、思考を整理して素早く解決
  • テンプレート機能で、簡単に質問をまとめられる

同じタグがついた質問を見る

  • Windows

    1767questions

    Windowsは、マイクロソフト社が開発したオペレーティングシステムです。当初は、MS-DOSに変わるOSとして開発されました。 GUIを採用し、主にインテル系のCPUを搭載したコンピューターで動作します。Windows系OSのシェアは、90%を超えるといわれています。 パソコン用以外に、POSシステムやスマートフォンなどの携帯端末用、サーバ用のOSもあります。

  • ASP

    67questions

    ASP(Active Server Pages) あるいはClassic ASP (ASP Classic)は、マイクロソフト社開発した動的なウェブページ製作に利用可能なサーバー側のスプリクトエンジンです。

  • IIS 7

    57questions

    IIS(インターネットインフォメーションサービス) 7は、 Microsoftによって開発された、Windowsの標準ウェブサーバーです。Window Server 2008 と Windows Vista向けにリリースされました。