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

📄 edit.asp

📁 网络购物
💻 ASP
字号:
<%'=========================================''         凡人网络购物系统V4.0免费版'    FreeDown.Net info@freedown.net '            www.freedown.net'     版权所有·免费版仅供研究测试只用'            商业使用请购买正版''=========================================%>
<!-- #include file="conn.asp" -->
<%
if session("admin_name")="" then
    response.redirect "login.asp"
end if
%>
<html>
<head>
<link rel="stylesheet" href="../css.css" type="text/css">
</head>

<body bgcolor="#FFFFFF" text="#000000" background="blue.gif" link="#000080">
<%
set rs1=server.createobject("adodb.recordset")
sql1="select * from book where id="&request.querystring("id")
rs1.open sql1,conn,3,3
%>


<div align="center">
  <center>
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="600" bgcolor="#F5EFE7">
    <tr>
      <td align="center"><form name="form1" method="post" action="editsave.asp?id=<%=request.querystring("id")%>">
  <p>修改文章</p>
    <table width="500" border="0" height="10" cellspacing="0" cellpadding="0">
      <tr>
      <td height="2" width="100">标题:</td>
      <td height="2" width="400"> 
          <input type="text" name="title" size="50" value="<%=trim(rs1("title"))%>">
      </td>
    </tr>
  </table>
    <table width="500" border="0" cellspacing="0" cellpadding="0">
      <tr> 
      <td width="100">分类:</td>
        <td width="150">
			<%
	             set rs=server.createobject("adodb.recordset")
				 sql="select * from type"
				 rs.open sql,conn,1,1
				 if rs.eof and rs.bof then
				 response.write "请先添加分类!"
				 response.end
				 else
		    %>
          <select name="type">
            <%
			  do while not rs.eof
	        %>
			<option selected value="<%=trim(rs("typename"))%>"><%=trim(rs("typename"))%></option>
			<% rs.movenext
			loop
			end if
			rs.close
			set rs=nothing
			%>
          </select>
        </td>
      <td width="100">关键字:</td>
      <td width="150">
          <input type="text" name="key1" size="15" value="<%=trim(rs1("key1"))%>">
      </td>
    </tr>
  </table>
    <table width="499" border="0" cellspacing="0" cellpadding="0">
      <tr> 
      <td width="100">来源:</td>
      <td width="150">
          <input type="text" name="from1" size="15" value="<%=trim(rs1("from1"))%>">
      </td>
      <td width="100">作者:</td>
        <td width="149"> 
          <input type="text" name="author" size="15" value="<%=trim(rs1("author"))%>">
      </td>
    </tr>
  </table>
    <table width="499" border="0" cellspacing="0" cellpadding="0">
      <tr> 
        <td width="100">图片地址1:</td>
        <td width="150"> 
          <input type="text" name="img1" size="15" value="<%=trim(rs1("img1"))%>">
        </td>
        <td width="100">图片地址2:</td>
        <td width="149"> 
          <input type="text" name="img2" size="15" value="<%=trim(rs1("img2"))%>">
        </td>
      </tr>
    </table>
    <table width="500" border="0" cellspacing="0" cellpadding="0">
      <tr> 
        <td width="250">内容: </td>
        <td width="250"> 
          <input type="checkbox" name="html" value="on">
          是否支持HTML</td>
      </tr>
    </table>
    <table width="500" border="0" cellspacing="0" cellpadding="0">
      <tr>
      <td height="11"> 
          <textarea name="nr" cols="65" rows="15"><%
                content=replace(rs1("nr"),"<br>",chr(13))
                content=replace(content,"&nbsp;"," ")    
            response.write content%></textarea>
      </td>
    </tr>
  </table>
  <input type="submit" name="yes" value="确定">
  <input type="submit" name="no" value="重写">
</form></td>
    </tr>
  </table>
  </center>
</div>
<%rs1.close
set rs1=nothing
conn.close
set conn=nothing
%>
</body>
</html>

⌨️ 快捷键说明

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