一段字符串处理程序

原创 2006年06月15日 21:44:00
'处理下半部的超链接
  
  dim sV,sD  '有效数据
  dim lStart,lEnd
  
  lStart = instr(1,sR,"product_con.asp")
  if lStart > 0 then
   
   sV = mid(sR,1,lStart-1)
   
   while lStart > 0
    
    lEnd = instr(lStart, sR, chr(34))
    lStart = lEnd-1
    
    while mid(sR,lStart,1)<>"="
     lStart = lStart -1
    wend
    
    sD = mid(sR, lStart + 1  ,lEnd - lStart -1)
    sV = sV & sD & ".htm"
    
    lStart = instr(lEnd,sR,"product_con.asp")
    
    if lStart=0 then
     sLast = right(sR, len(sR) - lEnd + 1)
     sV = sV & sLast
    else
     sV = sV & mid(sR, lEnd, lStart - lEnd)
    end if
    
   wend
    
  end if
版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

string类的基本使用,编写一个字符串处理程序

这是一个字符串处理程序,按照老外的注释的意思就是将英文单词按一定的规则转换成为某种拉丁文字。 运用到截取字符串,合并字符串,遍历字符串等规则,感觉它的结构非常清晰。 /* * This progr...

一段解析字符串中单词的C语言小程序

一段解析字符串中单词的C语言小程序

JMS 传输和 SOAP 消息处理程序

通常情况下,客户端应用程序在调用 WebLogic Web Service 时使用 HTTP/S 作为连接协议。但是,您可以对 WebLogic Web Service 进行配置,以便客户端应用程序可...
  • lrwin
  • lrwin
  • 2011-03-29 17:07
  • 1096

浅谈JavaScript中的五种为事件指定处理程序的方式

JavaScript和HTML之间的交互是通过事件实现的。   IE9、Firefox、Opera、Sarifi、Chrome都已经实现了DOM2级事件模块的核心部分,IE8是最后一个仍然使用其专有事...

批处理程序总结(后期逐步补充)

批处理程序总结(后期逐步补充) 快速开启和关闭Sql Server服务
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)