Vertical content? - Snitz™ Forums 2000

The Forum has been Updated

The code has been upgraded to the latest .NET core version. Please check instructions in the Community Announcements about migrating your account.

Vertical content? - نوشته شده در 30 Oct 2007 (1265 Views)

Etymon

Advanced Member

مطلب: 2396

2396

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
<

نوشته شده در 30 Oct 2007

JJenson

Advanced Member

مطلب: 2121

2121

Something like this?
http://www.ssi-developer.net/css/vertical-text.shtml<

نوشته شده در 31 Oct 2007

Etymon

Advanced Member

مطلب: 2396

2396

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)

<

آخرین ویرایش توسط

نوشته شده در 31 Oct 2007

Shaggy

Support Moderator

مطلب: 6780

6780

Can you not just add a line break after each character?
<

Search is your friend “I was having a mildly paranoid day, mostly due to the
fact that the mad priest lady from over the river had
taken to nailing weasels to my front door again.”

نوشته شده در 31 Oct 2007

cripto9t

Average Member

مطلب: 881

881

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<

_-/Cripto9t\-_

آخرین ویرایش توسط

نوشته شده در 31 Oct 2007

Etymon

Advanced Member

مطلب: 2396

2396

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 ####'

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 ####'
<