一、静态换肤=======================================================
<span onclick=cs("换肤文件.css")><font color=red>换 肤</font></span>
<script language=javasrcipt >function cs(yecao){css.href=yecao;}</script>
<link rel="stylesheet" id="css" type="text/css" href="初始文件.css">

    二、ASP动态换肤[随机换肤]===========================================
<link rel="stylesheet" id="css" type="text/css" href="inc/<%randomize%><%=(int(rnd()*2)+1)%>.css">

注：蓝色的数字二是代表文件的数量，再次说明文件的名字只能用1.2.3.4.等等。切记！

    三、asp换肤=========================================================

     第一步：先做一个ASP文件。
（skin.asp）
<%@ Language=VBScript %>
<%
dim skin
if request.querystring("skin")="" then
skin=""
elseif request.querystring("skin")="green" then
skin="green"
elseif request.querystring("skin")="red" then
skin="red"
end if
Response.Cookies("Usercolor")("lanyu")=skin
response.Cookies("Usercolor").expires=now()+100
response.redirect Request.ServerVariables("HTTP_REFERER")
%>
     第二步：设置CSS
<%
if request.cookies("Usercolor")("lanyu")="" then
Response.Write "<link rel=""stylesheet"" href=""skin/bluexp.css"" type=""text/css"">" &

vbCrLf
elseif request.cookies("Usercolor")("lanyu")="green" then
Response.Write "<link rel=""stylesheet"" href=""skin/grayxp.css"" type=""text/css"">" &

vbCrLf
elseif request.cookies("Usercolor")("lanyu")="red" then
Response.Write "<link rel=""stylesheet"" href=""skin/bluexp.css"" type=""text/css"">" &

vbCrLf
end if
%>
    第三步：样式连接
<a href=skin.asp?skin=green >灰</a> <a href=skin.asp?skin=>蓝</a> <a href=skin.asp?skin=red >红</a></font>