ASP字数计算函数

2016-01-29 18:41 2 1 收藏

ASP字数计算函数,ASP字数计算函数

【 tulaoshi.com - ASP 】

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

来源:http://www.tulaoshi.com/n/20160129/1506847.html

上一篇：用ADODB.Stream代替FSO读取文本文件
下一篇： Photoshop基础教程：曲线运用详解

看过《ASP字数计算函数》的人还看了以下文章更多>>

几个常用的ASP函数

标签： Web开发

========取得带端口的URL，推荐使用================ Function Get_ScriptNameUrl() If request.servervariables("SERVER_PORT")="80" Then Get_ScriptNameUrl="http://" & request.servervariables("server_name")&lcase(request.servervariables("script_name")) Else Get_Scrip...

ASP 中 DateDiff 函数详解

标签： ASP

DateDiff 函数描述返回两个日期之间的时间间隔。语法 DateDiff(interval, date1, date2 [,firstdayofweek][, firstweekofyear]]) DateDiff 函数的语法有以下参数：参数描述 interval 必选。字符串表达式，表示用于计算 date1 和 date2 之间的时间间隔。有关数值，请参阅“设置”部分。 date1, date2 必选。日期表达式。用于计算...

asp:生成静态页面函数

标签： Web开发

代码如下： % if SaveFile("/htm/list.htm","http://www.xxx.com/asp/list.asp") then Response.write "已生成" else Response.write "没有生成" end if function SaveFile(LocalFileName,RemoteFileUrl) Dim Ads, Retrieval, GetRemoteData On Error Resume Next Set&...

在Word中使用函数计算

标签： word

在Word中使用函数计算如下图一样，存在如下的表格。电脑教程现在，我们要计算的就是男女生的总人数，所以，把插入条定位在总人数的下面的那个单元格。然后，执行如下图的菜单操作：表格→公式。弹出如下图。上图中，直接输入公式： =Sum(A2,B2) 最后，点击确定按钮，计算结果就出来...

Asp.Net常用函数

标签： Web开发

Abs(number) 取得数值的绝对值。 Asc(String) 取得字符串表达式的第一个字符ASCII 码。 Atn(number) 取得一个角度的反正切值。 CallByName (object, procname, usecalltype,[args()]) 执行一个对象的方法、设定或传回对象的属性。 &nbs...

查看更多精彩>>