谁知道无惧无组件上传的使用方法？？？（急用）

[复制链接]

勇敢的心

电梯直达

1^#

发表于 2009-12-27 06:55:53 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

不好意思，对于无惧无组件上传，我看了好长时间了，可是因为自己能力有限，还不是很了解，希望有明白的高手帮忙解决，非常感谢！
<form name="form1" action="save.asp" method="post" enctype="multipart/form-data">
标题：<input type="text" name="title" id="title">
<br>
图片：<input type="file" name="picture" id="picture">
<br>
<input type="submit" name="submit" value="提交"> 
<input type="reset" name="reset" value="重置">
</form>
像上面的代码，如果在上传文件的同时，还要有相关的标题（title）上传，如何用upfile_class类将title传到save.asp网页中呢，应该用什么语句？？？

收藏0

使用道具举报

■■■■■■

2^#

发表于 2009-12-27 06:55:59 | 只看该作者

使用示例
上传文件的表单要加入enctype="multipart/form-data"属性，即
<form name="form1" method="post" action="" enctype="multipart/form-data">
<input type="text" value="1" name="name">
<input type=file name="img">
<input type=submit name="submit" value="提交">
</form>

在执行上传的ASP页
'包含类文件

dim upfile
dim SaveFilename
'建立上传对象
set upfile=new upfile_class
'取得上传数据,限制最大上传10M 计算方法为 10240000/1000000=10.24M
upfile.GetData (10240000)
'判决是否出错
if upfile.isErr then
select case upfile.err
case 1
Response.Write "你没有上传数据呀???是不是搞错了??"
case 2
Response.Write "你上传的文件超出我们的限制,最大10M"
end select
else
'执行保存文件代码
upfile.SaveToFile "img","c:\"&upfile.file("img").filename
'执行自动保存文件代码，SaveFilename为保存的文件名
SaveFilename=upfile.AutoSave("img","c:\")
'销毁对像
set upfile=nothing
end if

自己好好看吧