www.gusucode.com > 站长俱乐部新闻发布系统精简版 1.01源码程序 > admin/admin_heading.asp
<% function adminHeading(headingType,text1,image2,text2,link) 'top level headers if (headingType=1) then response.write"<table>" &_ "<tr valign=""baseline"">" &_ "<td class=""admin_header_left""><img src="""& imageLeft &""" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_ "<td class=""admin_header_icon""><img src=""icons/signpost_24.gif"" width=""24"" height=""24"" border=""0"" alt="""" /></td>" &_ "<td class=""admin_header_text"" width=""15%""> <a href=""default.asp"">" & text1 & "</a></td>" &_ "<td class=""admin_header_spacer"" width=""85%""> </td>" &_ "<td class=""admin_header_left""><img src="""& imageRight &""" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_ "</tr>" &_ "</table>" 'second level headers elseif (headingType=2) then response.write"<table border=0 cellpadding=0 cellspacing=0>" &_ "<tr valign=""baseline"">" &_ "<td class=""admin_header_left""><img src="""& imageLeft &""" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_ "<td class=""admin_header_icon""><img src=""icons/signpost_24.gif"" width=""24"" height=""24"" border=""0"" alt="""" /></td>" &_ "<td class=""admin_header_text"" width=""15%""> <a href=""default.asp"">" & text1 & "</a></td>" &_ "<td class=""admin_header_icon""><img src=""" & image2 & """ width=""24"" height=""24"" border=""0""></td>" &_ "<td class=""admin_header_text"" width=""40%""> <a href=" & link & ">" & text2 & "</a></td>" &_ "<td class=""admin_header_spacer"" width=""50%""> </td>" &_ "<td class=""admin_header_left""><img src="""& imageRight &""" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_ "</tr>" &_ "</table>" 'pop-up window headers elseif (headingType=3) then response.write"<table>" &_ "<tr valign=""baseline"">" &_ "<td class=""admin_header_left""><img src="""& imageLeft &""" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_ "<td class=""admin_header_icon""><img src=""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_icon""><img src=""" & image2 & """ width=""24"" height=""24"" border=""0""></td>" &_ "<td class=""admin_header_text"" width=""300""> <a href=" & link & ">" & text2 & "</a></td>" &_ "<td class=""admin_header_spacer"" width=""330""> </td>" &_ "<td class=""admin_header_left""><img src="""& imageRight &""" width=""16"" height=""30"" border=""0"" alt="""" /></td>" &_ "</tr>" &_ "</table>" else response.write("Ϣû") end if end function %>