⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 move.asp

📁 购物系统(本版为正式商业版
💻 ASP
字号:
<%response.buffer=true%>
<!--#include file="../fuction.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="../webconfig.asp"-->
<html>
<head>
<title><%=bbsname%>-论坛中心</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="SHORTCUT ICON" href="/shortcut.ico">
<meta name="generator" content="snsn-shop">
<meta name=keywords content="<%=webgjz%>">
<meta name="description" content="<%=webmx%>">
<meta name="MSSmartTagsPreventParsing" content="TRUE">
<meta http-equiv="MSThemeCompatible" content="Yes">
<link href="/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="../webtop.asp"-->

<table width="940" align="center" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="6" colspan="3"></td>
  </tr>
  <tr>
    <td width="17"><img src="/img/index_1.gif" width="15" height="16"></td>
    <td valign="bottom">您现在的位置是:<a href="<%=weburl%>"><%=webname%></a> -> <span class="table-shangxia"><span class="b14"><a href=index.asp><%=bbsname%></a> → <a href=list.asp?bid=<%=bid%>><%=bidname%></a>→ 移动帖子 </span></span></td>
    <td valign="bottom"></td>
  </tr>
  <tr>
    <td height="6" colspan="3"></td>
  </tr>
</table>
<!--#include file="top.asp"-->

<%  
id=int(request.querystring("id"))
bid=int(request.querystring("bid"))
username=session("username")
password=session("userpassword")
manbid=int(session("manbid") )
if username="" or password="" then
response.redirect"login.asp"
end if
if manbid=bid or manbid=20000 then
session("manbid")=ture
sql="select * from board where bid="&bid&""
Set Rs=Conn.Execute(sql)
bidname=rs("bidname")
rs.close
if id="" or  not isnumeric(id) then
response.write"<script language='javascript'>alert('错误的请求!')</script>"
response.write "<script language='javascript'>history.back(-1)</script>"
response.end 
end if  
set editreco=server.createobject("adodb.recordset")
sqlstr="select * from book where id=" &id
editreco.open sqlstr,conn,1,1
else
response.write"<script language='javascript'>alert('你没权限!')</script>"
response.write "<script language='javascript'>history.back(-1)</script>"
response.end 
end if 

%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td>
      <table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td valign="top">
            <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td height="8"></td>
              </tr>
            </table>
            <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td height="8"></td>
              </tr>
            </table>
            <p>&nbsp;</p>
            <table width="90%" height="113" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="73D1E9">
              <form method="post" action="save_move.asp?id=<%=editreco("id")%>"  name="esung">
                <tr bgcolor="#C0E9F5">
                  <TD width="35%" height=28 align="left">&nbsp;<B>帖子主题:</B></TD>
                  <TD width="102%" height="28"><b><%=editreco("title")%></b> </TD>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <input type="hidden" name="url" value="<%=request.serverVariables("Http_REFERER")%> ">
                  <TD width="35%" height=48 align="left">
                    <P                                                              
      style="LINE-HEIGHT: 150%; MARGIN-LEFT: 5px; MARGIN-TOP: 5px"><b>论坛列表:</b></P></TD>
                  <TD width="102%" height="48">
                    <select  name="bid" size="1">
                      <%                                  
    set rs1=server.createobject("adodb.recordset")                                  
    sqlstr="select * from board order by px"                                  
    rs1.open sqlstr,conn,1,1        
    do while not rs1.eof                                  
    %>
                      <option value='<%=rs1("bid")%>'><%=rs1("bidname")%></option>
                      <%rs1.movenext                                            
loop                           
   rs1.Close                       
set rs1=nothing %>
                    </select>
                  </TD>
                </tr>
                <tr bgcolor="#FFFFFF">
                  <TD width="137%" height=31 align="left" vAlign=top colspan="2">
                    <p align="center"> <span lang=zh-cn> <BR>
&nbsp;&nbsp;
          <input name="send" type="submit" class="go-wenbenkuang" value="移 动" >
&nbsp;
          <input name="return" type="button" class="go-wenbenkuang" onclick="javascript:history.go(-1)" value="返 回" >
                  </span> </TD>
                </tr>
              </form>
            </table>
            <p>&nbsp;</p></td>
        </tr>
    </table></td>
  </tr>
</table>   
<!--#include file="../copyright.asp"-->             
</html>                                                                                                         

⌨️ 快捷键说明

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