📄 d_tou.asp

📁 Asp源码交易频道可对商品的添加、修改、删除
💻 ASP
字号:
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>交流BBS</title>
<link href="d_boai.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
	background-color: #FFFFFF;
}
-->
</style></head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<TABLE cellSpacing=0 cellPadding=0 width=777 align=center bgColor=#ffffff 
border=0>
  <TBODY> 
  <TR>
      <TD><div align="center">
        </div></TD>
  </TR></TBODY></TABLE>
<table width="777" border="0" align="center" cellpadding="5" cellspacing="0" bordercolor="#FFFFFF">
  <tr>
    <td bordercolor="#EBEBEB" bgcolor="9F9F9F"> <font color="#FFFFFF"> 
      <!--#include file="d_lj.asp" -->
      <%
	mingzi=request.Cookies("mingzi")
		if Instr(mingzi,"=")>0 or Instr(mingzi,"'")>0 or Instr(mingzi,"(")>0 or Instr(mingzi,")")>0 then
			response.Redirect("b_bankuai.asp")
		end if
	mima=request.Cookies("mima")
	feihuiyuan="<a href=b_zhuce.asp>注册会员</a> <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""> <font color=#FFFFFF><a href=b_denglu.asp>登陆论坛</a> <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""> <font color=#FFFFFF><a href=b_sousuo.asp>搜索帖子</a>"
	feihuiyuan=feihuiyuan+" <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""> <a href=b_xintie.asp>最新帖子</a>"
	feihuiyuan=feihuiyuan+" <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom"">"
	huiyuan="已登陆 <font color=#FFFFFF>"& server.HTMLEncode(mingzi) &"</font> <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""> <font color=#FFFFFF><a href=b_jianjie.asp>修改简介</a>"
	huiyuan=huiyuan+" <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""> <a href=b_mima.asp>更改密码</a> <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""><font color=#FFFFFF> <a href=b_sousuo.asp>搜索帖子</a> <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""> <a href=b_xintie.asp>最新帖子</a>"
	huiyuan=huiyuan+" <img src=""tupian/fenxian.gif"" width=""7"" height=""15"" align=""absbottom""> <font color=#FFFFFF><a href=c_tuichu.asp>退出论坛</a>"
		set touyz=lj.execute("select mima from huiyuan where mingzi='"& mingzi &"'")
		if mingzi="" or mima="" then
			Response.Write(feihuiyuan)
			call cookies
		elseif touyz.eof then
			Response.Write(feihuiyuan)
			call cookies
		elseif touyz("mima")<>mima then
			Response.Write(feihuiyuan)
			call cookies
		else
			Response.Write(huiyuan)
		end if
			sub cookies
				response.Cookies("mingzi").expires=#2000-1-1#
				response.Cookies("mima").expires=#2000-1-1#
			end sub
%>
      </font></td>
</tr></table>
<%
	set gonggao=lj.execute("select biaoti,xuhao from tiezi where tiezi='gonggao' order by shijian desc")
	if gonggao.bof and gonggao.eof then
	else
	do while not gonggao.eof
%>
<body background="img/1.jpg">
<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="img/UserPhoto.gif" width="16" height="16"></div>
    </td>
    <td bgcolor="EFEFEF" background="img/1XP.jpg"> <a href="b_kantie.asp?tiezi=<%=gonggao("xuhao")%>"><%=server.HTMLEncode(gonggao("biaoti"))%></a></td>
</tr></table>
<%
	gonggao.movenext
	loop
	end if
%>
⌨️ 快捷键说明

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