用ASP和VBScript上载文件（二）

上载脚本的使用
    
    　　下面是开发的上载脚本的应用范例。本文的下载文件提供例子中的文件和代码。将压缩文件释放到一个路径下，为你的网络服务器配置一个虚拟路径。可以在浏览器中测试和启动uploadForm.html。
    
    调用脚本
    
    　　下面是调用上载BuildUploadRequest 方法的途径。首先调用一个全程dictionary：UploadRequest。然后调用BuilUploadRequest方法，然后在自变量中传送到请求原始二进制数据。
    
    byteCount ＝ Request.TotalBytes
    RequestBin ＝ Request.BinaryRead（byteCount）
    Dim UploadRequest
    Set UploadRequest ＝ CreateObject（"Scripting.Dictionary"）
    BuildUploadRequest RequestBin
    
    　　数据被分解并存储在dictionary对象中，并用Item（） 方法恢复。这些item 数据可以保存在VBScript 变量中，并且可以在代码的任何地方使用。数据可以作为响应传送回客户机，或用在ASP代码中，或写进文件中及放入数据库中。
    
    取回数据
    
    　　UploadRequest 对象的数据可用Item（"key"） 函数进行存取。现在来考虑一下这样的情况：要存取一个 email控制的值。可以这样做：
    
    email ＝ UploadRequest.Item（"email"）.Item（"Value"）
    
    　　因为这是一个文本类控制，内容是一个字符串，这个字符串可以同任何其它VBScript 字符串一样使用。
　对于二进制数据，可以用相同方法恢复内容：
    
    picture ＝ UploadRequest.Item（"blob"）.Item（"Value"）
    
    　　也可以存取其它信息，如文件名和content-type。他们是文本类控制。