图片上传

<% Response.Buffer=True %> 图片上传 <% set upload=new upload_5xsoft set file=upload.file("file1") if file.fileSize>0 then '自动生成文件名 filename=date() filename=filename&time() filename=replace(filename,"-","") filename=replace(filename,":","") filename=replace(filename," ","") filename=filename+"." filenameend=file.filename filenameend=split(filenameend,".") if filenameend(1)="gif" or filenameend(1)="jpg" or filenameend(1)="jpeg" then filename=filename&filenameend(1) file.saveAs Server.mappath("uppic/"&filename) response.write "

" response.write "图片已成功上传至服务器中，请使用下面红色地址添加图片，

点击这里重新上传图片！" response.write "

" response.write "

" response.write "" response.write "asjobcom/uppic/"&filename response.write "

" response.write "

" response.write "点击这里查看上传的图片" response.write "

" response.write "

【关闭窗口】" else response.write "文件格式不对" response.write "返回" end if set file=nothing else response.write "文件内容不能为空" response.write "返回" end if set upload=nothing response.write "
" %>