<%
set rs = server.createobject("adodb.recordset")
sql="select * from book_management,viplist"
rs.open sql,dbok,1,1
	html1 = rs("asp_html")
	language = rs("language")
	vipnewslist = rs("vipzhnewslist")
	vipproductslist = rs("vipzhproductslist")
set rs=nothing
if admin_qx = 2 then
	response.write "<div class=""admin_qx"">对不起,您没有权限操作!</div>"
	response.end
end if
%>