danke erstmal, wie mache ich das bei access ? :) mfg Kai
-----Urspr�ngliche Nachricht----- Von: A-Schubert [mailto:[EMAIL PROTECTED]] Gesendet: Donnerstag, 7. M�rz 2002 13:54 An: ASP Diskussionsliste fuer Anfaenger Betreff: [aspdebeginners] AW: Alle Tabellen und Spalten Tabellennamen:(MS SQL SERVER) ____________________________________________________________________________ ___ <% 'AUslesen der Tabellennamen aus der vorhandenen Datenbank sql = "SELECT Name FROM sysobjects WHERE type = 'U'" set rs_tabellen = objconn.execute(sql) 'Wenn Rekordset leer, dann Fehlermeldung if rs_tabellen.eof then Response.Write("<Div align='Center'><H4><font color='Red'>Es sind keine Tabellen in der Datenbank vorhanden<BR>oder Fehler bei der Datenbankverbindung !!!</font></H4></div>") end if %> SPALTENNAMEN+Inhalt: _______________________________________________________ 'ALLE DATEN AUS DER ANGEGEBENE TABELLE / SOURCE AUSLESEN sql = "SELECT * FROM " & Tabelle set rs_daten = objconn.execute(sql) 'Wenn Rekordset leer, dann Fehlermeldung if rs_daten.eof then Response.Write("<Div align='Center'><H4><font color='Red'>Es sind keine Tabellen in der Datenbank vorhanden<BR>oder Fehler bei der Datenbankverbindung !!!</font></H4></div>") end if %> <table border="1" width="60%"> <tr> <% 'Aufbau der Spaltennamen do until rs_daten.eof %> <td><%Response.Write(rs_daten.fields(x).name)%></td> <% x= x+1 rs_daten.movenext loop %> </tr> <% 'Zeiger im Rekordset wieder auf die erste Position setzen rs_daten.movefirst x=0 do until rs_daten.eof %> <tr <%if x mod 2 = 0 then Response.Write("bgcolor='blue'")end if%>> <td><%Response.Write(rs_daten("ID"))%></td> <td><%Response.Write(rs_daten("Jahr"))%></td> <td><%Response.Write(rs_daten("Preis"))%></td> </tr> <% x= x+1 rs_daten.movenext loop %> </table> -----Ursprungliche Nachricht----- Von: Kai [mailto:[EMAIL PROTECTED]] Gesendet: Donnerstag, 7. Marz 2002 13.28 Uhr An: ASP Diskussionsliste fuer Anfaenger Betreff: [aspdebeginners] Alle Tabellen und Spalten Hi... wie kann ich mir alle Tabellen und Spalten in einer DB anzeigen lassen ? mfg Kai | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ | [aspdebeginners] als [EMAIL PROTECTED] subscribed | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv | Sie knnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ | [aspdebeginners] als [EMAIL PROTECTED] subscribed | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv | Sie knnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ | [aspdebeginners] als [email protected] subscribed | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv | Sie knnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
