Thanks Shaggy! I was able to do that for static text, but I also needed the vertical text to work with variables.
Thanks cripto9t! That's cleaner than what I came up with! My version does same thing, but yours is much quieter.
The following made the characters align straighter for my needs:
'#### BEGIN Vertical Text MOD by cripto9t ####'Dim strToVert 'Text to turn vertical
Dim iCnt 'Count the letters
Dim strVert 'Resulting vertical text
Dim i 'The counter
strToVert = "Vertical"
iCnt = Len(strToVert)
strVert = ""
for i = 1 to iCnt
strVert = strVert & Mid(strToVert,i,1)
if i < iCnt then strVert = strVert & "<br />"
next
Response.Write strVert
'#### END Vertical Text MOD by cripto9t ####'
<