| 本月文章推荐 |
判断文章中文字符数量发表日期：2000-11-12
|
|
dim WINNT_CHINESE
WINNT_CHINESE = (len("论坛")=2) function strLength(str) ON ERROR RESUME NEXT if WINNT_CHINESE then dim l,t,c dim i l=len(str) t=l for i=1 to l c=asc(mid(str,i,1)) if c<0 then c=c+65536 if c>255 then t=t+1 end if next strLength=t else strLength=len(str) end if if err.number<>0 then err.clear end function |
| 上一篇：检查sql字符串中是否有单引号,有则进行转化.
人气:14501 下一篇：转换html代码子程序 人气:11641 |
| 浏览全部的内容
Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐 |
