<%
	const iTotalConnections = 1
	const cPerPage = 10
	const bEncodeHTML = False
	const lMaxShowLen = 0
   Const bConvertNull = False
   Const bConvertNumericNull = False
   Const bConvertDateNull = False
	redim arrDbs(iTotalConnections)
	redim arrDesc(iTotalConnections)
	redim arrConn(iTotalConnections)
	arrDBs(0) = "teadmin.mdb"
	arrDBs(1) = "../bbs/xh/cooljokessjk2.mdb"	'改为你的数据库路径
	arrDesc(0) = "用户管理"
	arrDesc(1) = "进入数据库编辑"
	for iConnection = 0 to iTotalConnections
		arrConn(iConnection) = "Provider=Microsoft.Jet.OLEDB.4.0;" &_
	     "Persist Security Info=False;" &_
	     "Data Source=" & Server.MapPath(arrDBs(iConnection))
	next
	
%>
<!--#include file="te_includes.asp"-->