GetBody asp实现截取字符串的代码
'==================================================
'函数名:GetBody
'作 用:截取字符串
'参 数:ConStr ------将要截取的字符串
'参 数:StartStr ------开始字符串
'参 数:OverStr ------结束字符串
'参 数:IncluL ------是否包含StartStr
'参 数:IncluR ------是否包含OverStr
'==================================================
Function GetBody(ConStr,StartStr,OverStr,IncluL,IncluR)
If ConStr="$False$" or ConStr="" or IsNull(ConStr)=True Or StartStr="" or IsNull(StartStr)=True Or OverStr="" or IsNull(OverStr)=True Then
GetBody="$False$"
Exit Function
End If
Dim ConStrTemp
Dim Start,Over
ConStrTemp=Lcase(ConStr)
StartStr=Lcase(StartStr)
OverStr=Lcase(OverStr)
Start = InStrB(1, ConStrTemp, StartStr, vbBinaryCompare)
If Start<=0 then
GetBody="$False$"
Exit Function
Else
If IncluL=False Then
Start=Start+LenB(StartStr)
End If
End If
Over=InStrB(Start,ConStrTemp,OverStr,vbBinaryCompare)
If Over<=0 Or Over<=Start then
GetBody="$False$"
Exit Function
Else
If IncluR=True Then
Over=Over+LenB(OverStr)
End If
End If
GetBody=MidB(ConStr,Start,Over-Start)
End Function
相关推荐
-
asp截取指定英汉混合字符串_支持中文
说明:本函数作用是截取指定英汉混合字符串,并保持显示长度一至.就是将一个汉字当两英文来截取. 用途:一般会用在标题显示列表,可以避免截取的字符串参插不齐的现象. 程序代码 复制代码 代码如下: '//A_strString要处理的字符串 '//A_intLen以英文字符数为准 '//A_strAddString如果A_strString有截取字符时添中的后缀,如:...,可以为空 function CutString(byval A_strString,byval A_intLen,byval
-
用asp实现的截取指定格式字符串的代码
有段字符串: asdfasdlfajsodf{#kljlkkm#}ojgvjfkdsf{#wdfs#}llsdflksdf 没任何规律的...我要把里面的{#kljlkkm#}和{#wdfs#}查找出来... 1.Split办法: 复制代码 代码如下: <% Dim I, sCode, aCode, sNewCode sCode = "asdfasdlfajsodf{#kljlkkm#}ojgvjfkdsf{#wdfs#}llsdflksdf" aCode = S
-
asp下实现截取字符串特定部分内容函数
截取字符串特定部分内容函数<% '****************************** '函数:GetKey(HTML,Start,Last) '参数:HTML,待截取的原字符串:tart,截取开始标记:last,截取结束标记 '作者:阿里西西 '日期:2007/7/12 '描述:截取字符串函数,从Start开始截取,到Last为结束 '示例:<%=GetKey("阿里西西,国内最大的WEB开发资源","最大的","资源")%
-
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 字符串截取函数
asp 字符串截取函数'********************************************************* '函数:cutStr[str(strlen)] '参数:str,待处理的字符串,strlen,截取的长度 '作者:木木 '日期:2007/7/12 '描述:截取指定长度的字符串 '示例:<%=cutStr("欢迎光临阿里西西",5)%> '*************************************************
-
asp从字符串里截取N个带HTML的字符的函数
'函数名:getHTMLContent'参数:NO-->要取得的字符数, txtContent-->要处理的字符串 '功能: 从字符串里截取N个带HTML的字符,现在的实现方法还不完善,过程是:从字符串里找各种控件的开始,然后依些分开,放到数组里,然后一个一个数组的加上来看看字符是否大于给定的字符如果是,那么,返回这个数组. '作者:柳永法 '时间:2007-6-1 20:03 :)Function getHTMLContent(NO, txtContent) If Len(txtConte
-
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截取字符串的两种应用 原创
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.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.net 截取字符串代码
1,把代码放在sqlhelper中. 复制代码 代码如下: #region 截取字符串 /// <summary> /// 截取字符串 /// </summary> /// <param name="str_value"></param> /// <param name="str_len"></param> /// <returns></returns> public s
-
SQL 截取字符串应用代码
SUBSTRING 返回字符.binary.text 或 image 表达式的一部分.有关可与该函数一起使用的有效 Microsoft® SQL Server™ 数据类型的更多信息,请参见数据类型. 语法 SUBSTRING ( expression , start , length ) 参数 expression 是字符串.二进制字符串.text.image.列或包含列的表达式.不要使用包含聚合函数的表达式. start 是一个整数,指定子串的开始位置. length 是一个整数,指定子串的长
-
Java 按照字节来截取字符串的代码(不会出现半个汉字)
复制代码 代码如下: /* * Copyright 2012-2013 The Haohui Network Corporation */package com.haohui.common.utils; /** * <pre> * 字符串辅助工具 * </pre> * * @project baidamei * @author cevencheng <cevencheng@gmail.com> * @create 2012-11-30 下午2:42:56 */p
-
go语言按显示长度截取字符串的方法
本文实例讲述了go语言按显示长度截取字符串的方法.分享给大家供大家参考.具体分析如下: 根据显示长度截取字符串,之前php用的utf8编码,10个英文和10个汉字的显示长度差距太大,按字节截取的话又会出错出现截取半个汉字的情况,所以写了这两个函数. 这两天在折腾golang,所以就用golang重写了着连个函数.代码如下: 复制代码 代码如下: package main import ( "fmt" ) func main() { fmt.Println(show_st
-
bat 截取字符串(for命令) 推荐收藏
FOR命令中有一些变量,他们的用法许多新手朋友还不太了解,今天给大家讲解他们的用法! 先把FOR的变量全部列出来: ~I - 删除任何引号("),扩展 %I %~fI - 将 %I 扩展到一个完全合格的路径名 %~dI - 仅将 %I 扩展到一个驱动器号 %~pI - 仅将 %I 扩展到一个路径 %~nI - 仅将 %I 扩展到一个文件名 %~
-
Struts2截取字符串代码介绍
在开发中,经常会遇到字符串太长,需要适当截取后再显示的问题,其实实现方式有几种: · 在后台截取后之后再传回页面显示 · 在页面用标签或代码实现 · 在前台使用脚本来处理,此方法不推荐 · 通过样式控制,增加overflow:ellipse等实现,此方法也不推荐 · 其他方式 那么如何用struts2标签来截取字符串呢?网上对这一问题众说纷纭,更有人说根本不能实现,其实实现方法很简单: 首先,你必须用<s:set >将获取的字符串存到一变量里面,以str属性为例 直接获取<s:set n
-
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<
随机推荐
- php站内搜索并高亮显示关键字的实现代码
- Windows7下安装Scala 2.9.2教程
- PHP执行zip与rar解压缩方法实现代码
- 自适应布局meta标签中viewport、content、width、initial-scale、minimum-scale、maximum-scale总结
- hta编写的软件管理工具0.1(IE7.0测试通过)
- mysql数据库迁移至Oracle数据库
- ios开发加载webview显示进度条实例
- Xen虚拟化进阶篇 Xen平台下虚拟机的实时迁移
- 浅析JavaScript动画
- android音乐播放器监听电话状态实现代码
- PHP实现QQ快速登录的方法
- c++编写简单的计算器程序
- android开发之蜂鸣提示音和震动提示的实现原理与参考代码
- MySQL查询优化:LIMIT 1避免全表扫描提高查询效率
- Javascript实现前端简单的路由实例
- python 运算符 供重载参考
- JS保留两位小数,多位小数的示例代码
- 超精准的javascript验证身份证号的具体实现方法
- 详谈Array和ArrayList的区别与联系
- 系统安装时文件系统的选择