<%@Language="VBScript" CodePage="65001"%>
<% option explicit%>
<% on error resume next %>
<% Session.CodePage="65001" %>
<% response.charset="utf-8" %>
<%
     dim conn,connstr,sql,rs,rs2,rs3
     connstr="dbq=" & server.MapPath("admin_dbt_/data_dbt_87d412ed4fbf9221/@WS3ed$RF5tg^YH7ujIK.mdb") & ";driver={microsoft access driver (*.mdb)};"
     set conn=server.CreateObject("adodb.connection")
     conn.Open connstr
     set rs=server.CreateObject("adodb.recordset")
     set rs2=server.CreateObject("adodb.recordset")
     set rs3=server.CreateObject("adodb.recordset")
	 
	 dim i,j,k,pagenum,temp
%>
<!--#include file="function.asp"-->
<!--#include file="admin_dbt_/function.asp"-->