<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>底部</title>
<%
  Server.ScriptTimeOut=5000
%>
<BODY leftMargin=0 topMargin=0>

<% 
   web_picdir="../uploadpic/" 
   
%>

<!--#include file="function.asp"-->
<!--#include FILE="upclass.asp"-->
<%
   
    if session("database_name")<>empty then
      read_database_name=session("database_name")
    else
      response.Write("<span style=font-size:12px;color:red>系统超时，请点击【刷新】按钮重新开始！</span>")
      response.Redirect "../admin/admin_shiti_all.asp"
    end if 
	
    dim request2,formPath,formName,intCount,intTemp
    set request2=new UpLoadClass
	request2.FileType="jpg/bmp/gif/png/rar/doc/zip/mp3/swf"
	request2.MaxSize=100240*1024
	request2.SavePath=""&web_picdir+read_database_name+"/"
		
	request2.Open()
%>
<%
    if request2.Error =0 then
        Response.Write"<span style=font-size:12px;color:green>上载成功！</span>"
%>

     <script>
             parent.document.getElementById("moviepic").value="<%=request2.Form("strPhoto")%>"
     </script>
<%
    end if
    set request2=nothing
%>
</BODY>
</HTML>