Antal strenge i en streng

Response.Write(InStr(streng,"efterspørgelse"))

Tror nok det er sådan!
//>Rune

Du er nødt til at lave et lille loop med InStr funktionen, da der ikke umiddelbart findes nogen funktion som den du omtaler i VBScript (som jeg antager du anvender).

medions >> InStr returnerer kun positionen på den første forekomst. Du er nødt til at lave eks. Do-Until med InStr.

oasen >> er dette tip nok, eller vil du ha' en funktion ?

Medions---> Den finder jo bare ud af, om strengen findes i strengen, ik'?

tmceu---> Hmm... jeg mener bare, jeg har gjort det på en nemmere måde førhen, men så er det måske alligevel det bedste med et array og så hente værdien af UBound...

Hvis du smider det i et array med Split, skal du stadig huske at tælle dit ord, da UBound blot returnerer antallet af ORD.

Hvis det er kortere end med et array, vil jeg godt se en demo, tak..

Den sidste fik jeg ikke - hvis jeg har strengen:

blabla,bla2bla2,bla3bla3

og vil finde antal kommaer, kan jeg da udskrive Ubound - 1

Ja, men hvis du eks. laver denne:

myArr = Split("En bruger gøres inaktiv ved at klikke på knappen inaktiv", " ")

Vil UBound(myArr) indeholde antal ord og ikke antal forekomster af det bestemte ord :-) Og hvad med eks. inaktive/inaktiv/inaktivere skal de behandles som det samme ?

hvad med

searchtext="abcabcabcabc"
texttofind="a"
i=1
pos=0
foundcount=0
for i = 1 to len(searchtext)
  if InStr(i,searchtext,texttofind)>0 then pos= InStr(i,searchtext,texttofind)
foundcount=foundcount+1
next

Nå, ja - men jeg bruger det til at splitte forskellige indkommende breve op i et memofelt, så hver meddelelse er adskilt af en lille talkombination, der ikke kan være indeholdt i selve array'et.

Det virker fint med fx.

Dim arrBreve
arrBreve = Split(rs("Breve"),"/&&698")
AntalBreve = UBound(arrBreve) - 1

Spørgsmålet var såmænd bare, om der fandtes noget lettere :)

pato---> Tak, men det er vist en besværlig måde at gøre det på...

oasen > ja måske, men jeg tror du skal løbe hele strengen igennem :-)

Jamen så har du jo styr på det og din metode vil virke fint :-)

Ja, ja - jeg var blot overbevist om, der fandtes en konkret funktion til formålet. Men det gør der åbenbart ikke - du plejer jo at vide, hvad du taler om ;)

Tak for det.

...

Thx 4 Poinz
//>Rune

Selv tak - bryder mig ikke om at afvise, når folk forsøger at hjælpe, uanset om jeg kan bruge det eller ej...

Takker :-)

Tak for tilliden :-)

:)