<%
dim content
content = "<FONT size=5 color=#2f4f4f>Type here...<a href='#rere'>Hello</a></FONT> <img src='Uploads/Cindy_Crawford.jpg'/>"
'Create a new editor class object
Dim editor
Set editor = New CuteEditor
'Set the ID of this editor class
editor.ID = "Editor1"
'Set the initial HTML value of editor control
editor.Text = content
dim temp_styledropdownMenuNames,temp_styledropdownMenuList,temp_snippetDropDownMenuNames,temp_snippetDropDownMenuList,temp_imagesDropDownMenuNames,temp_imagesDropDownMenuList
temp_styledropdownMenuNames = "Heading,Head,Subhead,NormalRed,Comment"
temp_styledropdownMenuList = "Heading,Head,Subhead,NormalRed,Comment"
temp_snippetDropDownMenuNames = "Contact Info,Copyright"
temp_snippetDropDownMenuList = contactstring&",Copyright 2003 Cutesoft.All right seserved."
temp_imagesDropDownMenuNames = "Contact us,Hi Canada,Need a tool,Flower,Business,Beautiful Smile,Content tools,Nice Couple"
temp_imagesDropDownMenuList = "/uploads/j0182534.jpg,/uploads/j0182611.jpg,/uploads/j0178413.jpg,/uploads/j0313820.jpg,/uploads/PH01956J.jpg,/uploads/j0262681.jpg,/uploads/j0316779.jpg,/uploads/ph01736j.jpg"
temp_linksDropDownMenuNames = "CuteSoft,Mail to us,Yahoo.com,Google.com,ASP.NET"
temp_linksDropDownMenuList = "Http://www.CuteSoft.net,mailto:support@CuteSoft.net,Http://www.yahoo.com,Http://www.google.com,Http://www.asp.net"
editor.FilesPath = "CuteEditor_Files"
editor.ImageGalleryPath = "/Uploads"
editor.Width = "100%"
editor.Height = "100%"
'editor.ActiveTab = "Edit"
editor.AllowPasteHtml = false
'editor.MaxHTMLLength = 12
editor.RemoveServerNamesFromUrl = true
editor.EditCompleteDocument = True
editor.EditorWysiwygModeCss = "/asp/sample.css"
editor.StyleDropDownMenuNames = temp_styledropdownMenuNames
editor.StyleDropDownMenuList = temp_styledropdownMenuList
editor.CodeSnippetDropDownMenuNames = temp_snippetDropDownMenuNames
editor.CodeSnippetDropDownMenuList = temp_snippetDropDownMenuList
editor.ImagesDropDownMenuNames = temp_imagesDropDownMenuNames
editor.ImagesDropDownMenuList = temp_imagesDropDownMenuList
editor.LinksDropDownMenuNames = temp_linksDropDownMenuNames
editor.LinksDropDownMenuList = temp_linksDropDownMenuList
editor.Draw()
' Retrieve the data from editor: Request.Form("Editor1_HTMLContent")
%>