<%
'=========================================================
'　　　　　　　　　　　敬　剌　利　大
' Copyright (C) 2003-2005 feiyang.Com. All Rights Reserved.
' Web: http://www.feiyang.com
' QQ: 99686532        E-mail: bgh_edu@126.com
'=========================================================
%>
<%
dim conn   
dim connstr
on error resume next
connstr="DBQ="+server.mappath("QQCF_Data/bgh1234567.asa")+";DefaultDir=;PWD=1234;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr

Set RsSet=Server.CreateObject("ADODB.Recordset")
Sql="Select * From WWW_QQCF_COM_Admin"
RsSet.Open Sql,conn,1,1 
%>