ASP to implement the number of restricted display words in news

Show

This is what you use to limit the number of fonts:

Dim Rstitle,tmpleft
Rstitle=rs ("Title")
If Len (rstitle) >inttitlen Then
???? Rsleft=rstitle
???? Do While Len (rsleft) >inttitlen ' Or len (rstitle,inttitlen*j) >inttitlen
????? Response.Write Left (Rsleft,inttitlen) & "
"
????? Rsleft=right (Rsleft,len (rsleft)-inttitlen)
???? Loop
???? If not IsNull (rsleft) Then
????? Response.Write Rsleft
???? End If
??? Else
???? Response.Write Rstitle
??? End If

The city was written on a temporary basis and poorly written! If anyone has good, don't forget to communicate!