asp upload控件使用基本入门

aspupload这个控件使用也比较简单，安装程序附带了几个例子，看完也基本熟悉使用了,如果只是项目中偶尔使用,只要记住几条就可以了。
一个简单的例子是：我们要做一个文件管理器，文件提交后将文件编号和文件名写入到数据库中。有两个页面组成：a.asp,b.asp.
<form method=post enctype="multipart/form-data" action=b.asp>
<input type=file name=filetosub>
<input type=text name=code size=10>
<input type=submit name=ok value=upload>
</form>

b.asp
<%
set upload=server.createobject("persits.upload")
count=upload.save("c:/upload")
set file=upload.files("filetosub")
mycn.execute"insert into tablefile (code,filename) select "&upload.form("code")&",'"&file.filename&"'
response.write count &"个文件被提交到c:/upload"
%>
这样就实现了文件的上传，但问题接着就来了：
1.如果我不想使用原来的文件名，我要自己定义呢，如何做？
2.如果我要一次提交多个文件呢？如何做？
3.如果我要提交的文件不是放在c:/upload下呢？

按照这种意图，我们修改一下a.asp
<form method=post enctype="multipart/form-data" action=b.asp>
<input type=file name=filetosub1>
<input type=file name=filetosub2>
<input type=file name=filetosub3>
<input type=text name=code size=10>
<input type=submit name=ok value=upload>
然后我们在b.asp中也做出一些修改:
<%

'数据库连接这里就不写了
set upload=server.createobject("persits.upload")
upload.save
for each file in upload.files
filenamestr="1111"&File.Filename
File.SaveAs "c:/upload/" & File.Filename
mycn.execute"insert into tablefile (code,filename) select "&upload.form("code")&",'"&filestr&"'"
next
%>

再继续，如果我们要把文件存储到数据库中呢，如何操作？
a.asp我们不需要做任何动作，只要修改b.asp
<%
set upload=server.createobject("persits.upload")
upload.save "c:/upload"
set file=upload.files("filetosub")
sql="insert into filedb (filecon,filename) value (?,'"&file.filename&"')"
file.todatabase mycn,sql
response.write"<script>alert('ok')</script>"
%>

既然存放到数据库中了就可能需要读取出来。
<%
set upload=server.createobject("persits.upload")
sql="select * from filedb where filename='"&filenamestr&"'"
rs1.open sql,mycn,2,3
if not rs1.eof then
upload.fromrecordset rs1("filecon").value,"c:/upload/"
end if
rs1.close
%>