<%
	db1="/shujuku/chajianshujuku/jianhu/#yxxe.mdb"
	Set liao = Server.CreateObject("ADODB.Connection")
	liao.CommandTimeOut = 1200
	connstr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(db1)
    liao.mode = 3
    liao.Open connstr

	if gb=1 then
	call head
	call saycardd("江湖已关闭")
	response.Write"江湖已关闭"
	call head1
	response.end 
	end if%>
<!--#INCLUDE file="shezhi1.asp"-->