mySmartUpload.Upload
' 用 For Each 循环获取 From表单中每一项的值
For each item In mySmartUpload.Form
For each value In mySmartUpload.Form(item)
Response.Write(item & " = " & value & "<BR>")
Next
Next
Response.Write "<Hr>"
' 上传文件数据
' Response.Write("文件数目 =" & mySmartUpload.Files.Count &"<BR>")
Response.Write("总字节 = " & mySmartUpload.Files.TotalBytes &" bytes<Br><Br>")
Response.Write("文件清单: " & "<Br>")
' 对每一个文件 - 还有更简单的方法, 见wuf33.asp
For each file In mySmartUpload.Files
If not file.IsMissing Then
'以原来的文件名存于 C:\temp 下
file.SaveAs("c:\temp\" & file.FileName)
Response.Write(file.FileName & " (" & file.Size & "bytes)<BR>")
End If
Next
Set mySmartUpload = Nothing
%>
</BODY>
</HTML>
关于该组件更多、更详细的用法、功能（如限制上传文件的类型、尺寸，上传至数据库，下载文件或数据库字段等等），你可自己去看样例或研究洋文帮助。如果觉得看E文太累，也可下载一个全国产的File Upload组件，里面有中文的帮助和样例，还是不错的，下载地址：http://www.chinaasp.com/program/fileup.zip。
（二） 图形组件：Dundas Pie Chart（饼状图）
先听听组件提供者是怎么说的：“闪光的性能，足以让人晕厥的高质量的图形，强大、高速、无比的灵活性”，哇塞，吹牛胜过韦小宝，是不是这样，看看结果之一：
有了这样的饼状图，你也可以象新浪网一样搞调查了，吹得这么好的东西却是免费的，你还等什么，快快驾上你的慢猫去拉下来：
（1）3DPieCSC.EXE：http://www.dundas.com/downloads/freeproducts/files/3DPieCSC.EXE
（2）FPDocInst.exe：http://www.dundas.com/downloads/freeproducts/files/FPDocInst.exe
3DPieCSC.EXE中包括该组件，后者是说明文档，都是安装文件，我将它安装在服务器的“C:\Inetpub\3dPieCSC”目录下，该组件自带两个复杂无比的样例程序以展示它炫丽无比的性能，较难搞明白。这里举一个简单实用的大众化例子：
wuf36.htm，通过<IMG>标签调用ASP文件：
<HTML><BODY>
<IMG src="wuf37.asp">
</BODY></HTML>
wuf37.asp，用来生成图形（与上面同理，请勿在代码中使用中文）：
<%@ Language=VBScript %>
<% Option Explicit
Dim objPieChart
Set objPieChart = Server.CreateObject("Dundas.PieChartServer.1") '先创建组件
'设置工作目录
objPieChart.DirOutput = "C:\Inetpub\3dPieCSC\Sample\Chart\"
'设置模板文件所在目录
objPieChart.DirTemplate = "C:\Inetpub\3dPieCSC\Sample\Templates\"
'材质目录-你可以轻松的改变图形的材质和颜色
objPieChart.DirTexture = "C:\Inetpub\3dPieCSC\Sample\Textures\"
'选择一个模板文件, 该模板文件可自己编辑或修改
objPieChart.LoadTemplate "PieInTheSky.cuc"
'图形标题
objPieChart.Title = "This is a Sample"
'增加各项目, 包括权重 标签 说明
objPieChart.AddData 40, "Item1:40%","China"
objPieChart.AddData 30, "Item2:30%","USA"
objPieChart.AddData 30, "Item3:30%","Other"
'输出结果为一图形, 可指定宽度和高度
objPieChart.SendJPEG 400,300
Set objPieChart = Nothing
%>
老实说，这个免费的东西还是不错的，就是它提供的例程太复杂了，让人不能一触即会。现在你可能要来一个举一反三，融会贯通，想怎样得到柱状图，的确是有这样的组件：ShotGraph，但是完全不需要搞这么复杂吗，你仅需准备一个柱状的图片（不会做！看到别人网页上有，另存一个不就搞定），利用HTML标记Weight、Height按比例拉伸和压缩就行了（<img src = bar.gif width = <%=变量%> height = 10>）。
此外，为了弥补本讲座开头负责任的简略，在此郑重向大家推荐两个Email组件：
（1） aspSmartMail: http://www.aspsmart.com/liblocal/download/EN/aspSmartMail.zip，注意千万不要在代码中使用中文，不然你怎么也发不出一封信，详见例程wuf35.asp。
（2） W3 Jmail: http://download.dimac.net/jmail/jmail.exe。
（3） ChinaMail：http://wuf.bentium.net/，本人写的全中文Email组件。
对于组件的感情，我个人是很复杂和沉重的，IIS4.0内置组件确实太少，然则网上E文的组件很多不支持中文，使用起来实在不够爽，那么为什么不使用国产的组件呢，你去国内最好的http://www.chinaasp.com/就知道了，所列组件寥寥，令人寒心，那么只剩一条路了，那就是自己写（可一般人自己写得了吗？这是一个疑问）。我倒是很同意ChinaASP的呼吁，大概意思就是国内没有任何软件公司公开发表ASP组件，在ASP方面的书虽成吨，但品味不高。的确，当初我应邀写这个讲座时，市面上关于ASP的书还很少，但现在，突然间出来很多，我还是建议你买外国人编的书，一来有光盘，二来确实舶来品总体上讲得好些，读起来象那么回事，也不死板。
最后给大家提供几个组件资源站点：
（1） http://www.serverobjects.com/
（2） http://www.15seconds.com/
（3） http://www.activeserverpages.com/
（4） http://www.softartisans.com/
文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
