主题:  请教:如何截断含有中文的字符串?

mandrakeli
职务：普通成员
等级：1
金币：0.0
发贴：5
#12005/4/12 10:20:02
我把td的width定为30
当在td中填入大于30的字符串时,我要截断字串,并加上...
当字串中含有中文时可能造成乱码,请问怎么解决?



沉默是金
职务：普通成员
等级：6
金币：11.2
发贴：4357
#22005/4/12 10:23:17
function cutStr(str,strlen)
	dim l,t,c,i
	l=len(str)
	t=0
	for i=1 to l
	c=Abs(Asc(Mid(str,i,1)))
	if c>255 then
	t=t+2
	else
	t=t+1
	end if
	if t>=strlen then
	cutStr=left(str,i)&"..."
	exit for
	else
	cutStr=str
	end if
	next
	cutStr=replace(cutStr,chr(10),"")
end function


难人一个……

mandrakeli
职务：普通成员
等级：1
金币：0.0
发贴：5
#32005/4/12 10:33:10
这是vbscript?我不会啊
有javascript版本的吗