Michael Bublé Tribute
27 April 2010  Personal
Technorati Logo Technorati  Delicious Logo Del.icio.us  Dig Logo Digg  Blogflux Logo Blogflux
Michael Buble Tribute
A simple website to promote my client as the UK's number 1 Michael Bublé Tribute Act. Ian Gallagher spends hours perfecting the art of the modern tribute act and now has a wide following.
 
The site uses clean markup/css and validates to W3C standards.
 
 
0 comment(s) »
Create a randomly generated bg color using VB code
06 January 2010  Tips
Technorati Logo Technorati  Delicious Logo Del.icio.us  Dig Logo Digg  Blogflux Logo Blogflux
Bubble
This is just a muse nothing serious and I doubt whether it would be the method that most would choose.
 
Turn the body html tag into a server side control with <body id = “PageBody”>
 
In the code behind add Imports System.Drawing at the top of the page and then the following script under the page load event:
 
        Dim redColor As Integer
        Dim greenColor As Integer
        Dim blueColor As Integer
        Dim surpriseColor As New Random
        redColor = surpriseColor.Next(0, 255)
        greenColor = surpriseColor.Next(0, 255)
        blueColor = surpriseColor.Next(0, 255)
        PageBody.Attributes.Add("bgColor", Color.FromArgb  _
        (redColor, greenColor, blueColor).ToArgb)
 
Now every time the page is refreshed a new background colour is generated.
0 comment(s) »
DataList Pagination
03 January 2010  Tips
Technorati Logo Technorati  Delicious Logo Del.icio.us  Dig Logo Digg  Blogflux Logo Blogflux
Bubble

By default the DataList control does not have built in paging capability, however we can get round this by using the PagedDataSource class and some code. This is all well documented on the Net, my problem however, was using:

         FirstPage.Enabled = Not pagedData.IsFirstPage
         PrevPage.Enabled = Not pagedData.IsFirstPage
         NextPage.Enabled = Not pagedData.IsLastPage
         LastPage.Enabled = Not pagedData.IsLastPage

 Caused the site to fail W3C validation

 

A work around that worked for me:

If Not pagedData.IsFirstPage Then
            FirstPage.Visible = True
        Else
            FirstPage.OnClientClick = "return false"
            FirstPage.ForeColor = Drawing.Color.Gray
            FirstPage.Attributes.Add("onmouseover", "this.className='hover'")
        End If

        If Not pagedData.IsFirstPage Then
            PrevPage.Visible = True
        Else
            PrevPage.OnClientClick = "return false"
            PrevPage.ForeColor = Drawing.Color.Gray
            PrevPage.Attributes.Add("onmouseover", "this.className='hover'")
        End If
        If Not pagedData.IsLastPage Then
            NextPage.Visible = True
        Else
            NextPage.OnClientClick = "return false"
            NextPage.ForeColor = Drawing.Color.Gray
            NextPage.Attributes.Add("onmouseover", "this.className='hover'")
        End If
        If Not pagedData.IsLastPage Then
            LastPage.Visible = True
        Else
            LastPage.OnClientClick = "return false"
            LastPage.ForeColor = Drawing.Color.Gray
            LastPage.Attributes.Add("onmouseover", "this.className='hover'")
        End If

 

0 comment(s) »
Studio Eleven Art
03 January 2010  Personal
Technorati Logo Technorati  Delicious Logo Del.icio.us  Dig Logo Digg  Blogflux Logo Blogflux
Studio Eleven Art Website

A recent project, this bespoke CMS website is based on the 3-layer concept: presentaion, buiness logic and database. The site validates to XHTML 1.0 Transitional and CSS level 2.1 and has been tested against cross browser compatibility and is also optimised for SEO.

 

 

0 comment(s) »