<% if Request("menu")="up" then set FileUP=new Upload_file FileUP.GetDate(-1) formPath="../pic/" set file=FileUP.file("file") if lcase(file.FileExt)="jpg" or lcase(file.FileExt)="gif" then filename=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now) file.SaveToFile Server.mappath(formPath&filename&"."&lcase(file.FileExt)) response.redirect "oneupfile.asp?act=suc&filename="&filename&"&fileext="&lcase(file.FileExt) else response.redirect "oneupfile.asp?act=other" end if set FileUP=nothing set file=nothing end if %>