postyqlj.asp

来自「admin/admin.asp是WAP的后台管理登陆页面」· ASP 代码 · 共 27 行

<%
  if session("admin")="" then
  response.redirect "admin.asp"
  else
	if session("flag")>2 then
		response.write "<br><p align=center>您没有操作的权限</p>"
		response.end
	end if
  end if

%>
<!--#include file="conn.asp"-->
<%
        set rs=server.createobject("adodb.recordset")
	sql="select * from link where ID="&request("ID")
	rs.open sql,conn,3,3
        rs("name")=request("name")
        rs("link")=request("link")
        rs("classid")=request("classid")
        rs.update
	 rs.close
	 set rs=nothing
         conn.Close
         set conn=Nothing 
Response.Write "<script>window.alert('修改友链成功！');window.location='adminyqlj.asp';</script>"     
%>