Ich habe so einen Mischmasch aus Code und HTML schon eine ganze Weile
nicht mehr gesehen.  Das Beispiel hier zeigt sch�n, wie kompliziert das
aussehen kann.  Hier mal als Vorschlag, wie das als Code Pur aussehen
k�nnte:


        Response.write "<A name=""Result"">" & _
                "<TABLE border=""1"" cellpadding=""1""
cellspacing=""3"">" & _
                "<TR>"

        FOR EACH Feld IN Daten.Fields
                Response.write "<TD><B>" & Feld.Name & "</B></TD>"
        NEXT
        Response.write "</TR>"

        on error resume next
        if Daten.EOF then
                if Err.Number<>0 then
                        Response.Write(Err.Description)
                End If
                on error goto 0
        else
                on error goto 0
                DO UNTIL Daten.EOF
                        Response.write "<TR>"
                        FOR EACH Feld IN Daten.Fields
                                Response.write "<TD>" & Feld.Value &
"</TD>"
                        NEXT
                        Response.write "</TR>"
                        Daten.MoveNext
                LOOP
        end if

        Response.write "</TABLE>"



-- 

Viele Gr��e
Hubert Daubmeier 



-----Original Message-----
From: Heiko Richler [mailto:[EMAIL PROTECTED]] 
Sent: Monday, April 01, 2002 1:05 PM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] AW: [aspdebeginners] Spalten�berschriften
ausgeben


Hallo,

Ich habe hier ein Beispiel:
In einem Formular lasse ich einen SQL-String im Feld "SQL" eingeben und
wende diesen dann auf die Datenbank an. Wenn es ein Ergebnis gibt lasse
ich es mit Feldnamen als �berschriften ausgeben. Eventuell hilft das.

        on error resume next
        SET Daten = DB_CONNECTION.Execute(Request.QueryString("SQL"))
        if Err.Number<>0 then
                Response.Write(Err.Description)
                on error goto 0
        else
                on error goto 0

                %><A name="Result"><%
                %><TABLE border=1 cellpadding=1 cellspacing=3><%
                %><TR><%
                FOR EACH Feld IN Daten.Fields
                        %><TD><B><%
                        Response.Write Feld.Name'<-------------!!!!!
                        %></B></TD><%
                NEXT
                %></TR><%

                on error resume next
                if Daten.EOF then
                end if
                if Err.Number<>0 then
                        Response.Write(Err.Description)
                        on error goto 0
                else
                        on error goto 0
                        DO UNTIL Daten.EOF
                                %><TR><%
                                FOR EACH Feld IN Daten.Fields
                                        %><TD><%
                                        Response.Write Feld.Value
                                        %></TD><%
                                NEXT
                                %></TR><%
                                Daten.MoveNext
                        LOOP
                end if

                %></TABLE><%

                Set Daten = Nothing
                DB_CONNECTION.Close
        end if



Gru�

Heiko Richler

Systemingenieur
Georg-Simon-Ohm-Fachhochschule N�rnberg
Fachbereich Informatik
http://web1.informatik.fh-nuernberg.de/heiko.richler/

> -----Urspr�ngliche Nachricht-----
> Von: Gerald Baeck [mailto:[EMAIL PROTECTED]]
> Gesendet: Montag, 1. April 2002 08:50
> An: ASP Diskussionsliste fuer Anfaenger
> Betreff: [aspdebeginners] Spalten�berschriften ausgeben
> 
> 
> wie kann via sql und asp herausfinden welche spalten eine tabelle hat?
> 
> lG
> Gerald


| 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

Antwort per Email an