<%@ CodePage=65001 Language="VBScript"%> <% Option Explicit %> <% ' You must set "Enable Parent Paths" on your web site in order this relative include to work. %> FCKeditor - Sample

FCKeditor - ASP - Sample 2

This sample shows the editor in all its available languages.

Select a language:

<% ' Automatically calculates the editor base path based on the _samples directory. ' This is usefull only for these samples. A real application should use something like this: ' oFCKeditor.BasePath = '/fckeditor/' ; // '/fckeditor/' is the default value. Dim sBasePath sBasePath = Request.ServerVariables("PATH_INFO") sBasePath = Left( sBasePath, InStrRev( sBasePath, "/_samples" ) ) Dim oFCKeditor Set oFCKeditor = New FCKeditor oFCKeditor.BasePath = sBasePath If Request.QueryString("Lang") = "" Then oFCKeditor.Config("AutoDetectLanguage") = True oFCKeditor.Config("DefaultLanguage") = "en" Else oFCKeditor.Config("AutoDetectLanguage") = False oFCKeditor.Config("DefaultLanguage") = Request.QueryString("Lang") End If oFCKeditor.Value = "This is some sample text. You are using FCKeditor." oFCKeditor.Create "FCKeditor1" %>