response.Write "alert('网络超时或您还没有登陆！');window.location.href='login.asp';"
response.End
else
if session("flag")>1 then
response.Write "您没有此项目管理权限！"
response.End
end if
end if
dim shengid
shengid=request("shengid")
if shengid"" then
if not isnumeric(shengid) then
response.write"alert(""非法访问!"");location.href=""../index.asp"";"
response.end
end if
end if
conn.execute("delete from BJX_Shi where shengid=" &shengid)
conn.execute("delete from BJX_Sheng where id=" &shengid)
conn.close
set conn=nothing
response.write "alert('您选择的省已经被删除！');window.location.href='shengmanage.asp';"
response.end
%>
