 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% \\\'ASP字数计算函数 \\\'by SBSTAR@SINA.COM Function WordCount(strInput) Dim strTemp strTemp = Replace(strInput, vbTab, " ") strTemp = Replace(strTemp, vbCr, " ") strTemp = Replace(strTemp, vbLf, " ") \\\' 删除字首字尾空格 strTemp = Trim(strTemp) \\\' 替换为一个空格 Do While InStr(1, strTemp, " ", 1) <> 0 strTemp = Replace(strTemp, " ", " ") Loop WordCount = UBound(Split(strTemp, " ", -1, 1)) +1 End Function %> 返回类别: 教程 上一教程: ASP数据连接方式 下一教程: WEB打印设置解决方案一(通过修改注册表改变IE打印设置) 您可以阅读与"ASP字数计算函数--WORDCOUNT()"相关的教程: · ASP字数计算函数 · 本函数计算两个时间的差 · ASP实用函数库 · ASP中SPLIT 函数的一例 · 将ASP的DEBUG变得简朴的两个函数 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
