 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% \\\'ASP字数计算函数 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数据库恢复的代码 下一教程: 可以近视替代REMOTE SCRIPT的代码 您可以阅读与"ASP字数计算函数"相关的教程: · ASP字数计算函数--WORDCOUNT() · 本函数计算两个时间的差 · 面向对象的ASP编程之九-客户器端函数 · ASP 中 Split 函数的实例 · 计算当前日期是任意时间段内第几周的函数 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
