Friday 16 January 2009

String Arrays

Let's say you've got a bunch of email addresses all in one long string like:

me@bla.com,bla@bla.com,123@bla.com,noob@bla.com,helloworld@bla.com

And you want to separate these into individual email addresses.

Here's how:

Dim emails As String = "me@bla.com,bla@bla.com,123@bla.com,noob@bla.com,helloworld@bla.com"
Dim cleanEmails As String()
Dim s As String
cleanEmails = Split(emails, ",")

For Each s In cleanEmails
Response.Write(s & "
")

Next

This will write to the webform as:

me@bla.com
bla@bla.com
123@bla.com
noob@bla.com
helloworld@bla.com

No comments: