find in string

[Bite My Bubbles]

How can i count the number of times a string appears within another string.
Thanks a
lot!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!
!!

[dlbjr]

Check out Regular Expressions.


-dlbjr

invariable unerring alien

[Evertjan.]

Manohar Kamath [MVP] wrote on 09 aug 2003 in
microsoft.public.inetserver.asp.general:

> Dim arElem
> Dim myString
> Dim mySubString
>
> myString = "this contains the word how many times just one time"
> mySubString = "how many times"
> arElem = Split(myString, mySubString)
>
> Response.Write("Number of times: " & UBound(arElem))

The case insensitive way, often used by me:

MyNum = UBound(Split(ucase(myString), ucase(mySubString)))
Response.Write "Number of times: " & myNum

This also does not keep a large array in memory, (I hope).

--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)

[Bite My Bubbles]

that;s a good one thanks
"Manohar Kamath [MVP]" <mkamath@TAKETHISOUTkamath.com> wrote in message
news:uCnZc0gXDHA.1280@tk2msftngp13.phx.gbl...

> One way to do this is kinda a round about way. Use the Split function to
> split the string into an array, and count the number of array elements,
> minus one.
>
> Dim arElem
> Dim myString
> Dim mySubString
>
> myString = "this contains the word how many times just one time"
> mySubString = "how many times"
> arElem = Split(myString, mySubString)
>
> Response.Write("Number of times: " & UBound(arElem))
>
> You could also use the InStr function, and loop through the first ring to
> count number of times the string appears.
>
> --
> Manohar Kamath
> Editor, .netBooks
> [url]www.dotnetbooks.com[/url]
>
>
> "Bite My Bubbles" <bmb@mybubbles.com> wrote in message
> news:eT6gNQgXDHA.1620@TK2MSFTNGP12.phx.gbl...

> > How can i count the number of times a string appears within another

> string.

> > Thanks a
> >

>

lot!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!

> > !!
> >
> >

>
>

[Bite My Bubbles]

that's a good one too!

"Evertjan." <exjxw.hannivoort@interxnl.net> wrote in message
news:Xns93D264429E3CFeejj99@194.109.133.29...

> Manohar Kamath [MVP] wrote on 09 aug 2003 in
> microsoft.public.inetserver.asp.general:

> > Dim arElem
> > Dim myString
> > Dim mySubString
> >
> > myString = "this contains the word how many times just one time"
> > mySubString = "how many times"
> > arElem = Split(myString, mySubString)
> >
> > Response.Write("Number of times: " & UBound(arElem))

>
> The case insensitive way, often used by me:
>
> MyNum = UBound(Split(ucase(myString), ucase(mySubString)))
> Response.Write "Number of times: " & myNum
>
> This also does not keep a large array in memory, (I hope).
>
> --
> Evertjan.
> The Netherlands.
> (Please change the x'es to dots in my emailaddress)