asp怎么计算txt文本里有多少字

用这个函数试试：
Function LenStr(str)
    dim str
    str=replace(str," ","")   //替换清空所有空格；
    str=raplace(str,""","")   //
    str=raplace(str,"chr(34),"")  //
    str=raplace(str,">","")    //替换清空各种引号，逗号等等。这个可以百度查一下各种符号；
    str=len(str)  //返回str字符串的个数；
End Function