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

📄 new_info_edit3.asp

📁 后台路径:admin/login.asp 用户名:manage 密码:fansyou
💻 ASP
字号:
<!-- #include file="head.asp" -->
<!-- #include file="session.asp" -->
<TABLE width=760 border=0 align=center cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF" class=bk>
  <TBODY>
    <TR> 
      <TD colspan="2" align=middle vAlign=top>
	    
			  <!-- #include file="diao2.asp" --><br>
 
			  </TD>
            </TR>
            
        <TR> 
      <TD colspan="2" align=middle vAlign=top>
       <!-- #include file="lwconn.asp" -->
	    <%if request.querystring("save")="true" then
	    old1=request.querystring("old1")
 old2=request.querystring("old2")
 table=old1&old2
			 
 set rs2=server.createobject("adodb.recordset") 
   sql ="select * from "&table&" where id= "&trim(request.querystring("id")) 
    
rs2.open sql,conn,1,3






if rs2.eof or rs2.bof then 
response.Write("<br><div align=center>数据库 无该记录!</div>")
else

 if   rs2("userid")<>request.Cookies("user_name") then  
%>
<script language=javascript>
     history.back()
     alert("你无权修改该记录!")
</script>
<%
Response.End  
end if 



  'begin
 rs2("date1")= trim(request.form("date1")) 
   rs2("date2")=trim(request.form("date2")) 
   if request("old1") ="snew_" then  
    
  
    rs2("price")=trim(request.form("price")) 
      
 else
   
 
  end if 
  
  rs2("s_address")=trim(request.form("s_address"))
  rs2("tel") =trim(request.form("tel"))
  content=request.Form("content")
'***********Process the content of news :begin******************
content=replace(content," ","&nbsp;")
 
content=replace(Content,chr(13)&chr(10),"<BR>")
  
   rs2("content")=content
   rs2.update
  'end
  
  end if
  
response.write "<center><h3>信息修改成功</h3></center>"	    
	    
	    %>
	    
	    
	    
	    <%else%>
			<% old1=request("old1")
			     old2=request("old2")
				 
				 
				 
				   %>

			  <% table=old1&old2
			 
			   set rs=server.createobject("adodb.recordset") 
   sql ="select * from "&table&" where id= "&trim(request.querystring("id")) 
  
rs.open sql,conn,1,1
if rs.eof or rs.bof then 
response.Write("<br><div align=center>数据库中暂无任何记录!</div>")
else

 if   rs("userid")<>request.Cookies("user_name") then  
%>
<script language=javascript>
     history.back()
     alert("你无权修改该记录!")
</script>
<%
Response.End  
end if 

%>
<form action="?save=true&id=<%=request.querystring("id")%>&old1=<%=old1%>&old2=<%=old2%>"" method="post">
			  <TABLE style="BORDER-COLLAPSE: collapse" 
                        borderColor=#dedede cellSpacing=0 cellPadding=4 
                        width="540" align=center border=1 bgColor=white>
               <TR   vAlign=bottom  bgColor=#99ccff>
                    
                    <TD colspan=2 align=center>  信息修改 </TD>
                      </TR>
                      <TABLE width="540"  height="53" border="1" align="center" cellpadding="4" cellspacing="1" bordercolor="#111111" bordercolorlight="#E0E0C2" bordercolordark="#E0E0C2" style="border-collapse: collapse">
  <%if request.QueryString("old1") ="snew_" then %>
  <tr>
    <td>开盘日期:</td>
    <td width="32%"><input type="text" name="date1" value="<%=rs("date1")%>">       <br>
    </td>
    <td width="17%">交房日期: </td>
    <td width="33%"><input type="text" name="date2" value="<%=rs("date2")%>">  <br>
    </td>
  </tr>
  <%else%>
  <tr>
    <td>预计开盘价:</td>
    <td width="32%"><input type="text" name="date1" value="<%=rs("date1")%>">  <br>
    </td>
    <td width="17%">预计开盘时间: </td>
    <td width="33%"><input type="text" name="date2" value="<%=rs("date2")%>"> <br>
    </td>
  </tr>
  <%end if%>
  <%if request.QueryString("old1") ="snew_" then %>
  <tr>
    <td>售价:   </td>
    <td colspan="3"><input type="text" name="price" value="<%=rs("price")%>"> 元/平方米 </td>
  </tr>
  <% end if%>
  <tr>
    <td>售楼地址: </td>
    <td> <input type="text" name="s_address" value="<%=rs("s_address")%>"></td>
    <td> 售楼电话: </td>
    <td> <input type="text" name="tel" value="<%=rs("tel")%>"></td>
  </tr>
  <tr>
    <td> 备 注 </td>
    <td colspan=3>  <%content=rs("content")
	  content=replace(content,"&nbsp;"," ")
 
content=replace(Content,"<BR>",chr(13)&chr(10))
	  %><textarea name="content" cols="55" rows="16" wrap="VIRTUAL" id="content"><%=content%></textarea> </td>
    
  </tr>
             
                  
                  
 
                      
                      <TR  valign="top"   ><TD    width=100   bgColor=white><div align="center" >         </div></TD><TD colspan=2> 
                      
                    <div align="center">
      <input type="submit" name="Submit" value="保存修改">
      &nbsp;&nbsp;&nbsp;&nbsp;
      <input type="reset" name="Submit2" value="复 位">
    </div>
                      
                      
                      </TD></TR>
                      
                      
 </table></form>
			 
<%   
	  end if
rs.close
set rs=nothing

			  
			
			  
			end if  
			 conn.close
			  set conn=nothing %>
			 <p><br></p> </TD>
            </TR>     
            
          </TBODY>
        </TABLE>

         
        
      
       <!-- #include file="footer.asp" -->

⌨️ 快捷键说明

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