asp的上传和下载如何实现？

Question

asp 的上传和下载如何实现？请各指点，最好有源码比较好

Answer 1

下载
Function GetUrlByXml(url)
On Error Resume NextDim Retrieval '  As xmlhttp
Set Retrieval = CreateObject("Microsoft.XMLHTTP") '//建立对象
With Retrieval
.Open "GET", url, 0, "", ""  '//GET 方式获取页
.Send
GetUrlByXml = (.responseBody, vbUnicode) '//转换byet到string
End With
Set Retrieval = Nothing '//释放
End Function

Answer 2

上传的
http://down.chinaz.com/soft/24607.htm
软件介绍艾恩ASP无组件上传类，不敢夸口说多完美，但能实现基本的功能.包括提取表单数据、上传到不同文件夹、保存到
数据库(上传和保存表单可同时进行)、限制上传扩展名、限制上传大小、选择文件保存类型(原文件名和时间随机命名)等！
本类可以完整保存用户信息,包括同名