快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

控制输出字符串的长度,可以区别中英文

函数在下面,是方式是:
strvalue("复请Email通知假如不填写则取注册Email",26)
这里26是指26个英文字母,也就是13个汉字


function strlen(str)
dim p_len
p_len=0
strlen=0
if trim(str)<>"" then
p_len=len(trim(str))
for xx=1 to p_len
if asc(mid(str,xx,1))<0 then
strlen=int(strlen) + 2
else
strlen=int(strlen) + 1
end if
next
end if
end function

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 > lennum-2
x=x+1
if asc(mid(str,x,1))<0 then
p_num=int(p_num) + 2
else
p_num=int(p_num) + 1
end if
strvalue=left(trim(str),x)&"…"
loop
end if
end function
返回类别: 教程
上一教程: 用ASP制作在线测试
下一教程: 利用APPLICATION和SESSION优化ASP的数据库联接

您可以阅读与"控制输出字符串的长度,可以区别中英文"相关的教程:
· 检测含有中文字符串的实际长度
· 一套加解密字符串的函数
· 截取一定长度字符串
· 用两种不同的方式来求实现数字字符串的最大,最小和平均值
· 一套相称实用的加解密字符串的函数
    微笑服务 优质保证 索取样品