<%
Dim 
background,topback,bottomback,headmenu,footmenu,lefttitle,maintitle,bgclr1,bgclr2,bgclr3,bgclr4,bgclr5
set rs=server.CreateObject("adodb.recordset")
rs.open "select background,topback,bottomback,headmenu,footmenu,lefttitle,maintitle,bgclr1,bgclr2,bgclr3,bgclr4,bgclr5 from sdx_skin",conn,1,1
background=trim(rs("background"))
topback=trim(rs("topback"))
bottomback=trim(rs("bottomback"))
headmenu=trim(rs("headmenu"))
footmenu=trim(rs("footmenu"))
lefttitle=trim(rs("lefttitle"))
maintitle=trim(rs("maintitle"))
bgclr1=trim(rs("bgclr1"))
bgclr2=trim(rs("bgclr2"))
bgclr3=trim(rs("bgclr3"))
bgclr4=trim(rs("bgclr4"))
bgclr5=trim(rs("bgclr5"))
rs.close
set rs=nothing
%>