nicht angemeldet
Hi Christian
also es kommt trotzdem darauf an, was und wo Du das Ding brauchst.
Ich nehm mal an vor dem Abschicken an ein script, das dann alles in eine db pinselt.
Ich übermittle es direkt an eine DB!
dann kannst das ja auch mit request.form("PLZ") & request.form("Ort") & request.form("Straße") zusammenbasteln.
Habs nur mal mit dem Ort:
<input type="hidden" name="vorhanden" value="<%=request.form("Ort")%>">
probiert geht aber leider nicht!
Von Frontpage wurde mir dazu noch folgendes script erstellt!
<%
' FP_ASP ASP, die von einer FrontPage-Komponente automatisch generiert wurde. Nicht Editieren.
On Error Resume Next
strErrorUrl = ""
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
If Request.Form("VTI-GROUP") = "0" Then
Err.Clear
Set fp_conn = Server.CreateObject("ADODB.Connection")
FP_DumpError strErrorUrl, "Kann Verbindung nicht herstellen"
Set fp_rs = Server.CreateObject("ADODB.Recordset")
FP_DumpError strErrorUrl, "Kann Datensatzgruppe nicht erstellen"
fp_conn.Open Application("Eintragung_ConnectionString")
FP_DumpError strErrorUrl, "Kann Datenbank nicht öffnen"
fp_rs.Open "T_Eintragung", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable
FP_DumpError strErrorUrl, "Kann Datensatzgruppe nicht öffnen"
fp_rs.AddNew
FP_DumpError strErrorUrl, "Kann keine neue Datensatzgruppe zu Datenbank hinzufügen"
Dim arFormFields0(32)
Dim arFormDBFields0(32)
arFormFields0(0) = "a"
arFormDBFields0(0) = "a"
arFormFields0(1) = "b"
arFormDBFields0(1) = "b"
arFormFields0(2) = "c"
arFormDBFields0(2) = "c"
arFormFields0(3) = "d"
arFormDBFields0(3) = "d"
arFormFields0(4) = "e"
arFormDBFields0(4) = "e"
arFormFields0(5) = "f"
arFormDBFields0(5) = "f"
arFormFields0(6) = "g"
arFormDBFields0(6) = "g"
arFormFields0(7) = "h"
arFormDBFields0(7) = "h"
arFormFields0(8) = "i"
arFormDBFields0(8) = "i"
arFormFields0(9) = "Adresse"
arFormDBFields0(9) = "Adresse"
arFormFields0(10) = "j"
arFormDBFields0(10) = "j"
arFormFields0(11) = "k"
arFormDBFields0(11) = "k"
arFormFields0(12) = "l"
arFormDBFields0(12) = "l"
arFormFields0(13) = "Tel"
arFormDBFields0(13) = "Tel"
arFormFields0(14) = "PLZ"
arFormDBFields0(14) = "PLZ"
arFormFields0(15) = "k"
arFormDBFields0(15) = "k"
arFormFields0(16) = "Bundesland"
arFormDBFields0(16) = "Bundesland"
arFormFields0(17) = "m"
arFormDBFields0(17) = "m"
arFormFields0(18) = "Bezirk"
arFormDBFields0(18) = "Bezirk"
arFormFields0(19) = "n"
arFormDBFields0(19) = "n"
arFormFields0(20) = "Probe"
arFormDBFields0(20) = "probe"
arFormFields0(21) = "o"
arFormDBFields0(21) = "o"
arFormFields0(22) = "Ort"
arFormDBFields0(22) = "Ort"
arFormFields0(23) = "p"
arFormDBFields0(23) = "p"
arFormFields0(24) = "q"
arFormDBFields0(24) = "q"
arFormFields0(25) = "r"
arFormDBFields0(25) = "r"
arFormFields0(26) = "s"
arFormDBFields0(26) = "s"
arFormFields0(27) = "t"
arFormDBFields0(27) = "t"
arFormFields0(28) = "vorhanden"
arFormDBFields0(28) = "vorhanden"
arFormFields0(29) = "u"
arFormDBFields0(29) = "u"
arFormFields0(30) = "v"
arFormDBFields0(30) = "v"
arFormFields0(31) = "w"
arFormDBFields0(31) = "w"
FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0
FP_SaveFieldToDB fp_rs, Now, "Zeit"
fp_rs.Update
FP_DumpError strErrorUrl, "Kann Datenbank nicht aktualisieren"
fp_rs.Close
fp_conn.Close
FP_FormConfirmation "text/html; charset=windows-1252",_
"Formularbestätigung",_
"Vielen Dank für das Einsenden der folgenden Informationen:",_
"DB-Eintragung.asp",_
"Zurück zum Formular"
End If
End If
%>
Vl muß ich ein anderes Feld einfügen damit es geht!
Danke
Ciao
Markus