dellping.asp

这个东东叫<掌中无限>的WAP整站程序,但是用不鸟的.. 如果你们可以.改良 ..改良...弄好它..就好啦!

<%
  if session("admin")="" then
  response.redirect "admin.asp"
  else
	if session("flag")>1 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="update article set Nkey=Nkey-1 where articleID="&request("articleid")
sql2="Delete * from sheet where id="&request("id")
conn.execute(sql)
conn.execute(sql2)
response.redirect "adminping.asp"
%>