最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
新闻中限制显示字数目
时间：2022-07-02 23:50:44 编辑：袖梨 来源：一聚教程网
这个用在里面限制字体个数的东西：
Dim rsTitle,tmpLeft
rsTitle=Rs("Title")
If Len(rsTitle)>intTitLen Then
rsLeft=rsTitle
Do While Len(rsLeft)>intTitLen 'Or Len(Right(rsTitle,intTitLen*j))>intTitLen
Response.Write Left(rsLeft,intTitLen)&"
"
rsLeft=Right(rsLeft,Len(rsLeft)-intTitLen)
Loop
If Not IsNull(rsLeft) Then
Response.Write rsLeft
End If
Else
Response.Write rsTitle
End If
这个市临时写得，写得比较差！谁要是有好的，别忘记交流阿！
Dim rsTitle,tmpLeft
rsTitle=Rs("Title")
If Len(rsTitle)>intTitLen Then
rsLeft=rsTitle
Do While Len(rsLeft)>intTitLen 'Or Len(Right(rsTitle,intTitLen*j))>intTitLen
Response.Write Left(rsLeft,intTitLen)&"
"
rsLeft=Right(rsLeft,Len(rsLeft)-intTitLen)
Loop
If Not IsNull(rsLeft) Then
Response.Write rsLeft
End If
Else
Response.Write rsTitle
End If
这个市临时写得，写得比较差！谁要是有好的，别忘记交流阿！
相关文章
- 空洞骑士丝之歌存档怎么保存 手动备份与云存档方法介绍 09-10
- 原神挪德卡莱兑换码是什么 挪德卡莱限时最新兑换码大全 09-10
- 空洞骑士丝之歌XGP与Steam存档互通吗 双平台存档转换方法介绍 09-10
- 空洞骑士丝之歌MOD怎么安装 MOD安装步骤指南 09-10
- 禁闭求生2怎么做泥土弹 泥土弹制作方法 09-10
- 禁闭求生2碎石弹药怎么做 碎石弹药制作攻略 09-10