无惧上传类 中文乱码

kqogje 2008-10-29 09:37:20
我使用的是梁无惧上传类2.2,结果有时上传的图片超过大小时,会将整个网站凡是调用库的地方都变成???,不知哪位高手知道如何解决?
...全文
168 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
  • 打赏
  • 举报
回复
那你就限制文件大小
MOTA 2008-10-29
  • 打赏
  • 举报
回复
[Quote=引用 4 楼 cj205 的回复:]
VBScript codeIfRequest.TotalBytes>1024000ThenExitSubEndIf1M

还有LZ的Response.End不能解决问题,他不是代表程序跳出不运行了,而是继续执行,所以应该用Exit Sub
[/Quote] 1
kqogje 2008-10-29
  • 打赏
  • 举报
回复
cj205
你能否说的再详细些,要不加我QQ吧,我好好向你请教下!
Mr-Jee 2008-10-29
  • 打赏
  • 举报
回复

If Request.TotalBytes > 1024000 Then
Exit Sub
End If
1M


还有LZ的Response.End不能解决问题,他不是代表程序跳出不运行了,而是继续执行,所以应该用Exit Sub
Mr-Jee 2008-10-29
  • 打赏
  • 举报
回复
用Request.TotalBytes来判断
kqogje 2008-10-29
  • 打赏
  • 举报
回复
楼上的可否给个判断代码,我做的感觉判断不了!有时还会出现该页无法显示!
这是我的判断

Sub CheckSize(Tmp,Str)
If Tmp.FileSize < 10 Then
Response.Write("<script language='javascript'>alert('"&Str&"没有上传图片!');history.go(-1);</script>")
Response.End()
End If
End Sub

Sub CheckExt(Tmp,Str)
'For I = 0 To Ubound(Arr)
If Instr(upfile.AllowExt,Tmp.FileExt) <= 0 Then
Response.Write("<script language='javascript'>alert('"&Str&"上传的图片格式不正确!');history.go(-1);</script>")
Response.End()
End If
'Next
End Sub
Mr-Jee 2008-10-29
  • 打赏
  • 举报
回复
做个判断嘛,图片大的时候就不让传啊

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧