📄 dxtg_main.asp

📁 小灵通短信网站源程序
💻 ASP
字号:
<% Response.Buffer=True %>
<!--#include file="adivoces.asp"-->
<% set rs=server.createobject("adodb.recordset")
sql="select * from tougao"
rs.open sql,conn,1,1
r1=rs.recordcount
rs.close                                                                    
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select * from tougao"           
rs.open sql,conn,1,1 
'jobnum=rs.recordcount 
%>
<html>
<head>
<title>短句中心</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE type=text/css>BODY {
	COLOR: #304618; FONT-SIZE: 12px
}
TD {
	COLOR: #304618; FONT-SIZE: 12px
}
TH {
	COLOR: #304618; FONT-SIZE: 12px
}
.p1 {
	COLOR: #304618; FONT-SIZE: 12px
}
.p2 {
	FONT-SIZE: 12px; LINE-HEIGHT: 140%
}
.p3 {
	FONT-SIZE: 14px
}
.p4 {
	FONT-SIZE: 14px; LINE-HEIGHT: 130%
}
.p5 {
	FONT-SIZE: 7px
}
.p6 {
	COLOR: #d0571f
}
.p7 {
	COLOR: #6c8a14
}
.dm1 {
	BACKGROUND-COLOR: #ffcc00
}
.dm2 {
	BACKGROUND-COLOR: #ffeda6
}
.dm3 {
	BACKGROUND-COLOR: #6c8a14
}
.dm4 {
	BACKGROUND-COLOR: #d5ea95
}
.dm5 {
	BACKGROUND-COLOR: #e6f1c5
}
.ds1 {
	BACKGROUND-COLOR: #6c8a14
}
.ds2 {
	BACKGROUND-COLOR: #a3d11a
}
.ds3 {
	BACKGROUND-COLOR: #d5ea95
}
.dq1 {
	BACKGROUND-COLOR: #e5b700
}
.dq2 {
	BACKGROUND-COLOR: #ffcc00
}
.dq3 {
	BACKGROUND-COLOR: #ffeda6
}
.dyy {
	BACKGROUND-COLOR: #e6f1c5
}
.dw {
	BACKGROUND-COLOR: #ffffff
}
.dgy {
	BACKGROUND-COLOR: #d9d9d9
}
.dt1 {
	BACKGROUND-COLOR: #e6e6e6; COLOR: #6c8a14
}
.dt2 {
	BACKGROUND-COLOR: #f9fcef; COLOR: #6c8a14
}
A {
	FONT-SIZE: 12px
}
A:link {
	COLOR: #304618
}
A:visited {
	COLOR: #3e5d1b
}
A:hover {
	COLOR: #6c8a14
}
.wt {
	COLOR: #ffffff; TEXT-DECORATION: none
}
A.wt:link {
	COLOR: #ffffff; TEXT-DECORATION: none
}
A.wt:visited {
	COLOR: #ffffff; TEXT-DECORATION: none
}
A.wt:hover {
	COLOR: #d5ea95
}
.bk {
	COLOR: #000000; TEXT-DECORATION: none
}
A.bk:link {
	COLOR: #000000; TEXT-DECORATION: none
}
A.bk:visited {
	COLOR: #000000; TEXT-DECORATION: none
}
A.bk:hover {
	COLOR: #000000; TEXT-DECORATION: underline
}
A.bk1:link {
	COLOR: #000000; TEXT-DECORATION: none
}
A.bk1:visited {
	COLOR: #000000; TEXT-DECORATION: none
}
A.bk1:hover {
	COLOR: #000000
}
A.more:link {
	COLOR: #d0571f; FONT-FAMILY: verdana; FONT-SIZE: 10px; FONT-STYLE: italic; FONT-WEIGHT: bold; TEXT-DECORATION: underline
}
A.more:visited {
	COLOR: #d0571f; FONT-FAMILY: verdana; FONT-SIZE: 10px; FONT-STYLE: italic; FONT-WEIGHT: bold; TEXT-DECORATION: underline
}
A.more:hover {
	COLOR: #ff0000; TEXT-DECORATION: underline
}
.t2 {
	BACKGROUND: #c1ce9a; COLOR: #304618; FONT-SIZE: 12px
}
.111 {
	BACKGROUND: #fff99d; BORDER-BOTTOM: #304618 1px solid; BORDER-LEFT: #d5ea95 1px solid; BORDER-RIGHT: #8f8f8f 1px solid; BORDER-TOP: #d5ea95 1px solid; COLOR: #304618; FONT-FAMILY: arial; FONT-SIZE: 12px
}
.222 {
	BACKGROUND: #fff99d; BORDER-BOTTOM: #d5ea95 1px solid; BORDER-LEFT: #8f8f8f 1px solid; BORDER-RIGHT: #d5ea95 1px solid; BORDER-TOP: #304618 1px solid; COLOR: #304618; FONT-FAMILY: arial; FONT-SIZE: 12px
}
.send {
	BACKGROUND-COLOR: #e6f1c5; BORDER-BOTTOM: #e6f1c5 1px solid; BORDER-LEFT: #e6f1c5 1px solid; BORDER-RIGHT: #e6f1c5 1px solid; BORDER-TOP: #e6f1c5 1px solid; FONT-SIZE: 12px
}
</STYLE>
</head>
<body bgcolor="#FFFFFF" text="#000000" topMargin=0>
<div align="center"> 
  <div align="center">
    <table border=0 cellpadding=0 cellspacing=0 class=menu1 width=750 align="center" bgcolor="#eeeeee">
      <tbody> 
      <tr> 
        <td height=68 width=150><a href="http://www.it801.com" target="_blank"><img src="../images/bazhu.gif" width="150" height="78" border="0"></a></td>
        <td height=68 width=491> 
          <div align="center"><a href="http://www.it801.com" target="_blank"><img src="../images/banner.gif" width="480" height="60" border="0"></a></div>
        </td>
        <td width="109"> 
          <div align=center><font color=#000000><br>
            <a href="801news/2002621125933.htm" target="_blank">成立宗旨</a><br>
            <a 
      class=bz 
      href="javascript:window.external.addFavorite('http://www.it801.com/','801工作室')">加入书签</a><br>
            精品广告<br>
            </font></div>
        </td>
      </tr>
      </tbody> 
    </table>
  </div>
  <div align="center"> 
    <table border="0" cellpadding="0" cellspacing="0" width="750" align="center">
      <center>
        <tr> 
          <td height="2" valign="top" bgcolor="#00006A"> </td>
        </tr>
      </center>
      <tr> 
        <center>
          <td width="405" height="16" bgcolor="#E1E1E1" valign="bottom"> &nbsp; 
            ◇<a href="http://bbs.it801.com/reg.asp">注册</a> ◇<a href="http://www.it801.com">it801首页</a>◇<a href="http://download.it801.com">下载基地</a>◇<a href="http://bbs.it801.com">论坛</a></td>
        </center>
      </tr>
      <center>
        <tr> 
          <td height="2" valign="top" bgcolor="#00006A"> </td>
        </tr>
      </center>
    </table>
  </div>
</div>
<table width="750" border="0" align="center">
  <SCRIPT language=javascript>
function IsDigit(cCheck)
{
	return (('0'<=cCheck) && (cCheck<='9'));
}

function IsAlpha(cCheck)
{
	return ((('a'<=cCheck) && (cCheck<='z')) || (('A'<=cCheck) && (cCheck<='Z')))
}

function checkvalue()
{
 if ( document.house.type.value.length == 0 ) {
	alert( "请选发表短句的类别!");
	document.house.type.focus();
	return false;
	}
 if ( document.house.tittle.value.length == 0 ) {
	alert( "请输入短句标题!");
	document.house.tittle.focus();
	return false;
	}

 if ( document.house.name.value.length == 0 ) {
	alert( "请输入你的网名!");
	document.house.name.focus();
	return false;
	}
 return true;
}
</SCRIPT>
  <tr> 
    <td valign="top" width="24%" height="241" bgcolor="#0099cc"> 
      <table border=0 cellpadding=1 cellspacing=0 width=100%>
        <tbody> 
        <tr> 
          <td height=6></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td> 
            <div align="center"><a href="dxtg.asp">我想自己写短句</a></div>
          </td>
        </tr>
        <tr> 
          <td height="3">&nbsp; </td>
        </tr>
        <tr> 
          <td>&nbsp; </td>
        </tr>
        <tr> 
          <td>&nbsp; </td>
        </tr>
        </tbody> 
      </table>
    </td>
    <td valign="top" width="76%" height="241"> 
      <table border=0 cellpadding=0 cellspacing=2 width=100%>
        <tr bgcolor="#ebebeb"> 
          <td colspan="5" class=chn height="17"><a href="http://www.it801.com"><font 
            color=#000099>首页</font></a>&gt;<font color=#000099><a href="index.asp">短信中心</a>&gt;<a href="dxtg.asp">发表短信息</a>&gt;阅读网友发表的短信息</font> 
          </td>
        </tr>
        <tr bgcolor="#FFF9F0"> 
          <td colspan="5" class=chn> 
            <% set rs=server.createobject("adodb.recordset")
     sql="select * from tougao order by id desc" 
     rs.open sql,conn,1,1 %>
          </td>
        </tr>
        <tr bgcolor="#FFF9F0"> 
          <td align=center width="47" class=chn>编号</td>
          <td align=center width="65" class=chn>短信类型</td>
          <td align=center width="289" class=chn bgcolor="#FFF9F0">短句标题</td>
          <td align=center width="59" class=chn>作者</td>
          <td align=center width="101" class=chn>更新时间</td>
        </tr>
        <% do while not rs.eof %>
        <tr bgcolor="#FEF0D1"> 
          <td align=center width="47" class=chn><%=rs("id")%></td>
          <td align=center width="65" class=chn><%=rs("leixing")%></td>
          <td align=center width="289" class=chn bgcolor="#FEF0D1"><a href="dxtg_send.asp?uid=<%=rs("title")%>" title="<%=rs("title")%>"> 
            <%if len(rs("title"))>22 then%>
            <%=left(rs("title"),22)%>... 
            <%else%>
            <%=rs("title")%> 
            <%end if%>
            </a> </td>
          <td align=center width="59" class=chn><%=rs("name")%></td>
          <td align=center width="101" class=chn><%=rs("time")%></td>
        </tr>
        <tr bgcolor="#FFF9F0"> 
          <td align=center width="47" class=chn>&nbsp;</td>
          <td align=center width="65" class=chn>&nbsp;</td>
          <td align=center width="289" class=chn>&nbsp; </td>
          <td align=center width="59" class=chn>&nbsp;</td>
          <td align=center width="101" class=chn>&nbsp;</td>
        </tr>
        <% n=n+1                                                                     
               rs.movenext                                                                     
               if n>=15 then exit do                                                                     
               loop                                                                    
               rs.close                                                                    
               set rs=nothing %>
      </table></p>
      <div align="right"><a href="dxtg_list.asp">更多短信</a>&gt;&gt;&gt;&gt;&gt;&gt; 
      </div>
      <P align=center class=itm>&nbsp; 
    </td>
  </tr>
</table>
<table align=center border=0 cellpadding=0 
cellspacing=0 width=750 class="unnamed2">
  <tbody> 
  <tr> 
    <td height=65 width="712"> 
      <div align="center"> 
        <hr align="center" size="1">
        | <a href="../tech/2002624162639.htm" target="_blank">检索帮助</a> | <a href="../Operation/2002624161957.htm">联系我们</a> 
        | <a href="../801bbs/reg.asp">我要注册</a> | <a href="http://bbs.it801.com">论坛</a> 
        | <a href="http://download.it801.com">下载基地</a> | <a href="http://www.it801.com/sms">手机短信</a> 
        |<br>
        工作室成员：网际飞鱼、霸猪、冰阳、流浪狗、笨狐狸、小老鼠</div>
    </td>
  </tr>
  </tbody> 
</table>
<div align="center"></div>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -