图片上传功能模块与其它网站的融合实训.docx

上传人:b****3 文档编号:3765459 上传时间:2022-11-25 格式:DOCX 页数:6 大小:17.33KB
下载 相关 举报
图片上传功能模块与其它网站的融合实训.docx_第1页
第1页 / 共6页
图片上传功能模块与其它网站的融合实训.docx_第2页
第2页 / 共6页
图片上传功能模块与其它网站的融合实训.docx_第3页
第3页 / 共6页
图片上传功能模块与其它网站的融合实训.docx_第4页
第4页 / 共6页
图片上传功能模块与其它网站的融合实训.docx_第5页
第5页 / 共6页
点击查看更多>>
下载资源
资源描述

图片上传功能模块与其它网站的融合实训.docx

《图片上传功能模块与其它网站的融合实训.docx》由会员分享,可在线阅读,更多相关《图片上传功能模块与其它网站的融合实训.docx(6页珍藏版)》请在冰豆网上搜索。

图片上传功能模块与其它网站的融合实训.docx

图片上传功能模块与其它网站的融合实训

图片上传功能模块与其它网站的融合实训---以宝宝365网站的融合为例

一、宝宝365网站情况简介

该网站结构清晰,网站流程合理,代码思路清晰,图片上传的表单界面正确,但是选择图片点击提交后,图片不能从客户端上传到服务器端,没能实现真正的图片上传功能。

真正的图片上传需要实现,图片能从客户端上传到服务器端的指定文件夹,并能把该路径保存到相关表的相关字段中,然后需要显示图片的网页,直接从数据库中动态调取指定的图片文件,应该能够正常显示。

二、融合步骤

1.先把原网站拷贝到D盘,打开DW,配置站点,指向给网站对应的文件夹。

再找到包含文件上传表单项的表单所在的网页文件,本案例是:

babyadmin\goods\goodsaddform.asp。

2.把upload_5xsoft.asp文件拷贝到goodsaddform.asp所在的文件夹中,即babyadmin\goods\文件夹中。

3.打开babyadmin\goods\goodsaddform.asp文件,切换到代码视图,找其标记的各属性的属性值,本案例为

4.打开goodsadd.asp文件,本上传图片的融合,对该文件的改造比较大。

1)在头部添加

--#includefile="upload_5xsoft.asp"-->

2)设置上传的文件夹名formpath="uploadfile/"

uploadfile/可以根据爱好等进行修改成,一旦这样设置,需要在babyadmin\goods\文件夹下创建uploadfile文件夹。

3)增加picname=up_pic()'调用up_pic()函数,返回文件名

再把所有类似pname=request.form("pname")改为pname=upload.form("pname")

4)修改后的goodsadd.asp的代码视图如下:

--#includefile="conn.asp"-->

--#includefile="upload_5xsoft.asp"-->

<%

'管理员身份验证

ifnot(session("key")="sa"orsession("key")="bd"orsession("key")="bs"orsession("key")="bj"orsession("key")="bc")then

response.redirect"../index.asp"

response.end

endif

%>

<%

'这是处理提交过来的数据的页面

formpath="uploadfile/"

'设置上传的文件夹名

url="index.asp"

'上传完后,返回到的页面。

setupload=newupload_5xsoft'实例化一个上传对象upload,这个无组件上传类最大只能上200K的文件,上传超过200K文件,将会非常的慢,如果想上传更大的文件,可以使用有组件上传

functionup_pic()'这是一个上传函数

iCount=0

'记录上传图片数

foreachformNameinupload.objFile'列出所有上传了的文件

setfile=upload.file(formName)'生成一个文件对象

intFileSize=file.FileSize

iffile.FileSize>0andfile.filesize<=2621440then'如果FileSize>0说明有文件数据

FileNameext=LCase(Right(file.fileName,4))

'最文件名的后四位字符,并转成小写

ifFileNameext=".jpg"orFileNameext=".gif"orFileNameext=".GIF"orFileNameext=".JPG"then

'判断图片的格式,你也可以去掉不判断

Pic_Name=file.fileName'将文件名赋值给变量Pic_Name

file.SaveAsServer.mappath(formPath&file.FileName)

''保存文件

iCount=iCount+1

else

response.write""

response.write"alert('你上传的图片格式不正确');"

response.write"history.go(-1);"

response.write""

response.end

endif

else

iffile.filesize>2621440then'如果文件大于256K,这个数值你可以自己算256×1024

response.write""

response.write"alert('上传的图片大于256K,上传失败!

');"

response.write"history.go(-1);"

response.write""

response.end

endif

endif

setfile=nothing

next

up_pic=Pic_Name

'本函数的作用是,将上传的图片上传到文件夹中,并将文件名返回

endfunction

%>

添加新数据

 

欢迎使用后台管理系统

<%dimbaseclass,childclass,childbm,pbm,picture,pname,publish,factory,dw,size,price,dz,yhj,cd,num,goodsstate

'baseclass=mid(request.form("baseclass"),24)

baseclass=mid(upload.form("baseclass"),24)

'childclass=mid(trim(request.form("childclass")),5)

childclass=mid(trim(upload.form("childclass")),5)

'childbm=mid(trim(request.form("childclass")),1,4)

childbm=mid(trim(upload.form("childclass")),1,4)

'picture=request.form("picture")

picname=up_pic()'调用up_pic()函数,返回文件名

'pname=request.form("pname")

pname=upload.form("pname")

'factory=request.form("factory")

factory=upload.form("factory")

'dw=request.form("dw")

dw=upload.form("dw")

'size=request.form("size")

size=upload.form("size")

price=upload.form("price")

dz=upload.form("dz")

num=upload.form("num")

goodsstate=upload.form("goodsstate")

publish=session("username")

setrs=server.createobject("adodb.recordset")

sql="selecttop1*fromgoodswherebaseclass='"&baseclass&"'andchildclass='"&childclass&"'orderbypbmdesc"

rs.opensql,conn,1,3

ifrs.recordcount=0then

pbm=childbm&"001"

else

pbm=childbm+right(cstr(rs("pbm")+1),3)

endif

rs.addnew

rs("picture")=picname

rs("baseclass")=baseclass

rs("childclass")=childclass

rs("pbm")=pbm

rs("factory")=factory

rs("dw")=dw

rs("size")=size

rs("price")=price

rs("dz")=dz

rs("num")=num

rs("goodsstate")=goodsstate

rs("publish")=publish

rs("goodsstate")=goodsstate

rs("inputtime")=now()

rs("yhj")=upload.form("yhj")

rs("info")=upload.form("info")

rs("cd")=upload.form("cd")

rs.update

rs.close'使用完后关闭记录集setrs=nothing

conn.close'关闭数据库连接对象setconn=nothing

%>

 

数据提交成功!

!

!

!

添加新数据

 

 

版权所有:

  如遇到程序使用问题请及时与程序管理员联系

 

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 工程科技 > 能源化工

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1