网络编程
位置:首页>> 网络编程>> Asp编程>> ASP UTF-8编码下字符串截取和获取长度函数

ASP UTF-8编码下字符串截取和获取长度函数

 来源:asp之家 发布时间:2011-03-30 10:52:00 

标签:ASP,UTF-8,字符串截取

代码如下:


'************************************ 
'截取文字长度函数,支持UTF-8 
'输入参数: 
' 1、文字内容 
' 2、文字最大长度 
'************************************ 
Public Function Cut_Title(Title,TLen) 
Dim k,i,d,c 
Dim iStr 
Dim ForTotal 

If CDbl(TLen) > 0 Then 
k=0 
d=StrLen(Title) 
iStr="" 
ForTotal = Len(Title) 

For i=1 To ForTotal 
c=Abs(AscW(Mid(Title,i,1))) 
If c>255 Then 
k=k+2 
Else 
k=k+1 
End If 

iStr=iStr&Mid(Title,i,1) 

If CLng(k)>CLng(TLen) Then 
iStr=iStr".." 
Exit For 
End If 
Next 

Cut_Title=iStr 
Else 
Cut_Title="" 
End If 
End Function 

'******************************* 
'检测文字长度函数,支持UTF-8 
'输入参数: 
' 1、文字内容 
'******************************* 
Public Function StrLen(strText) 
Dim k,i,c 
Dim ForTotal 

k=0 
ForTotal = Len(strText) 

For i=1 To ForTotal 
c=Abs(AscW(Mid(strText,i,1))) 
If c>255 Then 
k=k+2 
Else 
k=k+1 
End If 
Next 
StrLen=k 

End Function

0
投稿

猜你喜欢

  • 方法1: 代码如下:truncate table TableName 删除表中的所有的数据的同时,将自动增长清零。 如果有外键参考这个表,这
  •   在服务器端asp程序可以接受html页面上的form传来的参数,那么它又如何实现IE地址参数判断呢?当地址栏没有参数"id"时
  • 所谓“评论”不是必须得有文本框,用户录入提交数据才算,广义上的评论包括用户的任何“表态”,典型如打分。我接触电子商务时间并不长,最早应该是0
  • 我很久前在YAHOO上扣的代码,兼容性很好,在Windows下的主流浏览器中可以正常运行。大家先不要急着下载代码,你随时都可以下,我们来分
  • 今天冒出来一个想法,在仅知道数据库名的情况下,用asp得到数据库中的所有表名、所有表的字段名、以及所有字段中的内容。经过一段时间查询资料和修
  • 有关 Web 字体的话题正在增多,对 Web 设计师来说,他们并不关注技术细节,不管是 TrueType 的 Hinting 技术
  • 建立池连接可以显著提高应用程序的性能和可缩放性。SQL Server .NET Framework 数据提供程序自动为 ADO.NET 客户
  • 遇到一个很奇怪的现象,在给页面添加“打印”按钮时,发现网页在IE6下居然不能打印,弹出一个对话框,遇到脚本错误。查看错误详细:定位到 url
  • 以下列出了两种数据库的方法:ASP+Access20001.要获取的ID值字段属性必须设为:自动编号(我们假设字段名为recordID)2.
  • 看着这个题目可能大家会有点陌生,不知道是什么,说的直白一点,RDFa就是让你的页面更好的被机器所理解,而不简简单单是展示你的页面,下面就关于
  •  function f(x){  alert(x);  return 
  • 阅读上一篇:交互设计模式(二)-Pagination(分页,标记页数) Tagging(标签)问题摘要用户往往想通过流行或最详尽的主题来浏览
  • isnull在数据库查询中的应用,特别是再语句连接的时候需要用到 比如连接时候,某个字段没有值但是又要左连接到其他表上 就会显示空, isn
  • (一)关于体验约瑟夫.派恩和詹姆士.吉尔摩在《体验经济》一书中提出其观点:所谓“体验”就是企业以商品为道具,以服务为舞台,以顾客为中心,创造
  • 那么在集合函数中它有什么用呢 ?假设数据库有一张表名为student的表。如果现在要你根据这张表,查出江西省男女个数,广东省男生个数,浙江省
  • 所有数据库和状态文件都包含在其中。但是,在确定数据目录内容的布局中管理员有某些职责。本文讨论为什么要移动数据目录的各个部分(甚至是字典本身)
  • 从今天起,我将陆续将 ppk on JavaScript 的读书心得发布到这个blog上。ppk是我所景仰的一位web开发者,原因无它,只是
  • 在某些情况下,比如自动补全(auto complete)的输入框中,需要使用keyup事件来监听键盘的输入以迅速作出回应。关键在于keyup
  • 看了很多介绍javascript面向对象技术的文章,很晕.为什么?不是因为写得不好,而是因为太深奥.javascript中的对象还没解释清楚
  • iframe标签在网页中可以创建一个内嵌框架,通过指定src属性来调用另一个网页文档的内容。和frameset一样,用它来对网页结构进行拆分
手机版 网络编程 asp之家 www.aspxhome.com