Vertical content?

Snitz™ Forums 2000
https://forum.snitz.com/forumTopic/Posts/65832?pagenum=1
05 November 2025, 20:15

Topic


Etymon
Vertical content?
30 October 2007, 11:40


My searches have not yielded the results I am looking for.
I want to split a subject line to read vertically instead of horizontally.
Does anyone know how to do this?
Thanks all!
Etymon
<

 

Replies ...


JJenson
30 October 2007, 12:48


Something like this?
http://www.ssi-developer.net/css/vertical-text.shtml<
Etymon
31 October 2007, 07:14


Originally posted by JJenson
Something like this?
http://www.ssi-developer.net/css/vertical-text.shtml

Thanks for the reply, Jeff.
That's along the lines of what I wanted, except I was looking for this:

V
e
r
t
i
c
a
l

Here's an additional reference that goes into great detail about the possible future of that aspect of CSS (http://fantasai.inkedblade.net/style/discuss/vertical-text)

<
Shaggy
31 October 2007, 07:39


Can you not just add a line break after each character?
<
cripto9t
31 October 2007, 08:04


i use this in a numbers pool script I have. I changed the variable names to make it a little more clear.
Code:
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

<edit> Removed some unneccesary breaks<
Etymon
31 October 2007, 08:27


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.bigsmile
The following made the characters align straighter for my needs:


'#### BEGIN Vertical Text MOD by cripto9t ####'
Code:
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 ####'
<
cripto9t
31 October 2007, 11:22


Glad I could help smile. I use it in a table cell that spans multiple rows, so...
Code:
<td style="text-align;center" rowspan="10">
...centers it just fine. I think I added the spaces to make the cell wider.<
Etymon
31 October 2007, 12:28


Originally posted by cripto9t
Glad I could help smile. I use it in a table cell that spans multiple rows, so...
Code:
<td style="text-align;center" rowspan="10">
...centers it just fine. I think I added the spaces to make the cell wider.

Ah! That makes sense then.
My table data was only about 25 pixels wide.<
© 2000-2021 Snitz™ Communications