top.asp

blog 又搭工

<%
	strSql="Select title,toppic From config"
	Set rs=db.Execute(strSql)
%>
<%
	strtemp=right(rs("toppic"),3)
	'response.write strtemp
	if strtemp="swf" then		
%>
<div id="top">
  <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="780" height="120">
    <param name="movie" value="<%=rs("toppic")%>" />
    <param name="quality" value="high" />
    <embed src="<%=rs("toppic")%>" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="780" height="120"></embed>
  </object>
  </div>
  <%
  	else
  %>
  <div id="top">
  <img src="../<%=rs("toppic")%>" height="120" width="780" />
<div id="blogtitle">
<!--<div style=" margin-top:30px;margin-left:auto; margin-right:auto; font-size:30px; font-family:'黑体'; font-weight:bolder; text-align:center;color:white;"-->
<%
	response.Write rs("title")
	rs.close
	set rs=nothing
	
%>
</div>
</div>
<%
end if
%>
		<div id="bar">
			<a href="index.asp" class="menu">首页</a><a href="message.asp#me" class="menu">在线留言</a><a href="all_link.asp" class="menu">友情连接</a></div>