FormData就是文件的内容了。
  
  　　中间根据需要，可进行相应的处理。最后的工作就是将文件保存了。保存的方法可以有两种：一种是利用VB或VC之类程序中的二进制文件操作方法，在工程中加入适当的类型库，最终编译成DLL文件，使用时再将该DLL文件注册就可以了。文件存贮程序如下：
  Public Function SaveFile(Pathname As String) As String
  　　　　Dim objContext As ObjectContext
  　　　　Dim objRequest As Request
  　Set objContext=GetObjectContext()
  　　　　Set objRequest=objContext("Request")
  　　　　'以下的一段代码是进行文件存贮的有关操作
  　Dim FormData() As Byte,CLStr,DivStr
  　　　　Dim DataStart As Long,DataSize As Long
  　　　　DataSize=objRequest.TotalBytes
  　　　　Redim FormData(DataSize-1)
  　　　　FormData=objRequest.BinaryRead(DataSize)
  　　　　CLStr=ChrB(13) & ChrB(10)
  　　　　DataStart=InStrB(FormData,CLStr & CLStr)+4
  　　　　DivStr=LeftB(FormData,InStrB(FormData,CLStr)-1)
  　　　　DataSize=InStrB(DataStart+1,FormData,DivStr)-DataStart-2
  　　　　FormData=MidB(FormData,DataStart,DataSize)
  　　　　'创建一个二进制文件并将FormData写入其中
  　　　　Open Pathname For Binary As 1
  　　　　Put #1,,FormData
  　　　　Close #1
  　　　　SaveFile="OK!"
  　　 End Function