用asp实现的截取指定格式字符串的代码

有段字符串： asdfasdlfajsodf{#kljlkkm#}ojgvjfkdsf{#wdfs#}llsdflksdf 
没任何规律的...我要把里面的{#kljlkkm#}和{#wdfs#}查找出来...

1、Split办法： 


代码如下:

<%  
Dim I, sCode, aCode, sNewCode  
sCode = "asdfasdlfajsodf{#kljlkkm#}ojgvjfkdsf{#wdfs#}llsdflksdf"  
aCode = Split(sCode, "{#")  
sNewCode = ""  
For I = 0 To UBound(aCode)  
If InStr(aCode(I), "#}") > 0 Then sNewCode = sNewCode & "{#" & Split(aCode(I), "#}")(0) & "#}"  
Next  
Response.Write sNewCode  
%>

2、正则办法：


代码如下:

<%  
Dim sCode, sNewCode, oTempReg, Match, Matches  
sCode = "asdfasdlfajsodf{#kljlkkm#}ojgvjfkdsf{#wdfs#}llsdflksdf"  
Set TempReg = New RegExp  
With TempReg  
     .IgnoreCase = True  
     .Global = True  
     .Pattern = "\{\#.+?\#\}"  
     Set Matches = .Execute(sCode)  
     For Each Match In Matches  
          sNewCode = sNewCode & Match.Value  
     Next  
End With  
Set TempReg = Nothing  
Response.Write sNewCode  
%>

赞 (0)

相关推荐

  • asp截取字符串的两种应用 原创

    1.纯粹的截取字符串 复制代码 代码如下: function cutstr(thestr1,strlen) dim l,t,c l=len(thestr1) if l<1 then exit function t=0 for dxy1=1 to l c=Abs(asc(Mid(thestr1,dxy1,1))) if c>255 then t=t+2 else t=t+1 end if if t>=strlen then thev=mid(thestr1,1,dxy1) exit for

  • asp从字符串里截取N个带HTML的字符的函数

    '函数名:getHTMLContent'参数:NO-->要取得的字符数, txtContent-->要处理的字符串  '功能: 从字符串里截取N个带HTML的字符,现在的实现方法还不完善,过程是:从字符串里找各种控件的开始,然后依些分开,放到数组里,然后一个一个数组的加上来看看字符是否大于给定的字符如果是,那么,返回这个数组. '作者:柳永法 '时间:2007-6-1 20:03 :)Function getHTMLContent(NO, txtContent) If Len(txtConte

  • asp实现截取字符串函数

    如果标题过长,因为页面布局的限制,只能列表10个字符,这个函数会帮你实现的 复制代码 代码如下: '截取字符串 strvalue(标题,字数) function strvalue(str,lennum)     dim p_num     dim i     if strlen(str)<=lennum then         strvalue=str     else         p_num=0         x=0         do while not p_num > lenn

  • asp截取指定英汉混合字符串_支持中文

    说明:本函数作用是截取指定英汉混合字符串,并保持显示长度一至.就是将一个汉字当两英文来截取. 用途:一般会用在标题显示列表,可以避免截取的字符串参插不齐的现象. 程序代码 复制代码 代码如下: '//A_strString要处理的字符串 '//A_intLen以英文字符数为准 '//A_strAddString如果A_strString有截取字符时添中的后缀,如:...,可以为空 function CutString(byval A_strString,byval A_intLen,byval

  • asp下实现截取字符串特定部分内容函数

    截取字符串特定部分内容函数<% '****************************** '函数:GetKey(HTML,Start,Last) '参数:HTML,待截取的原字符串:tart,截取开始标记:last,截取结束标记 '作者:阿里西西 '日期:2007/7/12 '描述:截取字符串函数,从Start开始截取,到Last为结束 '示例:<%=GetKey("阿里西西,国内最大的WEB开发资源","最大的","资源")%

  • ASP.NET 字符串截取

    复制代码 代码如下: **//// /// 截取字符串,不限制字符串长度 /// /// 待截取的字符串 /// 每行的长度,多于这个长度自动换行 /// public string CutStr(string str,int len) { string s=""; for(int i=0;i 11 { int r= i% len; int last =(str.Length/len)*len; if (i!=0 && i<=last) { if( r==0) {

  • GetBody asp实现截取字符串的代码

    '================================================== '函数名:GetBody '作  用:截取字符串 '参  数:ConStr ------将要截取的字符串 '参  数:StartStr ------开始字符串 '参  数:OverStr ------结束字符串 '参  数:IncluL ------是否包含StartStr '参  数:IncluR ------是否包含OverStr '============================

  • asp 字符串截取函数

    asp 字符串截取函数'********************************************************* '函数:cutStr[str(strlen)] '参数:str,待处理的字符串,strlen,截取的长度 '作者:木木 '日期:2007/7/12 '描述:截取指定长度的字符串 '示例:<%=cutStr("欢迎光临阿里西西",5)%> '*************************************************

  • asp CutStrX字符串截取函数(过滤全部HTML标记)

    复制代码 代码如下: Function CutStrX(ByVal Str,ByVal StrLen) Dim l,t,c,i,r '过滤全部HTML标记 Set r=New RegExp r.Global=True r.MultiLine=True r.Pattern="(</?[A-Za-z][A-Za-z0-9]*[^>]*>)" str=r.Replace(str," ") Set r=Nothing l=Len(str) t=0 For

  • 用asp实现的截取指定格式字符串的代码

    有段字符串: asdfasdlfajsodf{#kljlkkm#}ojgvjfkdsf{#wdfs#}llsdflksdf  没任何规律的...我要把里面的{#kljlkkm#}和{#wdfs#}查找出来... 1.Split办法:  复制代码 代码如下: <%   Dim I, sCode, aCode, sNewCode   sCode = "asdfasdlfajsodf{#kljlkkm#}ojgvjfkdsf{#wdfs#}llsdflksdf"   aCode = S

  • JavaScript截取指定长度字符串点击可以展开全部代码

    文章的篇幅往往不是那么恰到好处,如果以原有的篇幅展示,那么有可能会影响网页的布局或者美观度,这个时候就要根据情况适量截取一定的字符串,以适应布局,不过当点击一个按钮的时候依然可以展开全部的内容,下面就通过一个实例详细介绍一下如何实现此效果,代码示例如下: <!DOCTYPE html> <html> <head> <meta charset=" utf-8"> <meta name="author" conten

  • jQuery截取指定长度字符串的实现原理及代码

    截取指定长度字符串操作在网站建设中大量使用,尤其是在新闻列表这种类型的操作中大量应用. 下面就是一个截取字符串代码实例: <!DOCTYPE HTML> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <meta name="author" content="htt

  • jQuery截取指定长度字符串代码

    例子,截取字符串代码. <!DOCTYPE HTML> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>jQuery截取字符串操作---www.jb51.net</title> <script type="text/javascript"

  • js substring从右边获取指定长度字符串(示例代码)

    如下所示: 复制代码 代码如下: /* Get the rightmost substring, of the specified length, from a String object. */ String.prototype.right = function (length_) { var _from = this.length - length_; if (_from < 0) _from = 0; return this.substring(this.length - length_,

  • php 截取utf-8格式的字符串实例代码

    php 截取utf-8格式的字符串 php中,我们经常需要截取字符串.英文字符占用一个字节,中文字符占用两个字节,但中文字符占用两个字节是相对于GBK编码而言但是在时下国际流行的UTF8编码中,一个中文字符占用3个字节.本文章向大家介绍一个php 截取utf-8格式字符串的函数. 举例说明: function truncate_utf8_string($string, $length, $etc = '...') { $result = ''; $string = html_entity_dec

  • C#截取中英文混合指定长度字符串实例

    复制代码 代码如下: using System.Text.RegularExpressions;using System.Text; /// <summary>/// 字符串长度(按字节算)/// </summary>/// <param name="str"></param>/// <returns></returns>static int StrLength(string str){    int len =

  • 使用JavaScript构建JSON格式字符串实现步骤

    如果你现在正在使用Restful API,并且你需要通过web项目来构建json格式字符串的响应,那么这篇文章将帮助你使用javascript来创建json格式字符串.这是非常有用的,我们将通过jQuery插件$.toJSON把数据对象转换为json格式. 使用JavaScript构建JSON格式字符串 JavaScript代码: 在这里包含了javascript代码.$("#form").submit(function(){}- delete_button是form标签的ID,我们通

  • php中截取中文字符串的代码小结

    字符串截取是一个非常常见的编程任务,而往往带中文的字符串截取会经常用到.虽然不难,但是自己写函数实现又耗费时间,这里介绍一个比较好用的字符串截取函数,能够胜任基本的需求了. 1. 截取GB2312中文字符串 复制代码 代码如下: < ?php //截取中文字符串 function mysubstr($str, $start, $len) { $tmpstr = ""; $strlen = $start + $len; for($i = 0; $i < $strlen; $i

随机推荐