lotterydel.asp

宁波娱乐在线城市,丰富的内容版块

<!--#include file="lotteryconn.asp"-->
<%
if UCase(Request.Cookies("NC")) <> UCase(Application("NC")) then
        Response.Write("对不起，您不是管理员！")
        Response.End
end if


lotteryid=trim(request("lotteryid"))
if lotteryid="" then
   response.end
end if
 
set rs=server.createobject("adodb.recordset")
strsql="delete * from lottery where lotteryid=" & clng(lotteryid)
Set rs=ltconn.Execute(strsql)

strsql="delete * from users where lotteryid='" & lotteryid &"'"
Set rs=ltconn.Execute(strsql)

ltconn.close
Set rs=nothing
Set ltconn=nothing
%>
<script language="vbscript">
msgbox"彩票数据已删除！",0,"flush"
window.self.location.replace("lotterymanage.asp")
</script>