请问在上传文件时,超出大小限制时,怎么弹出提示啊?
我的代码如下,但在测试中总是不能弹出提示说大小超了,请问怎么修改啊?
Set Upload = Server.CreateObject("Persits.Upload")
Upload.SetMaxSize 307200, True '设置文件上传的最大为300*1024个字节(300K)
'Upload.extname="jpg"
Upload.Save
On Error Resume Next
Set File1 = Upload.Files("file")
If Not File1 Is Nothing Then
If Upload.FileExists(tempn1) Then
message="文件名重复"
Response.Redirect (....)
Else
File1.SaveAs tempn1
End If
end if
If Err.Number = 8 Then
message="文件尺寸过大,请使用300k以内的文件"
Response.Redirect ("main.asp?message=" & message & "&subflag=" & flag & "&subecode=" & ecode & "&subname=" & username & "&subidcard=" & idcard & "&subsex=" & sex & "&subemail=" & email & "&subcertype=" & certype & "&subtel=" & tel & "&substage=" & stage)
end if
当文件>300k时,页面无法弹出提示。