数据库 连接 集

   Set conn = Server.CreateObject("ADODB.Connection")

    connstr="Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=true;Jet  OLEDB:Database Password="&zz&";Data Source="& Server.MapPath(Data)

    conn.Open connstr

    set rs=server.createobject("adodb.recordset")

    rs.open sql,conn,0,1

    idCount=rs("idCount")