📄 upfilesave.asp

📁 这个也是一个功能强大的企业整站的ASP源代码
💻 ASP
字号:
<!--#include file="../CheckAdminLogined.asp"-->
<!--#include file="../../Include/CnpvUpFile.inc"-->
<!--#include file="../../include/DefFunction.asp"-->
<% 
dim upload,file,formName,formPath,T_comment
set upload=new upload_5xSoft ''建立上传对象

if upload.form("ActionID")="UploadPic" then
  MaxFileSize=300000
else
  MaxFileSize=60000000
end if
formPath=upload.form("UploadFilePathTemp") '得到上传目录

fname=""
set file=upload.file("T_UploadFile")  ''生成一个文件对象
if trim(file.FileName)<>"" then 
  if file.FileSize>MaxFileSize then 
    response.write "<script>alert('文件不能大于300K');history.back()</Script>" 
    response.end
  else if file.FileSize<=0 then '如果 FileSize<= 0 说明没有文件数据
         response.write "<script>alert('您输入的文件没发现!按确定返回！');history.back();</Script>"
		 response.End()
       else
         if right(formPath,1)<>"/" then formPath=formPath&"/"  ''在目录后加(/)
         f_name = makefilename()  '获取文件名
         f_ext = GetExtendName(file.FileName) '获取文件扩展名
         fname = f_name & "." & f_ext	 
         file.SaveAs Server.mappath(formPath&fname)   ''保存文件 		 
	   end if   '如果 FileSize<= 0对应
  end if  'file.FileSize>100000对应
end if  '与空文件名对应
%>


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>泵阀交易网上传系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href=EditorCss.css rel=stylesheet>
<% if upload.form("ActionID")="UploadPic" then %>
<script  language="JavaScript">
  alert("图片上传成功，按确定返回！");
  window.opener.frames.message.focus();								
  window.opener.frames.message.document.execCommand('InsertImage', false, '<%=formPath&fname%>');
  if(window.opener.form1.UploadFile.value=="")
     window.opener.form1.UploadFile.value='<%=fname%>'+"$"
  else
     window.opener.form1.UploadFile.value=window.opener.form1.UploadFile.value+'<%=fname%>'+"$"
  window.close();
</script>
<%end if%>  
<% if upload.form("ActionID")="UploadFile" then%>
<script language="JavaScript">
  if(window.opener.form1.UploadFile.value=="")
     window.opener.form1.UploadFile.value='<%=fname%>'+"$"
  else
     window.opener.form1.UploadFile.value=window.opener.form1.UploadFile.value+'<%=fname%>'+"$"
</script>
</head>

<BODY bgColor=menu topmargin=5 leftmargin=15 >
<FIELDSET align=left>
  <LEGEND align=left>你上传的路径及文件：</LEGEND>
  <br>
  <font color="000000"><b><%=formPath&fname%></b></font>
  <br><br>
</fieldset><br><br><br><br><br>
<a href="javascript:window.close();"><font color="#000066"><u>关闭窗口</u></font></a>
</body>
</html>
<%end if%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -