ASP字数计算函数--Wordcount（）-中国IT人才网（www.cnitrc.com）

让每一个热爱IT的人都找到一份满意的工作！

文章搜索：

您的位置：首页->-> 软件学院-> ASP技术-> ASP字数计算函数--Wordcount（）

ASP字数计算函数--Wordcount（）

作者：未知来源：未知加入时间：2005-5-15　www.cnitrc.com

<%
'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技术

ASP技术
PHP技术
JSP技术
.NET技术
服务器技术
数据库技术
其它类
工具软件
办公软件

本类阅读TOP10

ASP如何获取真实IP地址

ASP 编程中 20 个非常有用的例子——适合初学者

在VBScript中使用类（一）

ASP初学者怎样快速入门

基于ASP的编程常见问题

一个可以读取ID3信息的类[可以很方便添加MP3了]

未经书面授权严禁转载和复制本站的任何招聘信息和文章

	硬件学院 \| 网络学院 \| 游戏秘籍 \| 求职技巧 \| 企业管理 \| 软件资讯 \| IT导购 \| 软件下载 \| 源码下载软件学院 \| 安全资讯 \| 图形图象 \| 网络营销 \| 电子商务 \| 硬件资讯 \| IT生活 \| 教程下载 \| 电影娱乐
	网站首页个人求职单位招聘高校联盟猎头服务培训服务资讯中心 IT论坛