Can you post here a sample of what StrString will contain, what are the results you want?


>Hi All,
>
>I have been attempting to do a function for a couple of days now and I have got to the stage if I have to look at it again I am going to go bonkers.
>
>I want my function to read through a string where I have a several start and end tags inside a lode of text.
>
>I want to right out from the start tag to the end tag every time the start to end tags appear in the string.
>
>This is what I have and I don't think I'm that far off.
>
>

>lb = "start"
>rb = "end"
>StrString = a
>lbStrPosition = ""
>		
>For Each StrEachTag In Split(StrString, Len(lb) - 5)
>	If lbStrPosition = "" Then
>		lbStrPosition = 1
>	Else
>		lbStrPosition = lbStrPosition + 3
>	End If
>	lbStrPosition = InStr(lbStrPosition, StrString, lb)
>	rbStrPosition = InStr(lbStrPosition, StrString, rb)
>	StrEnd = rbStrPosition - lbStrPosition + Len(rb)
>	Response.Write Mid(StrString , lbStrPosition, StrEnd)
>Next
>

>
>I might be way off but if any VBScript Guru can help me I would really appreciate it.
>
>Kind Regards,
>Tarran Walker