up-2.asp

来自「FlashPicViewer电子相册 v2.6 繁体中文版」· ASP 代码 · 共 24 行

<!--#include file="upclass.asp" -->

<%

SetFolder=request.queryString("setFolder")''设置文件夹.
%>

<%

set imgUp=new BoxInfoImg 
if imgUp.imgType<>"JPG" and imgUp.imgType<>"JPEG" then %>
<script language="javascript">parent.movie.SetVariable("fpvup.message","格式限制为jpg");parent.movie.SetVariable("fpvup.filename","");</script>
<meta http-equiv="refresh" content="0;URL=hidden_form.htm">
<% 
response.end
end if
%>
<%
files=Day(Data)&timer()&"_fpv.jpg"
imgUp.saveImg server.mappath(SetFolder&"/"&files)
set imgUP=nothing
%>
<script language="javascript">parent.movie.SetVariable("fpvup.message","成功<%=files%>");parent.movie.SetVariable("fpvup.filename","");</script>
<meta http-equiv="refresh" content="0;URL=hidden_form.htm">