<!--- erstellt von Ralf Kunze ---> <CFQUERY NAME = "ProfAbfr" USERNAME = "erika" PASSWORD = "mustermann" DATASOURCE = "dbs" DBTYPE = "ODBC"> <!--- Where 0=0, um in jedem Fall eine korrekte Abfrage zu erhalten ---> SELECT * FROM professoren where 0 = 0 <!--- Weitere Statements gegebenenfalls anhaengen ---> <CFIF #ProfPersnr# is NOT ""> AND PersNr = #ProfPersnr# </CFIF> <CFIF #ProfName# is not ""> AND Name LIKE '#ProfName#' </CFIF> <CFIF #ProfRang# is not ""> AND Rang = '#ProfRang#' </CFIF> <CFIF #ProfRaum# is not ""> AND Raum = '#ProfRaum#' </CFIF> </CFQUERY> <HTML> <HEAD> <TITLE> Professorenupdate </TITLE> </HEAD> <BODY> <!--- Falls keine Ergebnisse erzielt wurden, Fehlermeldung geben und den Rest der Seite mit CFABORT unterdruecken ---> <CFIF #ProfAbfr.Recordcount# IS "0"> Ihre Anfrage lieferte leider keine passenden Records.<BR> <A HREF="profupdateformular.cfm">New Search</A> <CFABORT> </CFIF> Bitte geben sie die gewünschte Änderung ein bzw. wählen sie den entsprechenden Datensatz aus: <!--- Ausgabe der Ergebnisse. Bei Record #i# starten und nur ein Record liefern ---> <CFOUTPUT QUERY="ProfAbfr" STARTROW="#i#" MAXROWS="1"> <FORM ACTION="update.cfm" METHOD="POST"> <!--- Ausgabe der Werte in ein Formular zum aendern ---> <TABLE> <TR><TD>Personalnummer: </TD> <TD><INPUT TYPE="text" SIZE=4 NAME="ProfPersnr" VALUE="#Persnr#"> <INPUT TYPE="HIDDEN" NAME="ProfPersnr_integer" VALUE="Personalnummer muss ganzzahlig sein"></TD></TR> <TR><TD>Nachname:</TD> <TD><INPUT SIZE=15 TYPE="text" NAME="ProfName" VALUE="#Name#"></TD></TR> <TR><TD>Gehaltsklasse:</TD> <TD><SELECT NAME="ProfRang"> <CFIF #Rang# IS "C2"><OPTION SELECTED><CFELSE><OPTION></CFIF>C2 <CFIF #Rang# IS "C3"><OPTION SELECTED><CFELSE><OPTION></CFIF>C3 <CFIF #Rang# IS "C4"><OPTION SELECTED><CFELSE><OPTION></CFIF>C4 </SELECT></TD></TR> <TR><TD> Raum:</TD> <TD><INPUT SIZE=4 TYPE="text" NAME="ProfRaum" VALUE="#Raum#"> <INPUT TYPE="HIDDEN" NAME="ProfRaum_integer" VALUE="Raumnummer muss ganzzahlige sein"></TD></TR> <TR><TD><INPUT TYPE="Submit" VALUE="Update"></TD> <TD><INPUT TYPE="RESET"></TD></TR> </TABLE> </FORM> </CFOUTPUT> <!--- Den Zaehler setzen und entsprechend des Wertes weiteren Link anbieten oder nicht ---> <CFIF #i# IS "1"> <IMG SRC="Grayleft.gif" ALT="Back"> <CFELSE> <CFSET iback=#i#-1> <CFOUTPUT> <A HREF="profupdate.cfm?i=#iback#&ProfPersnr=#ProfPersnr# &Profname=#Profname#&ProfRang=#ProfRang#&ProfRaum=#ProfRaum#"> <IMG SRC="redleft.gif" BORDER="0" ALT="back"></A> </CFOUTPUT> </CFIF> <A HREF="profupdateformular.cfm">New Search</A> <CFIF #i# LESS THAN #ProfAbfr.RecordCount#> <CFSET inext=#i#+1> <CFOUTPUT> <A HREF="profupdate.cfm?i=#inext#&ProfPersnr=#ProfPersnr# &Profname=#Profname#&ProfRang=#ProfRang#&ProfRaum=#ProfRaum#"> <IMG SRC="redright.gif" ALIGN="Next Entry" BORDER="0"></A> </CFOUTPUT> <CFELSE> <IMG SRC="grayright.gif" ALT="Next"> </CFIF> <!--- Ausgabe welcher Datensatz gezeigt wird und wieviele insgesamt vorhanden sind ---> <CFOUTPUT>Eintrag #i# von #ProfAbfr.RecordCount#</CFOUTPUT><BR> </BODY> </HTML>