Radbryt, hur gör jag??

Jag är inte så insatt i ASP men har ändå försökt mig på att pillra lite på ett script som jag hämtade på Duware.com... Jag får inte till några radbrytningar när jag hämtar från min databas access2000? Har läst flera inlägg här på forumet men jag fattar inte riktigt hur man ska göra... kanske är jättelätt för er som kan men det är det inte för mig!
Jag har kommit så långt att jag tror att det är i någon av dessa kodrader det ska gå att lägga till att jag vill ha med radbrytningarna från databasen??

...Detta står högt upp i koden...

function DoTrimProperly(str, nNamedFormat, properly, pointed, points)
dim strRet
strRet = Server.HTMLEncode(str)
strRet = replace(strRet, vbcrlf,"")
strRet = replace(strRet, vbtab,"")
If (LEN(strRet) > nNamedFormat) Then
strRet = LEFT(strRet, nNamedFormat)
If (properly = 1) Then
Dim TempArray
TempArray = split(strRet, " ")
Dim n
strRet = ""
for n = 0 to Ubound(TempArray) - 1
strRet = strRet & " " & TempArray(n)
next
End If
If (pointed = 1) Then
strRet = strRet & points
End If
End If
DoTrimProperly = strRet
End Function

...Detta står där jag hämtar ur databasen....

<% =(DoTrimProperly((rsTypeListing.Fields.Item("PRO_DESCRIPTION").Value), 1000, 1, 1, " ..."))%>

Har någon koll på detta? Har jag missat något väsentligt, typ i en helt annan fil? kanske i den där man lägger till i databasen??

Help me, helt enkelt!