请教，关于无组件上传

以下是upload.asp的代码，另一个upload.htm的我就不贴了，本地执行正常，但是找了几个朋友试下来都是返回Flag2   3002   文件无法被打开，本地iusr权限也开了，请知情的兄弟帮忙。  
  <%@LANGUAGE="VBSCRIPT"   CODEPAGE="936"%>  
  <%  
  option   explicit  
  %>  
  <%  
  On   Error   Resume   Next  
   
  dim   strOriFile  
  dim   strFileName  
  dim   objStream  
  dim   iPos  
  strOriFile   =   Request.Form("file1")  
  iPos   =   instrrev(strOriFile,   "\")  
  if   iPos   =   0   then  
  Response.Write("Input   File   Path   :   "   &   strOriFile   &   "<br>")  
  Response.Write("Unavailable   Path")  
  Response.End()  
  end   if  
  strFileName   =   Mid(strOriFile,   iPos   +   1)  
  Set   objStream   =   Server.CreateObject("ADODB.Stream")  
  objStream.Type   =   1  
  objStream.Open  
  if   Err.Number   <>   0   then  
  OnError(1)  
  end   if  
   
  objStream.LoadFromFile   strOriFile  
  if   Err.Number   <>   0   then  
  OnError(2)  
  end   if  
   
  objStream.SaveToFile   Server.MapPath("./UploadSave/"   &   strFileName),   2  
  if   Err.Number   <>   0   then  
  OnError(3)  
  end   if  
   
  objStream.close  
  set   objStream   =   nothing  
  Response.Write("OK")  
  Response.End()  
   
  '''''''''''''''''''''''''''''''''''''''''''''''''  
  'Function   Name   :   OnError  
  '''''''''''''''''''''''''''''''''''''''''''''''''  
  function   OnError(iNum)  
  objStream.close  
  set   objStream   =   nothing  
   
  Response.Write("Flag   "   &   cstr(iNum)   &   "<br>")  
  Response.Write("Err   "&   Err.Number   &   "   :   "   &   Err.Description)  
  Response.End()  
  end   function  
  %>  
  问题点数：20、回复次数：3Top

1 楼qiushuiwuhen（秋水无恨）回复于 2006-03-03 22:57:54 得分 20

objStream.LoadFromFile   strOriFile  
  如果远程测试，是从服务器上读取，自然没有该文件  
  因为本地测试的时候，正好也是服务器，自然路径也正确  
   
  正确写法参看香农无组件上传，具体内容是解析REQUEST的二进制流Top

2 楼HitmanFDU（桃花岛主）回复于 2006-03-03 23:07:11 得分 0

多谢，我去研究研究Top

3 楼HitmanFDU（桃花岛主）回复于 2006-03-03 23:11:10 得分 0

顺便问一下，网上有什么地方可以找到关于ADODB等各种对象详细介绍的资料？Top

相关问题

• ifobjstream
• thenonerror
• objstream
• err
• response
• number
• write
• function

• 帖主：HitmanFDU
• qiushuiwuhen

• Web开发类图书