first commit

2022-11-25 07:07:16 +01:00
commit c086b964da
3188 changed files with 1063828 additions and 0 deletions
--- a/standort/FCKeditor/_samples/asp/sample03.asp
+++ b/standort/FCKeditor/_samples/asp/sample03.asp
@ -0,0 +1,88 @@
+<%@ CodePage=65001 Language="VBScript"%>
+<% Option Explicit %>
+<!--
+ * FCKeditor - The text editor for internet
+ * Copyright (C) 2003-2006 Frederico Caldeira Knabben
+ * 
+ * Licensed under the terms of the GNU Lesser General Public License:
+ * 		http://www.opensource.org/licenses/lgpl-license.php
+ * 
+ * For further information visit:
+ * 		http://www.fckeditor.net/
+ * 
+ * "Support Open Source software. What about a donation today?"
+ * 
+ * File Name: sample03.asp
+ * 	Sample page.
+ * 
+ * File Authors:
+ * 		Frederico Caldeira Knabben (fredck@fckeditor.net)
+-->
+<% ' You must set "Enable Parent Paths" on your web site in order this relative include to work. %>
+<!-- #INCLUDE file="../../fckeditor.asp" -->
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
+<html>
+	<head>
+		<title>FCKeditor - Sample</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" />
+		<script type="text/javascript">
+
+function FCKeditor_OnComplete( editorInstance )
+{
+	var oCombo = document.getElementById( 'cmbToolbars' ) ;
+	oCombo.value = editorInstance.ToolbarSet.Name ;
+	oCombo.style.visibility = '' ;
+}
+
+function ChangeToolbar( toolbarName )
+{
+	window.location.href = window.location.pathname + "?Toolbar=" + toolbarName ;
+}
+
+		</script>
+	</head>
+	<body>
+		<h1>FCKeditor - ASP - Sample 3</h1>
+		This sample shows how to change the editor toolbar.
+		<hr>
+		<table cellpadding="0" cellspacing="0" border="0">
+			<tr>
+				<td>
+					Select the toolbar to load:&nbsp;
+				</td>
+				<td>
+					<select id="cmbToolbars" onchange="ChangeToolbar(this.value);" style="VISIBILITY: hidden">
+						<option value="Default" selected>Default</option>
+						<option value="Basic">Basic</option>
+					</select>
+				</td>
+			</tr>
+		</table>
+		<br>
+		<form action="sampleposteddata.asp" method="post" target="_blank">
+<%
+' 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("Toolbar") <> "" Then
+	oFCKeditor.ToolbarSet = Server.HTMLEncode( Request.QueryString("Toolbar") )
+End If
+
+oFCKeditor.Value = "This is some <strong>sample text</strong>. You are using <a href=""http://www.fckeditor.net/"">FCKeditor</a>."
+oFCKeditor.Create "FCKeditor1"
+%>
+			<br>
+			<input type="submit" value="Submit">
+		</form>
+	</body>
+</html>