# FCKeditor - AFP Sample 2

<% * FCKeditor - The text editor for Internet - http://www.fckeditor.net * Copyright (C) 2003-2007 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 is a basic Sample for FCKeditor integration in the AFP script language (www.afpages.de) * %>

# FCKeditor - AFP - Sample 2

This sample shows the editor in all its available languages.

Select a language: |

<% sBasePath="../../../fckeditor/" && Change this to your local path oFCKeditor = CREATEOBJECT("FCKeditor") oFCKeditor.fckeditor("FCKeditor1") lcLanguage="" && Initialize Variable lcLanguage=request.querystring("Lang") && Request Parameter lcLanguage=oFCKeditor.StripAttacks(lcLanguage) && Remove special escape characters IF EMPTY(lcLanguage) oFCKeditor.aconfig[1,1]="AutoDetectLanguage" oFCKeditor.aconfig[1,2]="true" oFCKeditor.aconfig[2,1]="DefaultLanguage" oFCKeditor.aconfig[2,2]="en" ELSE oFCKeditor.aconfig[1,1]="AutoDetectLanguage" oFCKeditor.aconfig[1,2]="false" oFCKeditor.aconfig[2,1]="DefaultLanguage" oFCKeditor.aconfig[2,2]=lcLanguage ENDIF lcText=[This is some sample text. You are using ] lcText=lcText+[FCKeditor.] oFCKeditor.BasePath = sBasePath oFCKeditor.cValue = lcText ? oFCKeditor.Create() %>