📄 adrot_save.asp
字号:
<%@ codepage ="936" %><!--#include file="../../conn/dbconn2.asp" --><link rel="stylesheet" type="text/css" href="../style.css"><%set rs=server.createobject("ADODB.recordset") rs.Open "SELECT * FROM Ad Where ID is null",conn,1,3 rs.addnewnowtime=now()sj=cstr(year(nowtime))+"-"+right("0"+cstr(month(nowtime)),2)+"-"+right("0"+cstr(day(nowtime)),2)%><!--#include FILE="upload.inc"--><%dim upload,file,formName,formPath,iCountset upload=new upload_F ''建立上传对象'--------将日期转化成文件名--------function MakedownName()dim fnamefname = now()fname = replace(fname,"-","")fname = replace(fname," ","") fname = replace(fname,":","")fname = replace(fname,"PM","")fname = replace(fname,"AM","")fname = replace(fname,"上午","")fname = replace(fname,"下午","")fname = int(fname) + int((10-1+1)*Rnd + 1)MakedownName=fnameend function formPath="../../adshj/Images/"iCount=0for each formName in upload.file ''列出所有上传了的文件set file=upload.file(formName) ''生成一个文件对象if file.FileSize>0 then ''如果 FileSize > 0 说明有文件数据newname=MakedownName()&"."&mid(file.FileName,InStrRev(file.FileName, ".")+1)file.SaveAs Server.mappath(formPath&newname) ''保存文件iCount=iCount+1else response.write "未找到文件 <A HREF=javascript:history.back(1)>返回</A>"response.endend ifnextrs("url") =upload.form("url")rs("alt") =upload.form("content")rs("src") ="../../adshj/Images/"&newnamers("width")=upload.form("width")rs("height")=upload.form("height")rs("type")=upload.form("type")rs.Updaters.closeSet rs=nothingConn.CloseSet Conn=nothing%><script language=javascript>opener.location=opener.location;window.close();</script><LINK href="oa.css" rel=stylesheet><BODY><p> </p><div align="center"><center><TABLE border=1 bordercolorlight='#DEDEDE' bordercolordark=#DEDEDE cellspacing=0 cellpadding=3 style="border-collapse: collapse" bordercolor="#111111" width="295" height="122"><TR> <TD width="287" height="116"><p align="center"><span style="font-size: 10.5pt">文件已经成功上传，是否继续添加……<BR><%response.write file.FilePath&file.FileName&" ("&cint(file.FileSize/1024)&"K) 上传 成功!<br>"%> </span></p><P><P align="center"><A HREF="uploadfile.asp"><span style="font-size: 10.5pt">继续添加</span></A><span style="font-size: 10.5pt"> </span><A HREF="javascript:window.close()"><span style="font-size: 10.5pt">关闭窗口</span></A></TD></TR></table></center></div><%set file=nothingset upload=nothing ''删除此对象%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -