CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
IBM Rational 系统开发最佳实践工具包 WebSphere MQ 最佳实践 TOP 15
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  Delphi >  网络通信/分布式开发

使用TLDHTTP处理网页的有关问题.

楼主deadren(deadren)2006-03-03 14:58:26 在 Delphi / 网络通信/分布式开发 提问

我想使用TLDHTTP向一个地址发出请求,然后对返回的网页代码进行处理,得到其中SWF文件的地址,然后下载,但是得到的字符串总是不正确.  
  function   gethtml(skt:   TIdHTTP;   id:   Integer;   url:   string):   string;  
  var  
      html:   string;  
      tempstr:   string;  
      strstart,strend:integer;  
  begin  
      result:='';  
      html:=stringreplace(skt.Get(url),'   ','',[rfReplaceAll]);//得到返回的HTML  
      if   html<>''   then  
      begin  
          if   AnsiContainsText(html,   '<embed')   then//查找是否有该标记,由于我对这个网页的内容比较了解,整个网页只有一个这样的标记  
          begin  
          if   pos('<embed',html)>0   then  
            strstart:=   pos('<embed',html)//得到开始位置  
          else  
          exit;  
          if   pos('quality=high',html)>0   then  
            strend:=   pos('quality=high',html)//得到结束位置  
          else  
          exit;  
          if   strend>strstart   then  
                        result:=MidStr(html,strstart+10,strend-strstart)//得到开始位置与结束位置之间的字符  
          end;  
      end  
      else  
          result   :=   '为空';  
  end;  
   
  现在返回的字符串总是不对,竟然在结束的字符串之后.我想可能是空格,换行,或者是汉字的原因,请各位前辈帮忙看看. 问题点数:20、回复次数:0Top

相关问题

  • 如何处理网页上的表格?
  • 如何处理网页上的表格?
  • 一个网页批处理的问题?
  • 关于搜索到的网页处理
  • 怎么处理搜索到的网页
  • 关于网页出错的处理
  • 关于网页字符串处理
  • 有关字符串处理
  • 有关“例外处理”
  • MSVCer--VC对网页进行处理--不断加分中

关键词

  • html
  • strstart
  • strend
  • 字符串
  • 得到
  • 返回
  • 结束
  • 位置
  • then
  • result

得分解答快速导航

  • 帖主:deadren

相关链接

  • Delphi类图书
  • Delphi类源码下载
  • Delphi控件下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
北京创新乐知广告有限公司 版权所有, 京 ICP 证 070598 号
世纪乐知(北京)网络技术有限公司 提供技术支持
Copyright © 2000-2008, CSDN.NET, All Rights Reserved
GongshangLogo