admin_modify_city.asp

来自「一个非常好的旅游网站程序.」· ASP 代码 · 共 32 行

<!--#include file="conn.asp"-->
<%
  if session("admin")="" then
  response.redirect "admin_login.asp"
  else
	if session("flag")>1 then
		response.write "<br><p align=center>您没有操作的权限</p>"
		response.end
	end if
  end if
  %>
<%
set rs=server.createobject("adodb.recordset") 
sql="select * from city where c_id="&request("ID")
rs.open sql,conn,1,3
%>
<FORM METHOD=POST ACTION="modify_city_save.asp?id=<%=request("id")%>">
<input type="text" name="city" value="<%=rs("city")%>">
<select name="a_id" id="a_id">
      <% set rs=server.createobject("adodb.recordset")
	  sql="select * from area"
				           rs.open sql,conn,1,1%>
      <%if rs.eof and rs.bof then%>
      <%else
						   while not rs.eof%>
      <option value="<%=rs("a_id")%>"><%=rs("area")%></option>
      <%rs.movenext
   wend
   end if%>
    </select>
<input type="submit" name="Submit" value="提交">
</FORM>