Bryta en loop

Hallå!!!

Har ett litet problem.

När en loop ha kommit till position 75 så vill jag att en liten textsträng ska loopas ut.

x = 0
'For intRecord = 1 to rsGuestBook.PageSize 
For intRecord = 1 to 1000
       if rsGuestbook.EOF then Exit For 
	   If x = 75 then
       response.write "&BeerID" & x & "=" & fldConnor1 & "&BeerName" & x & "=" & fldConnor2 & "%25" & "&BeerCountry" & x & "=" & fldConnor3 & "&BeerSize" & x & "=" & fldConnor4 & "&BeerPrice" & x & "=" & fldConnor5 &" kr"
		End If
       response.write "&BeerID" & x & "=" & fldConnor1 & "&BeerName" & x & "=" & fldConnor2 & "&BeerCountry" & x & "=" & fldConnor3 & "&BeerSize" & x & "=" & fldConnor4 & "&BeerPrice" & x & "=" & fldConnor5 &" kr"
       x = x + 1 
       response.flush 
       rsGuestBook.Movenext 
Next

Som ni kanske ser så är det "%25" som ska läggas till i "rad" 75.

Min hjärna har gått hem för dagen, hoppas nån annan har lite power kvar.

// Mr.Switch

Funkar inte koden? Vad är problemet?

Ja och nej. Jag får ut en sträng, men rad 75 skrivs ut 2 gånger en som "%25" och efter det så slänger den ut rad 75 igen, men utan "%25".

Så om man skulle kunna sätta en "paus" i loopen så skulle ju det vara perfekt.

// Switch

   If x = 75 then
       response.write "&BeerID" & x & "=" & fldConnor1 & "&BeerName" & x & "=" & fldConnor2 & "%25" & "&BeerCountry" & x & "=" & fldConnor3 & "&BeerSize" & x & "=" & fldConnor4 & "&BeerPrice" & x & "=" & fldConnor5 &" kr"
else
       response.write "&BeerID" & x & "=" & fldConnor1 & "&BeerName" & x & "=" & fldConnor2 & "&BeerCountry" & x & "=" & fldConnor3 & "&BeerSize" & x & "=" & fldConnor4 & "&BeerPrice" & x & "=" & fldConnor5 &" kr"
end if

Är det så du menar.