将文件名存入mysql_实现文件上传并把文件名存入数据库

本帖旨在用最简单的代码来实现文件上传并把文件名存入数据库

"*******************************************************

"**程序由北京黑羽设计，如果引用并发布请注明出处********************

"**获取更多的内容，请点击http://www.brsky.net*******************

"**程序设计内容请不要QQ打扰，发邮件bj_heiyu@163.com或者网站留言****

"*******************************************************

******index.html--上传页面*******

enctype="multipart/form-data" name="form1" method="post">

文本内容

上传文件

******upload.asp--文件上传处理页面******

OPTION EXPLICIT

Server.ScriptTimeOut=5000

%>

dim request1,txt,img,sql

"建立上传对象

"其中对象request1你可定义成任意字符串，只是方便引用，因为传递的参数我们习惯用request来接收，所以我们定义成request1，注意，定义成request是不行的

set request1=New UpLoadClass

"设置为手动保存模式

request1.AutoSave=2

"设置服务器文件保存路径

"这里我们是把上传的图片保存在uploadfile这个子文件夹里的

request1.SavePath="uploadfile/"

"打开对象

request1.open()

"获得照片标题

"这里的.form("pic")是指你的表单文本框name="txt"

txt=request1.Form("txt")

"设置产品小图最大为10K

"任何时候都可以重设参数，这对于你上传不止一个图片很重要

request1.MaxSize=10240

"如果保存小图成功，系统生成目标文件名

"这里的"img"是指你的上传文件表单的名字

type="file">

if request1.Save("img",0) then

img=request1.SavePath&request1.Form("img")

end if

"上传内容完成，我们并得到了文本内容：txt;上传文件的文件名(带路径)：pic

"关闭对象request1

set request1=nothing

"上传内容存入数据库

sql="insert into [txt]([txt],img)

values(""&txt&"",""&img&"")"

conn.execute(sql)

"防止重复提交，把网页转入主页response.redirect("index.html")

%>

文章引用自：http://www.brsky.net/web/index.asp?id=37