<%guidedisplay=1%>
<!--#include file="admin_start.asp" -->
<%
tt=year(now())&month(now())&day(now())&hour(now())&minute(now())&second(now())&int(timer)

if request("uppath")<>"" then session("FB_EM_1_SQL_uppath_"&tt)=trim(request("uppath")) else session("FB_EM_1_SQL_uppath_"&tt)=session("FB_EM_1_SQL_uppath")

if session("FB_EM_1_SQL_uppath_"&tt)="" then
	MySys.error.info="上传路径为空！"
	MySys.error.location="back"
	MySys.error.err()
end if

if instr(1,session("FB_EM_1_SQL_uppath_"&tt),".")>0 and instr(1,session("FB_EM_1_SQL_uppath_"&tt),"../")=0 then
	MySys.error.info="上传路径中不能含有“.”轻核对！"&session("FB_EM_1_SQL_uppath_"&tt)
	MySys.error.location="back"
	MySys.error.err()
end if

formName=request("formName")			'回传到上页面编辑框所在Form的Name
EditName=request("EditName")			'回传到上页面编辑框的Name
localfilepath=trim(request("localfilepath"))
%>
<FORM name=pic  method="post" target="_self" action='admin_upload_handle.asp' enctype="multipart/form-data" >
 <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" >
    <tr > 
      <td align="center" id="upid" width="100%" > 选择文件: 
		<input type="file" id="file1" name="file1" style="width:300" value=""> <input name=upsubmit type="submit" value="开始上传"></td>
        <input type="hidden" name="EditName" value="<%=EditName%>">
        <input type="hidden" name="FormName" value="<%=formName%>">
        <input type=hidden name=type value=f >
		<input type=hidden name=key value='<%=tt%>' >
    </tr>
</table>
</FORM>
<%
if localfilepath<>"" and localfilepath<>"undefined" then 
localfilepath=replace(localfilepath,"|","\\")
%>
<script language="javascript">
var WshShell
parent.up.style.display=""
WshShell= new ActiveXObject("WScript.Shell")
clipboardData.setData("text","<%=localfilepath%>")
pic.file1.focus()
WshShell.sendKeys("^v")
WshShell=null 
var timename=setTimeout("pic.submit();",200); 
</script>
<%end if%>
<!--#include file="admin_end.asp" -->