blog_leftpub.asp

该资料包含大量网络开发的案例和源代码

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<table width="189" height="200" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="188"><img src="../resource/images/blog/block1_top.gif" width="188" height="19"></td>
  </tr>
  <tr>
    <td align="center" style="table-layout: fixed;WORD-BREAK: break-all; WORD-WRAP: break-word" background="../resource/images/blog/block1_bg.gif"><table width="80%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><h4><img src="../resource/images/blog/icon_pub.gif" width="21" height="21">&nbsp;&nbsp;网站公告</h4></td>
        </tr>
      </table>
      <table width="80%" height="0"  border="0" cellpadding="2" cellspacing="2">
        <tr>
          <td>欢迎光临并加入56Blog网站！希望这里能留下您生活的点滴记忆并与朋友共享~~~<br>
            网站自2005年06月05日全新改版！<br>
      ps：会员注册密码经MD5加密，请放心使用！^_^ </td>
        </tr>
        <tr>
          <td align="right">By Zhwying </td>
        </tr>
      </table></td>
  </tr>
  <tr>
    <td><img src="../resource/images/blog/block1_bottom.gif" width="188" height="22"></td>
  </tr>
</table>

<table border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td><img src="../resource/images/blog/block1_top.gif" width="188" height="19"></td>
  </tr>
  <tr>
    <td align="center" background="../resource/images/blog/block1_bg.gif"> <br>
        <!--#include file="Caledar.asp"--></td>
  </tr>
  <tr>
    <td><img src="../resource/images/blog/block1_bottom.gif" width="188" height="22"></td>
  </tr>
</table>
<%
strSQL="select * from webcount "
objrs.open strsql,objconn,1,1
%>
<table border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td><img src="../resource/images/blog/block1_top.gif" width="188" height="19"></td>
  </tr>
  <tr>
    <td align="center" background="../resource/images/blog/block1_bg.gif"><table width="80%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><h4><img src="../resource/images/blog/icon_other.gif" width="21" height="21">&nbsp;&nbsp;论坛统计</h4></td>
        </tr>
        <tr>
          <td>
            <table cellspacing="0" cellpadding="0">
              <tr>
                <td width="15"></td>
                <td width="145"> 
				◎- 博客总数 <font color="#FF6600"><%=objrs("User_TtlCnt")%></font></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 今日注册 <%=objrs("User_TdyCnt")%></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 日志总数 <font color="#FF6600"><%=objrs("Blog_TtlCnt")%></font></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 评论总数 <%=objrs("Blog_TtlRplCnt")%></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 留言总数 <%=objrs("Blog_MsgCnt")%></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 今天日志 <font color="#FF6600"><%=objrs("Blog_TdyCnt")%></font></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 昨天日志 <%=objrs("Blog_YdyCnt")%></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 论坛帖子 <%=objRS("BBS_ttlPosCnt")%></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 在线人数 <%=application("online")%></td>
              </tr>
              <tr>
                <td></td>
                <td>◎- 访问总数 <%=application("all")%></td>
              </tr>
          </table></td>
        </tr>
    </table></td>
  </tr>
  <tr>
    <td><img src="../resource/images/blog/block1_bottom.gif" width="188" height="22"></td>
  </tr>
</table>
<%objrs.close%>

<form name="form1" method="post" action="blog_msg.asp?action=add"  onSubmit="return checkin(this)">
  <table border="0" cellspacing="0" cellpadding="0" align="center">
    <tr>
      <td><img src="../resource/images/blog/block1_top.gif" width="188" height="19"></td>
    </tr>
    <tr>
      <td align="center" background="../resource/images/blog/block1_bg.gif"><br>
          <table width="80%"  border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td><h4><img src="../resource/images/blog/icon_msg.gif" width="21" height="21">&nbsp;&nbsp;快速留言 <a href="../blog/blog_msg.asp" title="发表留言"> &gt;&gt;</a></h4></td>
            </tr>
            <tr>
              <td>留名：
                  <input name="pubname" type="text" id="pubname" size="12"<%if userid<>"" then response.Write("value='"&username&"' disabled ")%>></td>
            </tr>
            <tr>
              <td>留言：
                  <textarea name="msg" cols="12" rows="2"></textarea></td>
            </tr>
            <tr>
              <td align="center"><input type="submit" name="Submit" class="input"value="发表">
                  <input type="reset" name="reset" class="input"value="取消">
            [<a href="../blog/blog_showall.asp?ShowType=4" title="显示所有留言">察看</a>]</td>
            </tr>
        </table></td>
    </tr>
    <tr>
      <td><img src="../resource/images/blog/block1_bottom.gif" width="188" height="22"></td>
    </tr>
  </table>
</form>
<script language="vbscript">
Function checkin(myform)
checkin=true
if (trim(myform.pubname.value)="") then
  msgbox ("请填写姓名或昵称！") 
  checkin= false
  exit function
end if

if (trim(myform.msg.value)="") then
  msgbox ("请填写留言内容！！") 
  checkin= false
  exit function
end if
end Function
</script>