<!--#include file="../here99login/0.asp"-->
<!--#include file="../conn/zkconn.asp" -->
<%
dim newTitle,lbid,xlbid
Select case Request("action")
	case "step1"
	
		newTitle =Request.Form("newTitle")
		conn.execute("Insert into lb(lbname)values('"& newTitle &"')")
		Response.write "<script>alert(""添加成功"");window.close();window.opener.location.reload();</script>"
		Response.End
	case "step2"
	
		newTitle =Request.Form("newTitle")
		lbid = Request.Form("lbid")
		conn.execute("Insert into xlb(xlbname,lbid)values('"& newTitle &"',"& lbid &")")
		Response.write "<script>alert(""添加成功"");window.close();window.opener.location.reload();</script>"
		Response.End
	case "step3"
	
		newTitle =Request.Form("newTitle")
		lbid = Request.Form("lbid")
		xlbid = Request.Form("xlbid")
		conn.execute("Insert into slb(slbname,lbid,xlbid)values('"& newTitle &"',"& lbid &","& xlbid &")")
		Response.write "<script>alert(""添加成功"");window.close();window.opener.location.reload();</script>"
		Response.End
end Select
%>
