upload.asp

1:报刊种类添加模板选择,使样式有更多选择 2:同一类别的报纸

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Server.ScriptTimeOut=5000
%>
<!--#include file="UpLoadClass.asp"-->
<%
if Request.QueryString("action")="upload" then
dim myrequest,lngUpSize
Set myrequest=new UpLoadClass
lngUpSize = myrequest.Open()
  select case myrequest.error
         case 0
		 response.Write("<script>window.parent.LoadIMG('"&myrequest.savepath&myrequest.form("file1")&"');</script>")
         case 1
		 response.Write("<script>alert('文件过大！');window.parent.$('divProcessing').style.display='none';history.back();</script>")
		 case 2
		 response.Write("<script>alert('不允许上传该类型的文件！');window.parent.$('divProcessing').style.display='none';history.back();</script>")
                 case 3
		 response.Write("<script>alert('不允许上传该类型的文件！');window.parent.$('divProcessing').style.display='none';history.back();</script>")
		 case else
		 response.Write("<script>alert('文件上传出错！');window.parent.$('divProcessing').style.display='none';history.back();</script>")
  end select
end if
%>