modifycity.asp
来自「asp的新闻网站」· ASP 代码 · 共 74 行
ASP
74 行
<%Response.Buffer=true%>
<!--
Programmer:jin kai
Update:2000.8.14
CopyRight:东宇电子商务
-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>城市修改</title>
<script language="javascript" src="check.js"></script>
<link rel=stylesheet href="style.css" type=text/css>
<!--#include file="../include/odbc.asp" -->
<!--#include file="../include/killStr.asp" -->
<!--#include file="../include/checkUser.asp" -->
<!--#include file="../include/checkServer.asp" -->
<%
'修改:潘树文
'时间:2001年2月9日
%>
<%
Dim rs
Dim sql
Set rs=server.CreateObject("adodb.RecordSet")
rs.LockType = 2
rs.CursorType = 1
sql="SELECT * FROM weather_city Where cityID='" & Request.QueryString("id") & "'"
rs.Open sql,conn
%>
</head>
<body bgcolor="#C0C0C0">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td><font color="#008080">城市管理->城市修改<br>
</font></td>
</tr>
</table>
<form method="POST" action="modifyCitySave.asp" onsubmit="return check(this);" name="form1">
<INPUT TYPE="hidden" name="id" value=<%=rs("cityID")%>>
<table border="1" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="33%">
<p align="right">修改城市:</td>
<td width="67%" colspan="2">
<input type="text" name="Name" size="10" value=<%=rs("cityName")%> ></td>
</tr>
<tr>
<td width="50%" colspan="2" align="center"><input type="submit" value="确 认" name="B1"></td>
<td width="50%" align="center"><input type="reset" value="重新填写" name="B2"></td>
</tr>
</table>
</form>
</body>
</html>
<%
rs.Close
Set rs = nothing
conn.Close
Set conn = nothing
%>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?