首页 ASP批量上传图片

ASP批量上传图片

举报
开通vip

ASP批量上传图片文件1. function checkRowsLimit() { var RowLimit = 20; var len=document.getElementById('filearea').rows.length; if(len==rowLimit) { alert('一次只能添加20个图片!'); return false; } else { return true; } } function addNewRow() { var obj=document.getEleme...

ASP批量上传图片
文件1.
ASP图片批量上传

注:上传 格式 pdf格式笔记格式下载页码格式下载公文格式下载简报格式下载 为.jpg,png,gif,bmp,jpeg
1、 [添加]

文件二 <% '===================================== '此代码功能强大,经改动后可以用于各种图片上传及产品图片上传 '技术支持:QQ 757187785 '===================================== %> <% function getex(filename) '取图片后缀名 getex = right(filename,(len(filename)-InStr(filename,"."))) End function dim upload,file,formName,formPath,fname,getfilename set upload=new upload_5xsoft formPath=upload.form("filepath") '目前是当前路径可以改成 "./123/" for each formName in upload.objFile set file=upload.file(formName) '上传图片格式 if LCase(getex(file.filename))="jpg" or LCase(getex(file.filename))="png" or LCase(getex(file.filename))="gif" or LCase(getex(file.filename))="bmp" or LCase(getex(file.filename))="jpeg" then if file.FileSize<=0 then call ShowError("无效文件!") end if if file.FileSize>0 then fname = 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 = fname&Int((right(fname,4) - 0 + 1) * Rnd + 0) file.SaveAs Server.mappath(formPath&fname&"."&getex(file.filename)) '保存 end if set file=nothing i=i+1 else response.Write("") end if next response.Write("") %> 文件三
本文档为【ASP批量上传图片】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
下载需要: 免费 已有0 人下载
最新资料
资料动态
专题动态
is_842972
暂无简介~
格式:doc
大小:37KB
软件:Word
页数:0
分类:互联网
上传时间:2019-08-27
浏览量:54