<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<%
'OPTION EXPLICIT
Server.ScriptTimeOut=5000
%>
<!--#include FILE="UpLoadClass.asp"-->
<!--#include FILE="conn.asp"-->
<%
dim request1,FileName,sql
'建立上传对象
'其中对象request1你可定义成任意字符串，只是方便引用，因为传递的参数我们习惯用request来接收，所以我们定义成request1，注意，定义成request是不行的
set request1=New UpLoadClass
'设置为手动保存模式
request1.AutoSave=2
'设置服务器文件保存路径
'这里我们是把上传的图片保存在uploadfile这个子文件夹里的
request1.SavePath="uploadfile/"
'打开对象
request1.open()
'获得照片标题
'这里的.form("pic")是指你的表单文本框name="txt"
FileName=request1.Form("FileName")
'设置产品小图最大为10K
'任何时候都可以重设参数，这对于你上传不止一个图片很重要
request1.MaxSize=102400000
if file.filesize>1024000 then
response.write "<script> alert('上传的图片过大！');history.back(-1);</script>"
response.end
end if
'如果保存小图成功，系统生成目标文件名
'这里的"img"是指你的上传文件表单的名字<input name="img" type="file">
if request1.Save("FileName",0) then
FileName=request1.SavePath& request1.Form("FileName")
end if
'response.write img
'response.write txt
'response.end
'上传内容完成，我们并得到了文本内容：txt;上传文件的文件名（带路径）：pic
'关闭对象request1
set request1=nothing
response.Write"<script> alert('图片上传成功');history.back(-1);</script>"
response.write("<script language=javascript>")
response.write("window.close();")
response.write("</script>")
response.end
%>
<script>
window.returnValue="<%=filename%>"
//window.close()
</script>
为什么上传小的图片都提示最大只能上传 10K 的图片文件,但传大图的时候（1024*768）就：
无法显示网页
您正在查找的页当前不可用。 网站可能遇到支持问题，或者您需要 调整您的浏览器设置。

--------------------------------------------------------------------------------

请尝试以下操作:

[此贴子已经被作者于2007-3-15 13:15:49编辑过]