求各位高手给看看那!<html >
<head>
<link href="default.css" type="text/css" rel="stylesheet"/>
<title>个人主页</title>
<%
set conn=server.CreateObject("ADODB.Connection")
strprovider="provider=SQLOLEDB.1;Data Source=ZGC-20111121JBZ;Initial Catalog=stu;user id=sa;password=;"
conn.open strprovider
set rs=server.CreateObject("ADODB.Recordset")
sql_BlogInfo="select * from blog_Info"
set rs_Blog_Info=conn.execute(sql_BlogInfo)
%>
</head>
<body width=100%;>
<div>
<div class="one" >
<div class="two">
</div>
<div class="b">
<ul>
<li><a href=""> <font color=red>网站首页 </font> </a> </li>
<li><a href=""><font color=red>最新日志</font> </a> </li>
<li><a href=""><font color=red>热门日志 </font></a> </li>
<li><font color=red >欢迎<% =session("username") %>光临博客系统</font> </li>
</ul>
</div>
</div>
<div class="content">
<div class="content-width">
<%sql_toplog="select *from blog_Content where log_IsShow='true' order by log_PostTime desc"
rs.open sql_TopLog,conn,1,1
if not rs.eof then
rs.PageSize=rs_BlogInfo("blog_PerPage")
if NowpPage="" then NowPage=1
NowPage=clng(NowPage)
if NowPage <1 then NowPage=1
if NowPage >rs.PageCount then NowPage =rs.PageCount
rs.absolutepage=NowPage
%>
<div class="content-page">
<div class="page" style="float:left">
<ul><li><%=NowPage%> <%=rs.PageCount%> 
<%if NowPage<>1 then %>
<a herf="?page=1">首页</a>
<a herf="?page=<%=NowPage-1%>">上一页</a>
<%end if
if NowPage<> rs.PageCount then %>
<a herf="?page=<%=NowPage+1%>">下一页</a>
<a herf="?page=<%=rs.PageCount%>">尾页</a>
<% end if %>
</li></ul>
</div>
<font style="float:right;color:red;text-align:right">位置:网站首页(所有日志)</font>
</div>
<% for i=0 to rs.PageSize-1 %>
<div class="content">
<div class="top">
<a herf="blog_article.asp?blogAuther=<% rs("log_Autheor") %>&log_ID=<%=rs("log_ID") %>"><%=rs("log_Title")%></a>
<h2>作者:<%=rs("log_Auther")%></h2>
</div>
<div class="cbody"><%=left(rs("log_Content"),35)&"******"%></div>
<div class="bot">
<%=rs("log_PostTime")%>| <a href="blog_article.asp?blogAutor=<%=rs("log_Author")%>&log_ID=<%=rs("log_ID")%>">评论:<%=rs("log_CommNums")%></a>|查看次数:<%=rs("log_ViewNums")%>
</div>
</div>
<% rs.movenext
if rs.eof then exit for
next %>
<div class="content-page">
<ul><li><%=NowPage%> <%=rs.PageCount%> 
<% if NowPage<>1 then %>
<a herf="?page=1">首页</a>
<a herf="?page=<%=NowPage-1%>">上一页</a>
<% end if
if NowPage<> rs.PageCount then %>
<a herf="?page=<%=NowPage+1%>">下一页</a>
<a herf="?page=<%=rs.PageCount%>">尾页</a>
<% end if %>
</li></ul>
</div>
<%elsethen%>
没有日志!
<%end if%>
</div>
<div class="content-right">
<div class="top">
<h4>=会员入口=</h4>
<div> <%if session("username")=""then%>
<a href="login.asp">登录</a>
<%else%>
<a href="blog_default.asp?blogAuthor=<%=session("username")%>">进入我的博客</a>
<a href="logout.asp">注销</a>
<%end if%>
<a href="register.asp">用户注册</a></div>
</div>
<!--最新日志-->
<div class="sidepane1">
<h4>=最新日志=</h4>
<div><%sql_toplog="select top 5 * from blog_Content where log_IsShow='true' order by log_PostTime desc"
set rs_toplog=conn.execute(sql_toplog)
while not rs_toplog.eof %>
<a href="blog_article.asp?blogAuthor=<%=rs_toplog("log_Author")%>&log_ID=<%=rs_toplog("log_ID")%>"><%=left(rs_toplog("log_Title"),14)%></a>
<%rs_toplog.movenext
wend %>
</div>
</div>
<!-热门->
<div><h4>=热门日志=</h4>
<div> <%sql_hotlog="select top 5 * from blog_Content where log_IsShow='true' order by log_ViewNums desc"
set rs_hotlog=conn.execute(sql_hotlog)
while not rs_hotlog.eof %>
<a href="blog_article.asp?blogAuthor=<%=rs_hotlog("log_Author")%>&log_ID=<%=rs_hotlog("log_ID")%>"><%=left(rs_hotlog("log_Title"),14)%></a>
<%rs_toplog.movenext
wend %>
</div>
</div>
<!-热门->
<div><h4>=日志统计=</h4>
<div>
日志:<B><%=rs_BlogInfo("blog_Nums")%></B>篇<br>
评论:<B><%=rs_BlogInfo("blog_CommNums")%></B>个<br>
会员:<B><%=rs_BlogInfo("blog_MemNums")%></B>人<br>
</div>
</div>
</div>
</div>
</div>
</body>
</html>
<head>
<link href="default.css" type="text/css" rel="stylesheet"/>
<title>个人主页</title>
<%
set conn=server.CreateObject("ADODB.Connection")
strprovider="provider=SQLOLEDB.1;Data Source=ZGC-20111121JBZ;Initial Catalog=stu;user id=sa;password=;"
conn.open strprovider
set rs=server.CreateObject("ADODB.Recordset")
sql_BlogInfo="select * from blog_Info"
set rs_Blog_Info=conn.execute(sql_BlogInfo)
%>
</head>
<body width=100%;>
<div>
<div class="one" >
<div class="two">
</div>
<div class="b">
<ul>
<li><a href=""> <font color=red>网站首页 </font> </a> </li>
<li><a href=""><font color=red>最新日志</font> </a> </li>
<li><a href=""><font color=red>热门日志 </font></a> </li>
<li><font color=red >欢迎<% =session("username") %>光临博客系统</font> </li>
</ul>
</div>
</div>
<div class="content">
<div class="content-width">
<%sql_toplog="select *from blog_Content where log_IsShow='true' order by log_PostTime desc"
rs.open sql_TopLog,conn,1,1
if not rs.eof then
rs.PageSize=rs_BlogInfo("blog_PerPage")
if NowpPage="" then NowPage=1
NowPage=clng(NowPage)
if NowPage <1 then NowPage=1
if NowPage >rs.PageCount then NowPage =rs.PageCount
rs.absolutepage=NowPage
%>
<div class="content-page">
<div class="page" style="float:left">
<ul><li><%=NowPage%> <%=rs.PageCount%> 
<%if NowPage<>1 then %>
<a herf="?page=1">首页</a>
<a herf="?page=<%=NowPage-1%>">上一页</a>
<%end if
if NowPage<> rs.PageCount then %>
<a herf="?page=<%=NowPage+1%>">下一页</a>
<a herf="?page=<%=rs.PageCount%>">尾页</a>
<% end if %>
</li></ul>
</div>
<font style="float:right;color:red;text-align:right">位置:网站首页(所有日志)</font>
</div>
<% for i=0 to rs.PageSize-1 %>
<div class="content">
<div class="top">
<a herf="blog_article.asp?blogAuther=<% rs("log_Autheor") %>&log_ID=<%=rs("log_ID") %>"><%=rs("log_Title")%></a>
<h2>作者:<%=rs("log_Auther")%></h2>
</div>
<div class="cbody"><%=left(rs("log_Content"),35)&"******"%></div>
<div class="bot">
<%=rs("log_PostTime")%>| <a href="blog_article.asp?blogAutor=<%=rs("log_Author")%>&log_ID=<%=rs("log_ID")%>">评论:<%=rs("log_CommNums")%></a>|查看次数:<%=rs("log_ViewNums")%>
</div>
</div>
<% rs.movenext
if rs.eof then exit for
next %>
<div class="content-page">
<ul><li><%=NowPage%> <%=rs.PageCount%> 
<% if NowPage<>1 then %>
<a herf="?page=1">首页</a>
<a herf="?page=<%=NowPage-1%>">上一页</a>
<% end if
if NowPage<> rs.PageCount then %>
<a herf="?page=<%=NowPage+1%>">下一页</a>
<a herf="?page=<%=rs.PageCount%>">尾页</a>
<% end if %>
</li></ul>
</div>
<%elsethen%>
没有日志!
<%end if%>
</div>
<div class="content-right">
<div class="top">
<h4>=会员入口=</h4>
<div> <%if session("username")=""then%>
<a href="login.asp">登录</a>
<%else%>
<a href="blog_default.asp?blogAuthor=<%=session("username")%>">进入我的博客</a>
<a href="logout.asp">注销</a>
<%end if%>
<a href="register.asp">用户注册</a></div>
</div>
<!--最新日志-->
<div class="sidepane1">
<h4>=最新日志=</h4>
<div><%sql_toplog="select top 5 * from blog_Content where log_IsShow='true' order by log_PostTime desc"
set rs_toplog=conn.execute(sql_toplog)
while not rs_toplog.eof %>
<a href="blog_article.asp?blogAuthor=<%=rs_toplog("log_Author")%>&log_ID=<%=rs_toplog("log_ID")%>"><%=left(rs_toplog("log_Title"),14)%></a>
<%rs_toplog.movenext
wend %>
</div>
</div>
<!-热门->
<div><h4>=热门日志=</h4>
<div> <%sql_hotlog="select top 5 * from blog_Content where log_IsShow='true' order by log_ViewNums desc"
set rs_hotlog=conn.execute(sql_hotlog)
while not rs_hotlog.eof %>
<a href="blog_article.asp?blogAuthor=<%=rs_hotlog("log_Author")%>&log_ID=<%=rs_hotlog("log_ID")%>"><%=left(rs_hotlog("log_Title"),14)%></a>
<%rs_toplog.movenext
wend %>
</div>
</div>
<!-热门->
<div><h4>=日志统计=</h4>
<div>
日志:<B><%=rs_BlogInfo("blog_Nums")%></B>篇<br>
评论:<B><%=rs_BlogInfo("blog_CommNums")%></B>个<br>
会员:<B><%=rs_BlogInfo("blog_MemNums")%></B>人<br>
</div>
</div>
</div>
</div>
</div>
</body>
</html>