Classic ASP Discussion

Print Page | Close Window

Colour

Printed From: Web Wiz Forums
Category: General Discussion
Forum Name: Classic ASP Discussion
Forum Description: Discussion on Active Server Pages (Classic ASP).
URL: https://forums.webwiz.net/forum_posts.asp?TID=2846
Printed Date: 29 March 2026 at 7:47pm
Software Version: Web Wiz Forums 12.08 - https://www.webwizforums.com

Topic: Colour

Posted By: Mart
Subject: Colour
Date Posted: 19 May 2003 at 2:17pm

How can I convert a visual basic colour like &H8000000F& to something like #EEECDB with no components? Is it possible?

Thanks, Martin.

Replies:

Posted By: Mart
Date Posted: 19 May 2003 at 2:35pm

(or asp.net if that opens any doors)

Posted By: Flamewave
Date Posted: 19 May 2003 at 10:15pm

Found this at http://www.vb2themax.com/Item.asp?PageID=CodeBank&ID=270 - http://www.vb2themax.com/Item.asp?PageID=CodeBank&ID=270 , hope it helps.

' convert a VB color code to the ##rrggbb format used in HTML attributes

Function ColorToHTML(ByVal color As Long) As String
    ' HTML color codes are in the format #RRGGBB (red, green, blue)
    ' while Hex(color) returns numbers in the format BBGGRR
    ' therefore we just have to invert the order of the
    ' hex values of red and blue
    Dim tmp As String
    tmp = Right$("00000" & Hex$(color), 6)

    ColorToHTML = "#" & Right$(tmp, 2) & Mid$(tmp, 3, 2) & Left$(tmp, 2)

End Function

I also found a little prgram at http://www.jsware.net/jsware/picker.html - http://www.jsware.net/jsware/picker.html that will probally work as well.

-------------
- Flamewave

They say the grass is greener on the other side, but if you really think about it, the grass is greener on both sides.

Posted By: Mart
Date Posted: 20 May 2003 at 9:28am

Sorry I didn't explain myself porperly, ive got a visual basic program and it shows a webpage, but it is in a microsoft sstab and you cant change the backcolor of it, so it opens the asp page using page.asp?c=&H8000000F& then in page.asp <body bgcolor="<%convertcolor(request.querystring("q"))%>">

Thanks, Martin.

Ps that code doesnt work even in visual basic...