sampleposteddata.afp
63 lines
| 1.9 KiB
| application/vnd.ibm.modcap
|
TextLexer
arturo
|
r0 | <% | ||
| * 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. | ||||
| * | ||||
| %> | ||||
| <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> | ||||
| <html> | ||||
| <head> | ||||
| <title>FCKeditor - AFP - Samples - Posted Data</title> | ||||
| <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> | ||||
| <meta name="robots" content="noindex, nofollow"> | ||||
| <link href="../sample.css" rel="stylesheet" type="text/css"> | ||||
| </head> | ||||
| <body> | ||||
| <h1>FCKeditor - Samples - Posted Data</h1> | ||||
| This page lists all data posted by the form. | ||||
| <hr> | ||||
| <table border="1" cellspacing="0" id="outputSample"> | ||||
| <colgroup><col width="80"><col></colgroup> | ||||
| <thead> | ||||
| <tr> | ||||
| <th>Field Name</th> | ||||
| <th>Value</th> | ||||
| </tr> | ||||
| </thead> | ||||
| <% | ||||
| 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 ... | ||||
| ? [<tr><th>]+lcVariable+[ =</th><td><pre>]+lcWert+[</pre></td></tr>] | ||||
| ENDIF | ||||
| NEXT | ||||
| %> | ||||
| </table> | ||||
| </body> | ||||
| </html> | ||||