出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
アップロードファイルの制限について 　 ASPLoveさん [2002/02/25 12:04:48] [1732]
　 Re:アップロードファイルの制限について 　 北岳さん [2002/02/25 15:18:29] [1733]
　 Re:アップロードファイルの制限について 　 Tomitomiさん [2002/02/25 16:43:22] [1735]
　 Re:アップロードファイルの制限について 　 ASPLoveさん [2002/02/25 18:24:04] [1737]
[1732] アップロードファイルの制限について
投稿者：ASPLoveさん 2002/02/25 12:04:48
はじめまして
質問なのですが、今BASP21コンポーネントを使用して
ファイルのアップロード部分を作成してます。

そこで、アップロードするファイルサイズを制限したいと
思っているのですが、うまくいきません。
=================================================
tb = Request.TotalBytes
まず、フォーム情報を取得し

If tb > 100000 Then
Response.Write "アップロードできません"
Response.End
End If

フォーム情報を配列として読込み
br = Request.BinaryRead(tb)

'その後アップロード処理（省略）
===============================================
で、100000バイトより大きければ、メッセージ出力し終了
したいのですが、ページが表示できませんというエラーが出力されます。上記のIf文をはずすとアップロードはできますが、サイズは
制限できません。

どなたか、ご教授お願いします。
ちなみに環境は
windows2000server
IIS5.0
ASP3.0
VBScript5.0です。
[1733] Re:アップロードファイルの制限について
投稿者：北岳さん 2002/02/25 15:18:29
>tb = Request.TotalBytes
>If tb > 100000 Then
>ページが表示できませんというエラーが出力されます
　
以前全く同じことを確認していますが、未だに解決していません。
やむなく、ダウンロード後にファイルサイズを確認し、
指定サイズよりも大きければ、改めて削除しています。
ダウンロード前に if で引っ掛ける方法は、判らないままです。
　
本家（BabaCenterfolds）の過去ログ
[ASP] ファイルアップロードの際にファイルサイズ制限をしたいのですが
( 2001/12/05 11:25 いるかさんから)
も解決しないままのようですね。
[1735] Re:アップロードファイルの制限について
投稿者：Tomitomiさん 2002/02/25 16:43:22
こんにちは、Tomitomiです。

> で、100000バイトより大きければ、メッセージ出力し終了

という考え方を変えて、100000バイトより小さければアップロードする。
という風にしてみてください。

=================================================
tb = Request.TotalBytes
まず、フォーム情報を取得し

If tb < 100000 Then

フォーム情報を配列として読込み
br = Request.BinaryRead(tb)

'その後アップロード処理（省略）

Else

Response.Write "アップロードできません"

End If
===============================================

で、私のはできました。IIS4ですけども。
[1737] Re:アップロードファイルの制限について
投稿者：ASPLoveさん 2002/02/25 18:24:04
まずは、北岳様、Tomitomi様ご回答ありがとうございました。

Tomitomi様のおっしゃるように、
=====================================
tb = Request.TotalBytes
で、フォーム情報を取得し

If tb < 100000 Then
アップロード処理
Else
　　Response.Write "エラーです。"
End If
======================================
で、IIS4.0では、確かに成功しました！！が
IIS5では、うまくいきませんでした。

IIS5では、今のところ北岳様のように一旦アップロードさせておいてその上で、削除するしかないようですね。
ASPメーリングリスト等でも検索して見ましたが、やはり、解決していないようですね。

自分でも、ActiveXDLL等を作成したり、いろいろやってみたのですが、ダメでした。

また、新たな解決方法等見つかりましたら、報告します。

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ