谁实现了那个6行代码无组件上传的例子？ Web 开发 / ASP

作者：佚名    文章来源：不详    点击数：加载中...    更新时间：2008-7-11 字体:[大 中 小]

谁实现了那个6行代码无组件上传的例子？

楼主iamybj（）2006-12-25 00:37:15 在 Web 开发 / ASP 提问

网上盛传一篇文章，说是6行代码实现无组件上传，我把代码拷来实验，就是不成功，不知有何错误。  
  upload.asp:  
   
  　　   <form   name="FORM"   action="upload.asp"   method="post">    
   
  　　　　<input   type="submit"   name="submit"   value="OK">    
   
  　　   <input   type="file"   name="file1"   style="width:400"   value="">    
   
  　　   </form>  
  -----------------------  
  upload.asp:  
  <%    
   
  Function   GetFileName(ByVal   strFile)  
  If   strFile   <>   ""   then  
  GetFileName   =   Mid(strFile,InstrRev(strFile,"")+1)  
  Else  
  GetFileName   =""  
  End   If  
  End   Function  
   
  strFileName   =   Request.Form("file1")  
  Set   objStream   =   Server.CreateObject("ADODB.Stream")  
  objStream.Type   =   1  
  objStream.Open  
  objStream.LoadFromFile   strFileName  
  objStream.SaveToFile   "c:\window\haha.jpg",2  
  objStream.Close  
  %> 问题点数：20、回复次数：4Top

1 楼devms（来不及伪装成人）回复于 2006-12-25 11:08:05 得分 0

早就证明是谬论、是无稽之谈了，还在试Top

2 楼pzhuyy（喝小酒泡尼姑）回复于 2006-12-25 11:13:37 得分 0

路过!Top

3 楼anwell（清风.Net 1982y.Net.Cn）回复于 2006-12-25 14:41:50 得分 0

盲目追求代码少没有任何意义.  
   
   
  Top

4 楼anwell（清风.Net 1982y.Net.Cn）回复于 2006-12-25 14:42:27 得分 0

就像盲目追求GDP没有任何意义一样  
   
  咱们用着方便,  
   
  老百姓得到实惠  
   
  这才是最最重要的.Top