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
