typeedit.asp

来自「教育管理系统」· ASP 代码 · 共 76 行

ASP
76
字号
<!--#include file="security.asp"-->
<!--#include file="articleconn.asp"-->
<%
dim typeids,typename,no
typeids = Request.QueryString("typeids")
typename = Request.QueryString("typename")
no =  Request.QueryString("no")
set rs=server.createobject("adodb.recordset")
if no<>"1" then
%>
<link rel="stylesheet" type="text/css" href="css/style.css">
<body bgcolor="#666666">
<p>&nbsp;</p>
<center>
  <form name="form1" method="post" action="typeedit.asp?typeid=<%=Request.QueryString("typeid")%>&typeids=<%=typeids%>&typename=<%=typename%>&no=1">
    <table border="0" cellspacing="0" width="600" cellpadding="0">
      <tr bgcolor="#333333"> 
        <td width="100%" height="20"> 
          <p align="center"><b><font
      color="#FFFFFF">子 类 修 改</font></b> 
        </td>
    </tr>
  </table>
   
  <table width="600" border="1" cellspacing="0" cellpadding="0" bordercolor="#000000">
    <tr>
      <td bordercolor="#FFFFFF">
          <table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr><%
sql="select * from type where typeid="&request("typeid")
rs.open sql,conn,1,1
                %>
              <td width="150">  
                <div align="right">子类名称:</div>
              </td>
              <td> 
                <input type="text" name="types" class="smallinput" size="30" maxlength="50" value="<%=rs("type")%>">
              </td>
            </tr>
            <tr>
              <td width="150">&nbsp;</td>
              <td>
                <input type="submit" name="Submit" value=" 修  改 " class="buttonface">
                <input type="reset" name="Submit2" value=" 反  回 " class="buttonface" onClick="history.go(-1)">
              </td>
            </tr>
          </table>
      </td>
    </tr>
  </table>
    </form>
</center>
<%else%>
<!--#include file="inc/articlechar.inc"-->
<%
if request.form("types")="" then 
response.write "错误提示:请输入名称!"
response.end
end if

dim typeid
types=htmlencode2(request.form("types"))
typeid=Request.QueryString("typeid")
sql="select * from type where typeid="&typeid
rs.open sql,conn,3,3
rs("type")=types
rs.update
rs.close

response.redirect "typeadd.asp?typeid="&typeids&"&typename="&typename
end if
rs.close 
set rs=nothing 
conn.close  
set conn=nothing
%>

⌨️ 快捷键说明

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