Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1257437
  • 博文数量: 788
  • 博客积分: 4000
  • 博客等级: 上校
  • 技术积分: 7005
  • 用 户 组: 普通用户
  • 注册时间: 2008-08-19 15:52
文章存档

2017年(81)

2011年(1)

2009年(369)

2008年(337)

分类:

2009-01-04 16:55:46



我用idhttp上传文件到网站(当然网站是有写权限的),我用循环方法上传目录下的多个文件,总是报告"http/1.1   201   created",我查了资料,该错误的意思是“服务器已经创建了文档,Location头给出了它的URL。”。问题还不仅仅是这些,如果目录下有多个文件(大于1个),当第一次点击“上传”按钮的时候,就报告"http/1.1   201   created"错误,在我的错误处理中认为没有上传成功,但是网站上的的确确已经有这个文件了,而且完全正确,第二次点击“上传”按钮的时候,第一个文件的上传却不报告错误,第二个文件报告该错误,但是同样第二个文件也已经传到了网站,依次类推。但是如果本地目录下只有一个文件的话,却不报告任何错误,一次就成功了。代码及解释如下  
  var   t:Tfilestream;  
          st:tstringlist;//本地目录下待上传的文件列表  
          i:integer;//控制循环次数  
  begin  
    for   i:=0   to   st.count-1   do  
    begin  
        t:=Tfilestream.create(st[i],fmopenread);  
      try  
        idhttp1.put(url+extractfilename(st[i]),t);//url是文件上传到网站的路径  
        t.free;  
        showmessage('成功');  
      exccept  
        showmessage('失败');  
        t.free;  
      end;  
    end;//循环结束  
   
  end;//过程结束  
 

upup,怎么没人回答啊?高手到哪里去了啊

"http/1.1   201   created"   这个看起来不是错误啊,应该是新建立文件,返回这个信息。如果原来有对应的文件,不会返回这个信息(因为不是create,而是rewrite)。  
   
  没做过是FTP上传,猜的。

代码写错了   t.free;   释放不该这么写    
  t.free   应该写到try   fianlly   end   保护中  
   
  var   t:Tfilestream;  
          st:tstringlist;//本地目录下待上传的文件列表  
          i:integer;//控制循环次数  
  begin  
    for   i:=0   to   st.count-1   do  
    begin  
        t:=Tfilestream.create(st[i],fmopenread);  
        try  
            try  
                idhttp1.put(url+extractfilename(st[i]),t);//url是文件上传到网站的路径      
                showmessage('成功');  
            exccept  
                showmessage('失败');  
            end;        
        finally  
            t.free;  
        end;  
    end;//循环结束  
   
  end;//过程结束



--------------------------
盛大招聘.Net开发工程师

新闻:2008年开源软件10大胜利
导航:博客园首页  知识库  新闻  招聘  社区  小组  博问  网摘  找找看
阅读(1441) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~