WebProNews

сексвконтакте секс в sexvkontakte контакте

Very Good job Mads :)

Hi. I'm interested in a subject of this site. I want to say thanks to the author.
! THANKS ! If you want check mine: informacje or ranking kredytów
Best regards!

Function sendOutputWithoutHTMLTags(ByVal inputString As String) Dim newString As String = "" Dim stringCharArray As Char() = inputString.ToCharArray Dim strLength As Integer = inputString.Length For n As Integer = 0 To (strLength - 1) If stringCharArray(n) = "<" Then While stringCharArray(n) <> ">" n = n + 1 End While n = n + 1 End If newString += stringCharArray(n) Next Return newString End Function

dd

i dont  know if you realised but using your HTML remover also makes the whole text lowercase, i can see why you have used it, to remove uppercase and lowercase < br >'s  but it outputs the text as lowercase...

Just a note..

Kind Regards,

Derek Hyams