这是ASP代码。在.net里思路一样的:
 SET  Conn=Server.CreateObject("ADODB.Connection")      Conn.Open  "Driver={Microsoft  Access  Driver  (*.mdb)};DBQ="&  Server.MapPath("库名称")      Set  rstSchema=Conn.OpenSchema(20)            Do  Until  rstSchema.EOF            Response.Write  "Table  name:"&  rstSchema(2)&  "<  br>  "&  "Table  type:"&  rstSchema(3)&  "<  br>  <  br>  "            rstSchema.MoveNext      Loop

解决方案 »

  1.   

    public DataTable GetTables(OleDbConnection conn)
    {
    conn.Open();
    DataTable schemaTable = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables,
    new object[] {null, null, null, "TABLE"});
    conn.Close();
    return schemaTable;
    }
    返回数据库中的表的列表
      

  2.   

    仿照do
    {
    Console.WriteLine("{0}\t\t\t{1}r",sqlReader.GetName(0),sqlReader.GetName(1)); Console.WriteLine();

    while(sqlReader.Read())
    {
    Console.WriteLine("{0}\t{1}",sqlReader.GetString(0).PadRight(30),sqlReader.GetString(1).PadRight(30));
    }
    }while(sqlReader.NextResult());