hallo Wolfgang,
> So wie ich das sehe, hast Du am ende noch eine Abfrage die Dir sagt wenn
> komplett false ist, dann soll er es nicht senden.
genau; und zwar:
If komplett=false Then
Response.Write("<span style=font-size:14px;color:#003366;>Bitte f�llen
Sie alle Felder, die mit einem * gekennzeichnet sind, aus!</span><br>Wenn
Sie JavaScript aktiviert haben, klicken Sie auf <a
href=""javascript:history.back()""><b>zur�ck</b></a>,<br>ansonsten benutzen
Sie den Zur�ckbutton ihres Browsers.")
Um das Formular zu verarbeiten, habe ich folgende Anweisung:
elseif komplett = true Then
Dann werden die Formular daten in die Datenbank �bertragen.
> mach es halt andersrum.
> komplett ist am anfang "false" und sobald eine Eingabe vorhanden ist macht
> er true daraus
> komplett = false
> if Request.Form("ab")<>"" OR Request.Form("so")<>"" OR
> Request.Form("Region")<>"" OR .......... Then
> komplett = true
> end if
> if komplett = true then
> ' senden
> else
> ' nicht senden
> end if
Hab ich verusucht, dass Problem bleibt aber bestehen. Also auch wenn ("ab")
ausgef�llt worden ist, wird das Formular nicht verarbeitet. Nur wenn ("so")
nicht ="" ist wird es verarbeitet. :(
Hier jetzt noch mal der Code der nicht funzt (ich hoff das sprengt nicht den
Rahmen):
nochmals vielen Dank & Gr��e Stefan
If Request.Form("Button")<>"" Then ' Formular wurde versandt
komplett = true
If Request.Form("Anbieter")=""Then
komplett = false
End If
If Request.Form("partner")="" Then
komplett = false
End If
If Request.Form("Region")="" Then
komplett = false
End If
if (Request.Form("ab")=",," AND Request.Form("so")="") THEN
komplett = false
end if
If komplett=false Then
Response.Write("<span style=font-size:14px;color:#003366;>Bitte f�llen
Sie alle Felder, die mit einem * gekennzeichnet sind, aus!</span><br>Wenn
Sie JavaScript aktiviert haben, klicken Sie auf <a
href=""javascript:history.back()""><b>zur�ck</b></a>,<br>ansonsten benutzen
Sie den Zur�ckbutton ihres Browsers.")
elseif komplett = true Then ' Formular wurde versandt
' ADO Connection-Objekt erzeugen und �ffnen
SET nameConn = Server.CreateObject("ADODB.Connection")
SET rs = Server.CreateObject("ADODB.RecordSet")
nameConn.Open "DSN=sportberufe2"
if request("so") <> "" then 'mit dieser if Abfrage tausche ich die kommas
gegen punkte aus
ab = request("so")
else
ab = request("ab")(1) & "." & request("ab")(2) & "." &
request("ab")(3)
end if
sql = "INSERT INTO angebote (Anbieter, Ansprechpartner, Strasse, Stadt,
Region, Telefon, Mobil, Mail, Internet, Taetigkeit, abdem, ab, Firmenprofil,
Jobprofil, Anforderungen, datum) VALUES ("
sql = sql & "'" & stef & "',"
sql = sql & "'" & Partner & "',"
sql = sql & "'" & Anschrift & "',"
sql = sql & "'" & Stadt & "',"
sql = sql & "'" & Region & "',"
sql = sql & "'" & lngtelefon & "',"
sql = sql & "'" & Mobil & "',"
sql = sql & "'" & mail & "',"
sql = sql & "'" & Internet & "',"
sql = sql & "'" & Taetigkeit & "',"
sql = sql & "'" & ab & "',"
sql = sql & "'" & so & "',"
sql = sql & "'" & firmenprofil & "',"
sql = sql & "'" & jobprofil & "',"
sql = sql & "'" & Anforderungen & "',"
sql = sql & "'" & lngdatum & "');"
Set rs = nameConn.execute(sql)
nameConn.close
Set nameConn = Nothing
Response.Write("korrekt")
end if
end if
| 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
