Den görs sedan om till en array genom att splitta raderna:
split(data, chr(13))
och sen per rad:
split(rowArray(index),";")
Försöker nu generera en liknande sträng i .NET istället och har prövat att byta ut chr(13) mot \r, \n (char)13 men när jag läser in strängen i klassisk asp lyckas jag inte hitta någon chr(13).
Frågan är ju hur du läser in strängen till gammal ASP3.0? Det är möjligt att byte mellan teckenkodningar och plattformar (*nix och Windows t.ex.) kan ställa till det bland tecknen i strängen. Läser du från en fil, från en webbplats, eller webförfrågan (request)?
string stringWithNewLine = @"This is a line\nThis is a new line";
Om du på något sätt tar emot den strängen i ASP3.0, borde du kunna splitta på radbrytningen:
dim lines
lines = split(stringWithNewLine, chr(10))
Function getDataFromUrl(useUrl)
set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.open "GET", useUrl, false
xmlhttp.send ""
tempRecievedXMLData = BinaryToString(xmlhttp.responseBody)
set xmlhttp = nothing
getDataFromUrl = tempRecievedXMLData
end function
och
Function BinaryToString(Binary)
Dim I, S
For I = 1 To LenB(Binary)
S = S & Chr(AscB(MidB(Binary, I, 1)))
Next
BinaryToString = S
End Function