关于asp程序如何修改添加上传文件大小,,,,以下程序只能上传小于1M的文件,请问如何修改,,,谢谢

[复制链接]
查看11 | 回复1 | 2011-3-29 09:21:41 | 显示全部楼层 |阅读模式
End Sub
' 无组上传类
Sub DoUpload_Class()
On Error Resume Next
Dim oUpload, oFile
' 建立上传对象
Set oUpload = New upfile_class
' 取得上传数据,限制最大上传
oUpload.GetData(nAllowSize*1024*500)
If oUpload.Err > 0 Then
Select Case oUpload.Err
Case 1
Call OutScript("parent.UploadError('请选择有效的上传文件!')")
Case 2
Call OutScript("parent.UploadError('你上传的文件总大小超出了最大限制(" & nAllowSize*500 & "KB)!')")
End Select
Response.End
End If

回复

使用道具 举报

千问 | 2011-3-29 09:21:41 | 显示全部楼层
' 取得上传数据,限制最大上传 oUpload.GetData(nAllowSize*1024*500)这里就是限制最大上传,单位是字节oUpload.GetData(100) ' 限制最大上传100字节oUpload.GetData(1024) ' 限制最大上传1KBoUpload.GetData(1024*1024) ' 限制最大上传1MoUpload.GetData(1024*1024*100) ' 限制最大上传100M以此推算你上面的代码中nAllowSize是个变量,重新定义一下值,就可以了修改大小
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行