dim str as string = "Hej, <br/>detta är<br/>en uppdelad<br/>sträng.
dim myArr as array = split(str,"<br/>")
dim i as integer
for i = 0 to ubound(myArr)
lit.text += myArr(i)
next
string a = "Hej, <br/>detta är<br/>en uppdelad<br/>sträng.".Replace("<br/>", "§");
string[] b = a.Split('§');
foreach(string s in b)
Response.Write(s + "<br/>");