Openschema?

Hej allihopa.

Jag vill göra en liten asp snutt som skriver ut en tabell.
Alltså det jag hitills har gjort är att jag skriver ut alla tabeller
på en sida.

Tabellerna som skrivs ut kommer att vara länkar som skickar med
en querystring på tabellens namn till en annan sida.

Sidan som tar emot querystringen kommer att skriva ut allt som finns i tabellen.

Säg att vi har en tabell som heter lista och innehåller namn, mail, telefonnr, id osv.

Det jag då vill göra är att jag får följande:

Lista innehåller:

id(räknare)--- namn(text)---mail(pm)---telefonummer(tal)
1----------------tomas---------tmail--------0775256325
2----------------webbb--------wmail-------5656565656

Alltås jag vill skriva ut hella tabellen i kolumner, under varje kolumn kommer det som finns i databasen att listas exakt som ovan.

Jag har hört att det ska gå att göra med något som heter OpenSchema men jag har inte lyckats hitta någon information om hur man ska gå tillväga.
Därför hoppas jag att någon här kan hjälpa mig.

/Tomas

En sökning här på wF med ordet openSchema gav denna fina tråd:
http://www.webforum.nu/showthread.php?s=&threadid=55100&highlight=openSchema

Det är nog lite jobbigt att få ut det i en tabell sådär, men man kan ju skriva ut värderna i alla fall. ;)

Set objRS = objConn.OpenSchema(4)

Do Until objRS.EOF
  If objRS("TABLE_NAME") = Request.QueryString("table") Then
    strSQL = "SELECT " & objRS("COLUMN_NAME") & " FROM " & Request.QueryString("table")
    Set objRS2 = objConn.Execute(strSQL)
    Response.Write(objRS("COLUMN_NAME") & ":<br>")
    If NOT objRS2.EOF Then
      i = 0
      Do Until objRS2.EOF
        If i > 0 Then
          Response.Write("<br>")
        End If
        Response.Write(objRS2(0))
        i = 1
        objRS2.MoveNext
      Loop
      Response.Write("<p>")
    End If
  End If
  objRS.MoveNext
Loop

Set objRS = Nothing : Set objRS2 = Nothing

Hoppas att det inte blev allt för många fel i den där koden. :)

Jag ska prova. Tack för era svar :)