The instr function accepts a parameter for the starting position.
You can use the value of the position of the first match as the starting point for the second match, adding two characters to move you past the vbcrlf:
secondStart = SentanceCount + 2
SecondVbCrLf = Instr(secondStart, strStory, vbCrLf)
Note that if the SecondVbCrLf is zero, then there is no second vbcrlf
After getting the position of the second vbcrlf you can use the Mid funtion to get the second paragraph
Response.Write Mid(strStory, secondStart, (SecondVbCrLf - secondStart - 1))
Of course, you have to be prepared for the case where there is no second vbCrLf, and handle that properly.
However, there are other ways to do this as well.
One would be to use the Split function as follows:
arr = Split(strStory, vbcrlf)
Response.Write arr(1) ' This returns the SECOND paragraph, since the array is zero based.
Another is to use regular expressions, which is a bit too complicated to cover easily here - but is something you will want to learn about at some point.
Woody Z http://www.learntoprogramnow.com