contar palabras

[aviana]

¿como puedo contar las palabras de una página .HTM evitando contar las etiquetas HTML?

[reek]

No se si esto te puede ayudar.

<a href='ir.asp?http://www.asp101.com/samples/wordcount.asp' target='_blank'>http://www.asp101.com/samples/wordcount....</a>

suerte y saludos de Reek

[enygma]

Pues si primero te las arreglas para quitar las palabras que son etiquetas HTML (con un replace de una expresion regular por ejemplo) el resto del problema se soluciona haciendo:
<pre> palabras = split(texto)
NumPalabras = uBound(palabras)+1 </pre>
Espero que esto sirva para aclarar algo...

[Mecenias]

No la he probado pero encontre una funcion para quitar los tags, si te vale pruebala y la comentas:

''By Steven Smith
Function RemoveHTML( strText )
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = &quot;&lt;[^&gt;]*&gt;&quot;
RegEx.Global = True
strText = Replace(LCase(strText), &quot;&lt;br&gt;&quot;, chr(10))
RemoveHTML = RegEx.Replace(strText, &quot;&quot;)
End Function

Espero que te sirva