成都百度快照优化|成都百度关键词排名优化|成都SEO【思为网络】 --【思为网络】成都专业网站优化公司,公司拥有专业搜索引擎优化团队,提供网站整站优化(网站结构优化、网站内容优化、网站外部优化)、百度排名首页优化、GOOGLE优化排名
成都百度关键词排名优化--成都百度快照首页排名优化
你的位置:首页 » 网页设计制作 » 正文

取两字符串之间的字符串的函数

2010-5-3 0:0:0 | 作者:sw996 | 0个评论 | 人浏览

<%
'取中间字符串
function getmidstr(L,R,str)

  int_left
=instr(str,L)
  int_right
=instr(str,R)

  
If int_left>0 and int_right>0 Then
  getmidstr
=mid(str,int_left+len(L),int_right-int_left-len(L))
  
Else
  getmidstr
="执行的字符串中不包含“"&L&"”或“"&R&""

  End If
end function

str
="www.goodtext.org"
response.write 
"<BR>"&getmidstr("go","xt",str)
’将输出
"odte"
%
>

扩展模式:

<%
'取中间字符串
function getmidstr(L,R,str,m,n) 
          
'm,n为控制参数,表示输出的字符串将分别向左,向右多输出m,n个字符。
  int_left=instr(str,L)
  int_right
=instr(str,R)

  
if (m="left"then   '若m为“left”,输出的字符串将包含左边部分(L),下同
  m=len(L)
  
end if
  
if (n="right"then

  n=len(R)
  
end if

  
if (m>(len(L)+int_left-1)) then
  m
=(len(L)+int_left-1)
  
end if
  
If int_left>0 and int_right>0 Then

  getmidstr=mid(str,int_left+len(L)-m,int_right-int_left-len(L)+n+m)
  
Else
  getmidstr
="执行的字符串中不包含“"&L&"”或“"&R&""

  End If
end function

str
="abcdefghijk"
response.write 
"<BR>"&getmidstr("bcd","hi",str,0,0


‘输出"efg"
response.write 
"<BR>"&getmidstr("bcd","hi",str,2,1


‘输出"cdefgh"
response.write 
"<BR>"&getmidstr("bcd","hi",str,"left","right"
‘输出
"bcdefghi"


%
>

已有0位网友发表了一针见血的评论,你还等什么?

必填

选填

选填

记住我,下次回复时不用重新输入个人信息

必填,不填不让过哦,嘻嘻。

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

相关推荐