over 255tegns output i en form fra db

Jeg har et asp script (til en gæstebog) hvor der hentes data fra en database (dato/navn/email/kommentar bliver lagt fra form ind til db'en). Felterne er "tekst"-felter i db'en. Men så kan jeg kun bruge 255 tegn, og hvis jeg laver "kommentar"-feltet om til et "notat"-felt, kan jeg ikke få hentet data fra db'en op på asp-siden.
Nogen der kan hjælpe med det?
Vedlægger scriptet her:

(<blablabla forbindelse bla bla>)
Conn.Open DSN

Function ParseString(ByVal String)
intCount = 1
Do While intCount <= Len(String)
strCount = strCount + 3
If strCount = 70 Then
New_String = New_String & "<br>" & Mid(String, intCount, 1)
strCount = 0
Else
New_String = New_String & Mid(String, intCount, 1)
End If
intCount = intCount + 1
Loop
ParseString = New_String
End Function

Dim Count
Count = Request.Form("limitform")
If Count = "*" Then
  strSQL = "Select * FROM data Order by Id DESC"
ElseIf Count = "" Then
  strSQL = "Select TOP 10 * FROM data Order by Id DESC"
Else
  strSQL = "Select TOP " & Count & " * FROM data Order by Id DESC"
End If

Set rs = Conn.Execute(strSQL)
Do

Response.Write "Dato: " & rs("dato") & "<BR><BR>"

Response.Write "Navn: " & rs("navn") & "<BR>"

strEmail = rs("email")
strLink = "<a href=mailto:" & rs("email") & ">" & strEmail & "</a><BR><BR>"
Response.Write "Email: " & strLink

text = ParseString(RS("kommentar"))
text = replace(text,vbcrLF,"<br>")
Response.Write text & "<BR><BR><HR noshade size=1>"
rs.MoveNext
Loop While Not rs.EOF

Conn.Close
Set Conn = Nothing
%>

Håber I kan hjælpe, det her er UNDERLIGT og burde ikke kunne ske?!?!

/Frido