> Wie kann ich mit SQL die Tabellennamen aus meiner DB auslesen und die
>Spaltenbezeichnungen?
>
> Danke
Tabellen:
...
Set scSchema = objConnection.OpenSchema(20)
Do While Not scSchema.Eof
%>
<A
Href="DBView.asp?t=<%=Server.URLEncode(scSchema("TABLE_N
AME"))%>"><%=scSchema("TABLE_NAME")%></A><BR>
<%
scSchema.MoveNext
Loop
...
Spalten mit Ausgabe:
...
SQL = "Select * From " & strTableName
Response.Write(SQL & "<BR>" & vbCrLf &
Request.QueryString("t") & "<BR>" & vbCrLf)
LiesDatenbank SQL, RSViewTable ' rsViewTable .open SQL,
1, 3
%>
<A HREF="AddData.asp?TableName=<%=TableName%>">Add a
row of data to this table</A><BR>
<TABLE Border="1">
<TR>
<% 'Set up the table headings%>
<% For Each columnname in RSViewTable.Fields %>
<TD>
<%= columnname.name %>
</TD>
<% Next %>
</TR>
<%' Write out the data %>
<% Do While Not RSViewTable.EOF%>
<TR>
<% For Each columnname in RSViewTable.Fields%>
<TD>
<%= Trim(RSViewTable(columnname.name))%>
</TD>
<% Next %>
</TR>
<% RSViewTable.MoveNext
Loop%>
</Table>
<BR>
<%
SET RSViewTable=nothing
SchliesseDatenbank
...
Gru�,
Andreas Roth,
http://www.drhirn.com/4
| 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
