caught in Infinite loop

[Hogfarmer]

Hello, I am trying to eventually parse a string and here is what I have so far but it doesn't progress.
Madstr="7-8-9-10"


Do Until Mid(Madstr, t, 1) = "-"
Response.Write(Mid(Mad, t, 1))
t = t + 1
Loop

 

[JuggaloBrotha]

If that's the pattern (numbers separated by hyphens) then I'd suggest you save yourself a bunch of coding and use Regular Expressions.

 

[Hogfarmer]

Can you be a little more specific? Thanks.

 

[JuggaloBrotha]

Sure, here's a great tutorial based site that'll explain what RegEx is and how to use it: Regular-Expressions.info - Regex Tutorial, Examples and Reference - Regexp Patterns

In .Net you use: Regex Class (System.Text.RegularExpressions)

 

[Hogfarmer]

So this is a 3rd party piece of software? It needs to be installed with admin permissions, on the server? This could be a big hurdle given my high secure environment. Or is it a seperate standalone util only used when needed?

**Oh it's a class?

 

[JuggaloBrotha]

It's all in the .Net Framework already:

Imports System.Text.RegularExpressions

Public Class Form1

    Private m_RegEx As New Regex("YourPatternHere")

End Class

All you need is the pattern to match against, I'm not good with RegEx patterns but in your case I doubt it'd be all that hard.

If you don't want to get into RegEx (though this would be a good time to do it in case you need to know how to do other types of pattern matching) You could just Split() the string into an array with the hyphen being the split char:

Dim Pieces() As String = Madstr.Split("-"c)
For Counter As Integer = 0I To Pieces.GetUpperBound(0I)
    Response.Write(Pieces(Counter))
Next Counter

 

[Hogfarmer]

The split function. New to me and works!
thanks.