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

📄 edit.asp

📁 更新内容: 1 增加了搜索功能 2 提供了帮助页面 修改若干小问题 管理名称 admin 初始密码:admin-update : added a search function to help pro
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="inc/char.asp"-->
<!--#include file="inc/email.asp"-->
<!--#include file="inc/const1.asp"-->
<!--#include file="inc/const2.asp"-->
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''
'          Jimmy中文站留言簿 Version 1.06	     '
'		 http://WWW.LUNJI.COM		     '
'	         Powered by BlueSailor	             '
'	 QQ:428140   E-MAIL: bluesailor@etang.com    '
''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<%
  dim id
    id=request("id")
    set rs=server.createobject("adodb.recordset")
    sql="select * from [guest] where id="&id
rs.open sql,conn,1,3
if rs("sessionid")=session.sessionid then
%>
<script language="JavaScript">
function Do_submit()
{
lunji_lyedit.action = "update_edit.asp";
lunji_lyedit.submit();
return true;
}
</script>
<html>
<head>
<title>编辑留言</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="css.asp"-->
<script language=javascript>
ie4=(document.all)?true:false;
ns4=(document.layers)?true:false;

function toExit(){
var args=toExit.arguments;
var visible=args[0];
if(ns4){
		theObj=eval("document.layers[\'"+args[1]+"\']");
		if(theObj)theObj.visibility=visible;
		}
else if(ie4){
		if(visible=='show')visible='visible';
		if(visible=='hide')visible='hidden';
		theObj=eval("document.all[\'"+args[1]+"\']");
		if(theObj)theObj.style.visibility=visible;
		}

}     

</script>
</head>

<body topmargin="1" bgcolor="<%=bodybgcolor%>" alink=<%=alink%> vlink=<%=vlink%> link=<%=link%>  onkeydown="if(event.keyCode==13 && event.ctrlKey)document.forms[0].submit()" ><div id=layer-1 
style="HEIGHT: 149px; LEFT: 156px; POSITION: absolute; TOP: 7px; VISIBILITY: hidden; WIDTH: 589px; Z-INDEX: 1"  onkeydown="if(event.keyCode==13 && event.ctrlKey)document.forms[0].submit()">
<table  border=0 cellpadding=0 cellspacing=0 height=133 width=520>
  <tbody><tr> <td height=65 width="100%"> <table border=0 cellpadding=0 cellspacing=0 height=80 width="99%"><tbody>
              <tr> 
                <td height=57> <font color=#ffffff>
                  <iframe border="0" frameborder="0" framespacing="0" maginwidth="0" maginheigh="0" width="520" height="150" scrolling="yes" src="heads.asp"  valign="top"></iframe>
                  </font></td></tr>
              <tr align="center"> 
                <td height=23 width="100%" bgcolor="#CCCCCC"><a 
            href="javascript:toExit('hide','layer-1')">关闭此窗口</a></td>
              </tr>
            </tbody>
          </table></td>
                      </tr>
                      </tbody> 
                    </table>
                  </div>
<!--#include file="top.asp"-->
<form action=update_edit.asp method=post name="lunji_lyedit">
  <table cellpadding=0 cellspacing=0 border=0 width=650 bgcolor="<%=bordercolor%>" align=center>
    <tr> 
      <td> 
        <table cellpadding=3 cellspacing=1 border=0 width=100%>
          <tr valign="middle" bgcolor=#CBD8FE> 
            <td height=22 colspan="2" align=center bgcolor="<%=add_leftbg%>"><b><font color="<%=add_fontcolor%>">编辑留言(有</font><font color="#FF0000">*</font><font color="<%=add_fontcolor%>">号的必填)</font></b></td>
          </tr>
          <tr bgcolor=#CBD8FE> 
            <td width="30%" height="22" align="center" bgcolor="<%=add_leftbg%>"> <div align="right"><font color="<%=add_fontcolor%>"><b>你的姓名:&nbsp;</b></font></div></td>
            <td width="70%" height="22" bgcolor="<%=add_rightbg%>"> &nbsp;  
<% if rs("guestname")=admin_name then%>
<input type="text" name="guestname" maxlength="10" size="19" value="<%=admin_id%>" readonly="true"> 
<%else%> 
<input type="text" name="guestname" maxlength="10" size="19" value="<%=rs("guestname")%>"> 
<%end if%> 
       
              <font color="#FF0000">*</font> </td>       
          </tr>      
          <tr bgcolor=#CBD8FE>       
            <td width="30%" height="22" align="center" bgcolor="<%=add_leftbg%>"> <div align="right"><font color="<%=add_fontcolor%>"><b>来自哪里:&nbsp;</b></font></div></td>      
            <td width="70%" height="22" bgcolor="<%=add_rightbg%>">&nbsp; <input type="text" name="from" maxlength="10" size="19" value="<%=rs("from")%>">        
            </td>       
          </tr>       
          <tr bgcolor=#CBD8FE>        
            <td width="30%" height="22" align="center" bgcolor="<%=add_leftbg%>"> <div align="right"><font color="<%=add_fontcolor%>"><b>主页地址:&nbsp;</b></font></div></td>      
            <td width="70%" height="22" bgcolor="<%=add_rightbg%>"> &nbsp; <input type="text" name="homepage" value="<%=rs("homepage")%>" size="19">        
            </td>       
          </tr>       
          <tr bgcolor=#CBD8FE>        
            <td width="30%" height="22" align="center" bgcolor="<%=add_leftbg%>"> <div align="right"><font color="<%=add_fontcolor%>"><b>Email地址:&nbsp;</b></font></div></td>      
            <td width="70%" height="22" bgcolor="<%=add_rightbg%>"> &nbsp; <input type="text" name="email" value="<%=rs("email")%>" size="19">        
            </td>       
          </tr>       
          <tr bgcolor=#CBD8FE>        
            <td width="30%" height="22" align="center" bgcolor="<%=add_leftbg%>"> <div align="right"><font color="<%=add_fontcolor%>"><b>OQ号码:&nbsp;</b></font></div></td>     
            <td width="70%" height="22" bgcolor="<%=add_rightbg%>"> &nbsp; <input type="text" name="oicq" maxlength="10" value="<%=rs("oicq")%>" size="19" onmouseover=this.focus() onkeyup="this.value=this.value.replace(/\D/g,'')" onafterpaste="this.value=this.value.replace(/\D/g,'')">      
            </td>      
          </tr>      
          <tr bgcolor=#CBD8FE>       
            <td width="30%" height="39" align="center" bgcolor="<%=add_leftbg%>"> <div align="right"><font color="<%=add_fontcolor%>"><b>选择头像:&nbsp;</b></font></div></td>     
            <td width="70%" height="39" bgcolor="<%=add_rightbg%>"> &nbsp; <select name=face size=1>        
                <option value="">==请重新选择头像==</option>
                <% for i=1 to 30 %>      
                <option value="<%=i%>">Image<%=i%></option>
                <%next%>
                             </select>  <font color="#FF0000">*</font><a href="javascript:toExit('show','layer-1')">显示所有头像</a>       
            </td>      
          </tr>      
<%      
if len(secret)=1 then      
%>      
              <tr>      
                <td width="220" align="center" height="20" bgcolor="<%=add_leftbg%>">       
                  <p align="right"><font color="<%=add_fontcolor%>"><b>悄悄话:&nbsp; &nbsp;</b></font></td>       
                <td width="433" height="20" bgcolor="<%=add_rightbg%>"> &nbsp;   <select size="1" name="secretly">        
      <option selected value="">否</option>
      <option value="1">是</option>
     </select></td>
              </tr>
<%end if%>
          <tr bgcolor=#CBD8FE> 
            <td width="30%" height="22" align="center" valign="middle" bgcolor="<%=add_leftbg%>"> <div align="right"><font color="<%=add_fontcolor%>"><b>留言内容:&nbsp;</b></font></div></td>
            <td width="70%" height="22" bgcolor="<%=add_rightbg%>"> &nbsp; <textarea name="guestcontent" cols="49" rows="7" wrap="VIRTUAL"><%=rs("guestcontent")%></textarea>         
              <font color="#FF0000">*</font> </td>       
          </tr>      
          <tr bgcolor=<%=infobg%>>       
            <td align=center height=25 colspan="4" > <input type="hidden" name="id" size="15" value="<%=rs("id")%>">      
              <input type="submit" name="update" value="提交" onclick="javascript:this.disabled=true;return Do_submit()">(Ctrl+Enter提交)</td>     
          </tr>     
        </table>     
      </td>     
    </tr>     
  </table>     
</form>     
<br>     
<hr noshade width="650" color="#C0C0C0" size="1">                    
<!--#include file="bottom.asp"-->     
</body>     
</html>     
<%     
else     
 Response.Write "你无权编辑此留言。"     
end if
%>

⌨️ 快捷键说明

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