Steht eigentlich noch mehr drin aber das sollte reichen... �brigens danke
f�r euer engagement!
<!--#INCLUDE FILE="../../Module/verbindung.asp"-->
<%
'Falls Formulardaten gesendet wurden wird geupdatet
IF Request.Form.Count > 1 THEN
Dim SQLAupdate
SQLAupdate = "SELECT * FROM abwesend ORDER BY grund"
Set Record = Verbindung.Execute(SQLAupdate)
'Feldinhalte den Datenbankwerten zuweisen
Dim Feld
Dim Inhalt
Do While not Record.EOF
Feld = Record("Grund")
'Da in HTML-Formularen keine Umlaut erlaubt sind muss der Name des
Formularfeldes von den Umlauten "befreit" werden
'Vorher wurden die Umlaute aus den Namen der Formularfelder entfern.
'Wird dies hier nicht getan wird das Formularfeld nicht gefunden
Feld = Replace(Feld, "�", "ae")
Feld = Replace(Feld, "�", "oe")
Feld = Replace(Feld, "�", "ue")
Inhalt = Request.Form(Feld)
'Falls �nderung stattgefunden hat wird geupdatet
If Not Record("Grund") = Inhalt then
Record.("Grund") = Inhalt
Record.Update
End If
Record.MoveNext
Loop
END IF
%>
-----Urspr�ngliche Nachricht-----
Von: Stefan H�sler [mailto:[EMAIL PROTECTED]]
Gesendet: Donnerstag, 25. April 2002 10:38
An: ASP Datenbankprogrammierung
Betreff: [aspdedatabase] AW: Re: AW: ADODB.Recordset error '800a0cb3'
> ja... aber der Code zum Verbinden zur Datenbank steht in einer externen
> Datei...
Wie, in ner externen Datei? Was steht denn auf der bearbeiten.htm?
| [aspdedatabase] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
