Private Sub Class_Initialize
    dim myupsize
        p_Error       = -1
        if GroupInfo(2)<>"" and GroupInfo(2)>0 Then
        myupsize=clng(GroupInfo(2))
        else
        myupsize=0
        end if
        p_MaxSize  = myupsize*1024  '单文件最大5M(字节)
        p_FileType = replace(GroupInfo(1),"|","/")     '允许上传rar/zip格式文件
        p_SavePath = "UploadFile/" '在当前目录保存文件，这里是相对路径，如：“UpLoadFile/”
        p_AutoSave = 0
        strDate       = replace(cstr(Date()),"-","")
        lngTime       = clng(timer()*1000)
        Set binForm = Server.CreateObject("ADODB.Stream")
        Set binItem = Server.CreateObject("ADODB.Stream")
        Set objForm = Server.CreateObject("Scripting.Dictionary")
         = 1
    End Sub
文件里面 p_MaxSize  = myupsize*1024  '单文件最大5M(字节)
是什么意思呢？为什么说“单文件最大5M(字节）”难道myupsize=5？它是变量啊，怎么会是5呢？如果不是5，为什么说“单文件最大5M(字节）”？

p_MaxSize  = myupsize*1024  '单文件最大5M(字节)
这里限制上传文件的大小1MB=1024KB，单用ASP目前不可能上传特别大的文件(100MB以上的文件),要想上传如此大的文件只能另外写ActiveX的上传组件。

首先谢谢你的回复，我想上传400MB以内的，在哪里写ACTIVE的上传组件呢? 作为初学者，我还不太懂，您能不能发给我个资料或代码让我参考一下啊？等待您的答复

首先谢谢你的回复，我想上传400MB以内的，在哪里写ACTIVE的上传组件呢? 作为初学者，我还不太懂，您能不能发给我个资料或代码让我参考一下啊？等待您的答复

目前手头没有现成的，楼主可以去下面这个论坛问问。
http://bbs.