This thing to limit the number of fonts inside:
Dim Rstitle, TMPLEFTRSTILE = RS ("Title") If LEN (RSTITE)> INTTITLEN THEN ???? rsleft = rsTitle ???? do while len (rsLen (Right (Rstitle, INTTILEN * J) )> INTTITLEN ????? response.write left (rsleft, inttitlen) & "????? rsLEFT = Right (RSLEFT, LEN (RSLEFT) -INTTITLEN) ???? loop ???? f not isnull (RSLEFT) THEN ????? response.write rsleft ???? end if ??? Else ???? response.write Rstitle ??? endiff
This city is temporarily written, and it is worse! Who else is good, don't forget to communicate!