<% * FCKeditor - The text editor for Internet - http://www.fckeditor.net * Copyright (C) 2003-2008 Frederico Caldeira Knabben * * == BEGIN LICENSE == * * Licensed under the terms of any of the following licenses at your * choice: * * - GNU General Public License Version 2 or later (the "GPL") * http://www.gnu.org/licenses/gpl.html * * - GNU Lesser General Public License Version 2.1 or later (the "LGPL") * http://www.gnu.org/licenses/lgpl.html * * - Mozilla Public License Version 1.1 or later (the "MPL") * http://www.mozilla.org/MPL/MPL-1.1.html * * == END LICENSE == * * This page lists the data posted by a form. * %> FCKeditor - AFP - Samples - Posted Data

FCKeditor - Samples - Posted Data

This page lists all data posted by the form.
<% lcForm=REQUEST.Form() lcForm=STRTRAN(lcForm,"&",CHR(13)+CHR(10)) FOR lnLoop=1 TO MEMLINES(lcForm) lcZeile=ALLTRIM(MLINE(lcForm,lnLoop)) IF AT("=",lcZeile)>0 lcVariable=UPPER(ALLTRIM(LEFT(lcZeile,AT("=",lcZeile)-1))) lcWert=ALLTRIM(RIGHT(lcZeile,LEN(lcZeile)-AT("=",lcZeile))) lcWert=Server.UrlDecode( lcWert ) lcWert=STRTRAN(lcWert,"<","<") lcWert=STRTRAN(lcWert,">",">") && ... if wanted remove/translate HTML Chars ... ? [] ENDIF NEXT %>
Field Name Value
]+lcVariable+[ =
]+lcWert+[