index.asp

Asp源码交易频道 可对商品的添加、修改、删除

<!--#include file="d_tou.asp" -->
<%lj.execute("update luntan set fangwenliang=fangwenliang+1")%>
<table width="777" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
  <tr><td width="30" bordercolor="#EFEFEF" bgcolor="#F4F4F4">
      <div align="center"><img src="tupian/weizhi.gif" width="9" height="9"></div>
    </td>
    <td bgcolor="EFEFEF" background="img/1XP.jpg"> <a href="../index.asp"> 站点首页</a> 
      → <a href="index.asp">BBS区</a></td>
</tr></table>
<table width="777" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF">
  <tr>
    <td bordercolor="#F6F6F6" bgcolor="#FBFBFB" background="img/2XP.jpg" height="14"><img src="img/2XP.jpg" width="17" height="14"> 
    </td>
</tr></table>
<table width="777" border="0" align="center" cellpadding="5" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
  <tr>
    <td width="150" bordercolor="#EBEBEB" bgcolor="D9D9D9">
      <div align="center">版块</div>
    </td>
    <td bordercolor="#EBEBEB" bgcolor="D9D9D9">
      <div align="center">简介</div>
    </td>
    <td width="70" bordercolor="#EBEBEB" bgcolor="D9D9D9">
      <div align="center">主题</div>
    </td>
    <td width="70" bordercolor="#EBEBEB" bgcolor="D9D9D9">
      <div align="center">回复</div>
    </td>
</tr></table>
<%
	set bankuai=lj.execute("select * from bankuai")
		if bankuai.bof and bankuai.eof then
%>
<table width="777" border="1" align="center" cellpadding="20" cellspacing="0" bordercolor="#FFFFFF"><tr>
<td bordercolor="#EFEFEF" bgcolor="#F4F4F4"><div align="center">还没有论坛板块</div></td></tr></table>
<%
		else
			do while not bankuai.eof
%>
<table width="777" border="0" align="center" cellpadding="5" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
  <tr bordercolor="#EFEFEF" bgcolor="#F4F4F4">
    <td width="150" bordercolor="#F4F4F4" bgcolor="F6F6F6">
      <div align="center"><a href="b_luntan.asp?bankuai=<%=bankuai("xuhao")%>">『 <%=server.HTMLEncode(bankuai("mingzi"))%> 
        』</a></div>
    </td>
    <td bordercolor="#F9F9F9" bgcolor="F6F6F6"><%=bankuai("jianjie")%></td>
    <td width="70" bordercolor="#F9F9F9" bgcolor="F6F6F6">
      <div align="center"> 
        <%
	set tiezi=lj.execute("select count(*) as tiezi from tiezi where bankuai="& bankuai("xuhao") &" and tiezi='tiezi'")
	response.Write(tiezi("tiezi"))
%>
      </div>
    </td>
    <td width="70" bordercolor="#F9F9F9" bgcolor="F6F6F6">
      <div align="center"> 
        <%
	set huifu=lj.execute("select count(*) as huifu from tiezi where bankuai="& bankuai("xuhao") &" and tiezi<>'tiezi' and tiezi<>'gonggao'")
	response.Write(huifu("huifu"))
%>
      </div>
    </td>
  </tr>
</table>
<%
			bankuai.movenext
			loop
		end if
%>
<!--#include file="d_wei.asp" -->