editx.asp

来自「一个人事管理系统」· ASP 代码 · 共 48 行

ASP
48
字号
<html>
<!--#include file="data.asp"-->
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建网页 1</title>
</head>

<body>
<%
IF Session("key")<>"ok" THEN
	response.redirect "index.asp"
	response.end
END IF
%>
<div align="left" style="width: 545; height: 135">
<%
dim conn
sql="select * from 学会 where id="&request.querystring("id")
Set rs = conn.Execute( sql )
%>
<form method="POST" action="editx1.asp">
<p> <input type="hidden" name="id" size="60" value="<%=rs("id")%>"></p>
  <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#800080" width="520" height="21">
    <tr>
      <td width="88" height="5">姓名:</td>
      <td width="426" height="5">
      
<p><input type="text" name="name" size="60" value="<%=rs("姓名")%>"></p>
      
      </td>
    </tr>
    <tr>
      <td width="88" height="12">任职:</td>
      <td width="426" height="12">
      <input type="text" name="notes" size="60" value="<%=rs("任职")%>"></td>
    </tr>

</table>
<p><input type="submit" value="提交" name="B1"><input type="reset" value="重置" name="B2"></p>
</form>

</div>
</body>

</html>

⌨️ 快捷键说明

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