www.gusucode.com > 站长俱乐部新闻发布系统精简版 1.01源码程序 > main_login_heading.asp

    <%
function adminHeading(headingType,text1,image2,text2,link) 
	if (headingType=1) then
                if name="Skin" then
        		response.write"<table>" &_
		        "<tr valign=""baseline"">" &_
		        "<td class=""admin_header_left""><img src=""admin/skins/heading_Skin_1.gif"" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_
		        "<td class=""admin_header_icon""><img src=""admin/icons/signpost_24.gif"" width=""24"" height=""24"" border=""0"" alt="""" /></td>" &_
		        "<td class=""admin_header_text""  width=""100""> <a href=""default.asp"">" & text1 & "</a></td>" &_
		        "<td class=""admin_header_spacer"" width=""600"">&nbsp;</td>" &_
		        "<td class=""admin_header_left""><img src=""admin/skins/heading_Skin_3.gif"" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_
		        "</tr>" &_
		        "</table>"
	        else
    		        response.write"<table>" &_
    		        "<tr valign=""baseline"">" &_
    		        "<td class=""admin_header_left""><img src=""admin/images/heading_bg_left.gif"" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_
    		        "<td class=""admin_header_icon""><img src=""admin/icons/signpost_24.gif"" width=""24"" height=""24"" border=""0"" alt="""" /></td>" &_
    		        "<td class=""admin_header_text"" width=""100""> <a href=""default.asp"">" & text1 & "</a></td>" &_
    		        "<td class=""admin_header_spacer"" width=""600"">&nbsp;</td>" &_
    		        "<td class=""admin_header_left""><img src=""admin/images/heading_bg_right.gif"" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_
    		        "</tr>" &_
    		        "</table>"
	        end if
	else
		response.write("标题信息没有设置")
	end if
end function
%>