Frank: Namen eines Formularfeldes auslesen

Beitrag lesen

Hallo!

Ich komme einfach nicht drauf. Bei der Auswertung eines Formulars möchte ich gerne den Namen des Formularfeldes auslesen, da ich über eine Schleife dann die Werte in die Datenbank schreiben möchte. In einem Beispiel wurde dies angegeben
.................
Gruß,
Daniel

=====================================================================

Moin,

naja, Request.Form entweder mit ("-name-") oder (x) - Nummer

Die Schleife ist schon ok... wenn du die Daten aber in eine DB-Tabelle basteln willst wo Formularfeldname = DB-Spaltenname dann mußt du 2 Arrays anlegen, eins für die Spaltennamen und eins für die Werte

das ganze sieht / sähe dann so aus:

<%
Dim conn,odbc,x
ReDim myFeld(10),myFeld2(10)
x = 0

FOR EACH entry in Request.Form
myFeld(x) = CStr(entry)
myFeld2(x) = Request.Form(entry)
x = x + 1
NEXT

ReDim Preserve myFeld(6)
ReDim Preserve myFeld2(6)

myString = Join(myFeld,",")
myString2 = "'" & (Join(myFeld2,"','")) & "'"
%>

<%=myString%><br>
<%=myString2%><br>

<%
odbc = "filedsn=C:\inetpub\wwwroot\sgs\int\internet2.dsn"
Set rs = Server.CreateObject("ADODB.Connection")
rs.open odbc

query = "INSERT INTO " & table & " (" & myString & ") VALUES (" & myString2 & ")"
set result = rs.execute(query)

rs.close
set result = nothing
set rs = nothing
%>

Viel Spaß beim Ausprobieren...

Frank