Udregne pixelbredde mm.

I forlængelse af http://www.eksperten.dk/spm/437947 står jeg nu i følgende situation med følgende kode:

KODE:

tekst2 = "dette er en test for at se om den mon laver orddelingen korrekt nok"
tekst4 = "this is another test"

Public function Dims (tekst)
for i = 1 to len(tekst)
if mid(tekst,i,1) = " " then
    noget = "blank"
    bredde = "width='5'"
else
    noget = mid(tekst,i,1)
    bredde = ""
end if
  str = str & "<img src='" & noget & ".gif' " & bredde & " border='0' style='margin-left: -1px;'>" '& "<img src='blank.gif' width='1'>"
next
Dims = str
End Function
response.write Dims(tekst2) & "<br>" & Dims(tekst4)
----------------

Koden gør det, at den replacer alle bogstaver med grafik versioner af bogstaverne (a.gif osv.) - MEN hvis jeg har et langt tekstinput som er tilfældet med tekst2 variablen, får jeg problemer hvis den udskrives i en tabel der f.eks. er 200 pixels bred:

DETTE ER EN TEST FOR A
T SE....

Så...hvodden får jeg det nu fikset så den smider et helt ord ned på næste linje?

(evt. med et array der definerer hvor brede (px) de enkelte bogstaver er?)