top.asp

基于asp的博客系统+论文(代码齐全)经过调试

<style type="text/css">
<!--
.Myst2 {
	color: #608828;
	font-weight: bold;
	font-size: 12px;
}
.Myst1 {
	font-size: 16px;
	font-family:Arial, Helvetica, sans-serif;
	font-weight: bold;
}
.stye1 {
color: #608828;
font-size: 12px;
}
a:link {
	font-family: "宋体";
	font-size: 12px;
	color: #608828;
	text-decoration: none;
}
a:hover {
	font-family: "宋体";
	font-size: 12px;
	color: #608828;
	text-decoration: underline;
}
a:visited {
	font-family: "宋体";
	font-size: 12px;
	color: #608828;
	text-decoration: none;
}

-->
</style>
<% 
if (request.QueryString("user") <> request.Cookies("User")("username")) and (request.Cookies("User")("username") <> "") then
	'response.Write("不同2")
	response.Cookies("User").Expires = now()
	'response.Cookies("User")("username") = ""
	response.Redirect("Default.asp?user=" & request.QueryString("user"))
end if
 %>

 <table width="614" border="0" align="center" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
  <tr>
    <td width="39" rowspan="3" valign="top"><img src="images/Top_01.gif" width="39" height="106"></td>
    <td width="451" rowspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/Top_02.gif">
      <!--DWLayoutTable-->
      <tr>
        <td width="451" height="15"></td>
        </tr>
      <tr>
        <td height="23" valign="middle">
		<span class="Myst2"><a href="Default.asp?user=<%= request.QueryString("user") %>">首页</a> </span>
		<span class="stye1">|</span><span class="Myst2"> 
			<a href="ArticleList.asp?user=<%= request.QueryString("user") %>">我的文章</a> </span>
			
		 	<span class="stye1">|</span> <span class="Myst2">
		 		<a href="Guest.asp?user=<%= request.QueryString("user") %>">给我留言</a>
		  </span><span class="stye1">|</span><span class="Myst2">
		 <a href="#" onClick="javascript:alert('个人blog');">关于</a> </span><span class="stye1">|</span><span class="Myst2"> <a href="Admin_Main.asp?user=<%= request.QueryString("user") %>">管理</a> </span><span class="stye1">|</span><span class="Myst2"> <a href="Register.asp?user=<%
		if request.QueryString("user") = "" then
		  	response.Write("Register")
		else
			response.Write(request.QueryString("user"))
		end if%>">注册</a></span></td>
        </tr>
      <tr>
        <td height="14"></td>
      </tr>
      <tr>
        <td height="45" valign="middle">
		<% 
		if request.QueryString("user") <> "" then
			call creaters(rs_title,"select * from title where username='" & request.QueryString("user") & "'")
				if not rs_title.eof then
				response.Write("<a class='style2' href='Default.asp?user=" & request.QueryString("user") & "'><span class='Myst1'>" & rs_title("Description") & "</span></a>")
				end if
			call closers(rs_title)
		end if
		 %>
		</td>
      </tr>
      <tr>
        <td height="9"></td>
      </tr>
    </table></td>
    <td height="59" colspan="3" valign="top"><img src="images/Top_R_01.gif" width="124" height="59"></td>
  </tr>
  <tr>
    <td width="16" rowspan="2" valign="top"><img src="images/Top_R_02.gif" width="16" height="47"></td>
    <td width="88" height="31" valign="top"><!--#include file="LogoPage.asp"--></td>
    <td width="20" rowspan="2" valign="top"><img src="images/Top_R_04.gif" width="20" height="47"></td>
  </tr>
  <tr>
    <td height="16" valign="top"><img src="images/Top_R_05.gif" width="88" height="16"></td>
  </tr>
</table>